107 |
FTRUNCATE PPRINT-DISPATCH SHOW-INFO NLOAD APROPOS-DOC)) |
FTRUNCATE PPRINT-DISPATCH SHOW-INFO NLOAD APROPOS-DOC)) |
108 |
(PROCLAIM |
(PROCLAIM |
109 |
'(FTYPE (FUNCTION (T) T) TYPE-OF CLASS-OF NON-LOGICAL-PATHNAME-P DO-F SLOOP::POINTER-FOR-COLLECT |
'(FTYPE (FUNCTION (T) T) TYPE-OF CLASS-OF NON-LOGICAL-PATHNAME-P DO-F SLOOP::POINTER-FOR-COLLECT |
110 |
|
sequence-type-element-type sequence-type-element-type-int |
111 |
|
sequence-type-length-type sequence-type-length-type-int |
112 |
SLOOP::LOOP-LET-BINDINGS SLOOP::LOOP-COLLECT-KEYWORD-P |
SLOOP::LOOP-LET-BINDINGS SLOOP::LOOP-COLLECT-KEYWORD-P |
113 |
SERROR::|TOO-MANY-ARGUMENTS-tester| |
SERROR::|TOO-MANY-ARGUMENTS-tester| |
114 |
SERROR::|TOO-FEW-ARGUMENTS-tester| COERCE-TO-STANDARD-CLASS |
SERROR::|TOO-FEW-ARGUMENTS-tester| COERCE-TO-STANDARD-CLASS |