Changeset 12934
- Timestamp:
- 10/01/10 21:40:50 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/abcl/src/org/armedbear/lisp/apropos.lisp
r12217 r12934 50 50 result) 51 51 (mapcan (lambda (package) 52 53 52 (apropos-list string-designator package)) 53 (list-all-packages)))) 54 54 55 55 (defun apropos (string-designator &optional package-designator) 56 (dolist (symbol (apropos-list string-designator package-designator)) 56 (dolist (symbol (remove-duplicates (apropos-list string-designator 57 package-designator))) 57 58 (fresh-line) 58 59 (prin1 symbol)
Note: See TracChangeset
for help on using the changeset viewer.