Changeset 5472
- Timestamp:
- Nov 3, 2006, 10:10:07 PM (18 years ago)
- File:
-
- 1 edited
-
trunk/ccl/level-1/ppc-error-signal.lisp (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/ccl/level-1/ppc-error-signal.lisp
r5466 r5472 38 38 (funcall err-fn 39 39 #.(car (rassoc 'type-error *kernel-simple-error-classes*)) 40 (list rb-value (logandc2 errnum arch::error-type-error) 40 (list rb-value (logandc2 errnum arch::error-type-error)) 41 41 frame-ptr)) 42 42 ((eql errnum arch::error-udf)
Note:
See TracChangeset
for help on using the changeset viewer.
