Changeset 11464 for trunk/source/level-1
- Timestamp:
- Dec 4, 2008, 12:28:14 PM (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/source/level-1/l1-io.lisp
r11064 r11464 791 791 (class-name (class-name class))) 792 792 (cond ((not (and (symbolp class-name) 793 (eq class (find-class class-name ))))793 (eq class (find-class class-name nil)))) 794 794 (%write-string "An instance of" stream) 795 795 (pp-space stream)
Note: See TracChangeset
for help on using the changeset viewer.