Changeset 6591
- Timestamp:
- May 25, 2007, 4:43:40 AM (18 years ago)
- File:
-
- 1 edited
-
branches/ide-1.0/ccl/level-1/l1-error-signal.lisp (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
branches/ide-1.0/ccl/level-1/l1-error-signal.lisp
r5315 r6591 116 116 (defun %error (condition args error-pointer) 117 117 (setq condition (condition-arg condition args 'simple-error)) 118 (process-debug-condition *current-process* condition error-pointer) 118 119 (signal condition) 119 120 (unless *interactive-streams-initialized*
Note:
See TracChangeset
for help on using the changeset viewer.
