/[gcl]/gcl/lsp/sys-proclaim.lisp
ViewVC logotype

Diff of /gcl/lsp/sys-proclaim.lisp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.2 by camm, Sat Oct 5 18:34:15 2002 UTC revision 1.3 by camm, Tue Sep 23 21:48:33 2003 UTC
# Line 1  Line 1 
1    
2  (IN-PACKAGE "SYSTEM")  (IN-PACKAGE "SYSTEM")
3  (PROCLAIM  (PROCLAIM
4      '(FTYPE (FUNCTION (T) FIXNUM) S-DATA-SIZE THE-START S-DATA-LENGTH))      '(FTYPE (FUNCTION (T) FIXNUM) S-DATA-LENGTH S-DATA-SIZE
5  (PROCLAIM '(FTYPE (FUNCTION (T T) FIXNUM) THE-END))              INSTREAM-LINE THE-START))
 (PROCLAIM '(FTYPE (FUNCTION (T T T T T T T) *) TRACE-CALL))  
6  (PROCLAIM  (PROCLAIM
7      '(FTYPE (FUNCTION (T T T) *) READ-INSPECT-COMMAND LIST-MERGE-SORT      '(FTYPE (FUNCTION (T T) FIXNUM) RELATIVE-LINE GET-NODE-INDEX
8              SHARP-S-READER))              THE-END))
9    (PROCLAIM '(FTYPE (FUNCTION (FIXNUM) FIXNUM) DBL-WHAT-FRAME))
10    (PROCLAIM '(FTYPE (FUNCTION (STRING FIXNUM) FIXNUM) ATOI))
11  (PROCLAIM  (PROCLAIM
12      '(FTYPE (FUNCTION (T T *) *) SORT STABLE-SORT SET-UP-FOR-DUMP-INPUT      '(FTYPE (FUNCTION (T T *) *) SORT STABLE-SORT SUBTYPEP TYPEP
13              SLOOP::FIND-IN-ORDERED-LIST REDUCE))              SLOOP::FIND-IN-ORDERED-LIST REDUCE))
14  (PROCLAIM  (PROCLAIM
15      '(FTYPE (FUNCTION (T T *) T) SLOOP::PARSE-LOOP-MACRO SOME SUBSETP      '(FTYPE (FUNCTION (T T T) *) LIST-MERGE-SORT READ-INSPECT-COMMAND
16              SLOOP::IN-ARRAY-SLOOP-FOR MAKE-SEQUENCE UNION              SHARP-S-READER))
17              WRITE-DEBUG-SYMBOLS MISMATCH NINTERSECTION NOTANY NOTEVERY  (PROCLAIM '(FTYPE (FUNCTION (T T T T T T T) *) TRACE-CALL))
18              NSET-DIFFERENCE NSET-EXCLUSIVE-OR NUNION POSITION  (PROCLAIM
19              POSITION-IF POSITION-IF-NOT REMOVE REMOVE-IF REMOVE-IF-NOT      '(FTYPE (FUNCTION (T T *) T) COUNT COUNT-IF INTERNAL-COUNT-IF
20              REPLACE SEARCH SLOOP::LOOP-ADD-BINDING SET-DIFFERENCE              SUBSETP INTERNAL-COUNT-IF-NOT COUNT-IF-NOT
21              SET-EXCLUSIVE-OR DELETE DELETE-IF DELETE-IF-NOT EVERY FILL              SLOOP::IN-ARRAY-SLOOP-FOR UNION DELETE DELETE-IF
22              FIND BIT-AND BIT-ANDC1 FIND-IF BIT-ANDC2 FIND-IF-NOT              VECTOR-PUSH-EXTEND DELETE-IF-NOT EVERY FILL FIND FIND-IF
23              BIT-EQV BIT-IOR BIT-NAND BIT-NOR BIT-ORC1 BIT-ORC2 BIT-XOR              FIND-IF-NOT INTERSECTION SLOOP::PARSE-LOOP-MACRO
24              INTERSECTION))              SLOOP::LOOP-ADD-BINDING MAKE-SEQUENCE MISMATCH
25  (PROCLAIM '(FTYPE (FUNCTION (T T *) *) BREAK-CALL))              NINTERSECTION NOTANY NOTEVERY SET-DIFFERENCE-REV
26  (PROCLAIM              NSET-DIFFERENCE NSET-DIFFERENCE-REV NSET-EXCLUSIVE-OR
27      '(FTYPE (FUNCTION (T T T) T) DM-VL SETF-EXPAND-1              NUNION POSITION POSITION-IF POSITION-IF-NOT BIT-AND REMOVE
28              TYPECASE-ERROR-STRING              BIT-ANDC1 BIT-ANDC2 REMOVE-IF BIT-EQV REMOVE-IF-NOT BIT-IOR
29              SLOOP::LOOP-PARSE-ADDITIONAL-COLLECTIONS SHARP-A-READER              REPLACE BIT-NAND MAP-INTO BIT-NOR BIT-ORC1 BIT-ORC2 SEARCH
30              DEPOSIT-FIELD DEFMACRO* DPB CHECK-TRACE-ARGS MAKE-T-TYPE              BIT-XOR BREAK-CALL SET-DIFFERENCE SET-EXCLUSIVE-OR
31              GET-SLOT-POS CHECK-S-DATA))              INTERNAL-COUNT SOME))
 (PROCLAIM '(FTYPE (FUNCTION (T T T T T T *) T) ENCODE-UNIVERSAL-TIME))  
32  (PROCLAIM  (PROCLAIM
33      '(FTYPE (FUNCTION (T T T T T) T) MAKE-CONSTRUCTOR MAKE-PREDICATE))      '(FTYPE (FUNCTION (T T T T T) T) MAKE-CONSTRUCTOR MAKE-PREDICATE))
34  (PROCLAIM  (PROCLAIM
35      '(FTYPE (FUNCTION (T T T T T T T T T T *) T) MAKE-ACCESS-FUNCTION))      '(FTYPE (FUNCTION (T T T T) T) MAYBE-BREAK
36                SLOOP::FIRST-USE-SLOOP-FOR SLOOP::FIRST-SLOOP-FOR
37                SETF-STRUCTURE-ACCESS FIND-LINE-IN-FUN CALL-TEST))
38    (PROCLAIM
39        '(FTYPE (FUNCTION (T T T) T) MAKE-BREAK-POINT DEPOSIT-FIELD
40                CHECK-TRACE-ARGS DPB APPLY-DISPLAY-FUN SETF-EXPAND-1 DM-VL
41                SLOOP::LOOP-PARSE-ADDITIONAL-COLLECTIONS
42                TYPECASE-ERROR-STRING SHARP-A-READER KEY-LIST MAKE-T-TYPE
43                GET-SLOT-POS CHECK-S-DATA DEFMACRO* SHARP-U-READER))
44  (PROCLAIM  (PROCLAIM
45      '(FTYPE (FUNCTION (T T T T T T T T T T T T *) T) DEFINE-STRUCTURE))      '(FTYPE (FUNCTION (T T T *) T) SUBSTITUTE SUBSTITUTE-IF
46                SUBSTITUTE-IF-NOT SLOOP::LOOP-DECLARE-BINDING MAP
47                NSUBSTITUTE NSUBSTITUTE-IF NSUBSTITUTE-IF-NOT
48                COMPLETE-PROP))
49  (PROCLAIM  (PROCLAIM
50      '(FTYPE (FUNCTION (T T T T) T) SLOOP::FIRST-USE-SLOOP-FOR      '(FTYPE (FUNCTION (T T T T T T T T T T T T *) T)
51              SLOOP::FIRST-SLOOP-FOR SETF-STRUCTURE-ACCESS CALL-TEST))              MAKE-ACCESS-FUNCTION))
52  (PROCLAIM  (PROCLAIM
53      '(FTYPE (FUNCTION (T T T *) T) SUBSTITUTE SUBSTITUTE-IF      '(FTYPE (FUNCTION (T T T T T T T T T T T T T *) T)
54              SUBSTITUTE-IF-NOT MAP NSUBSTITUTE NSUBSTITUTE-IF              DEFINE-STRUCTURE))
             NSUBSTITUTE-IF-NOT SLOOP::LOOP-DECLARE-BINDING))  
 (PROCLAIM '(FTYPE (FUNCTION (T T T T T *) T) UNIVERSAL-ERROR-HANDLER))  
55  (PROCLAIM  (PROCLAIM
56      '(FTYPE (FUNCTION (T T T T *) T) SLOOP::DEF-LOOP-INTERNAL MERGE))      '(FTYPE (FUNCTION (T T T T *) T) PRINT-STACK-FRAME
57                SLOOP::DEF-LOOP-INTERNAL MERGE))
58    (PROCLAIM '(FTYPE (FUNCTION (T T T T T T *) T) ENCODE-UNIVERSAL-TIME))
59    (PROCLAIM '(FTYPE (FUNCTION (T T T T T *) T) UNIVERSAL-ERROR-HANDLER))
60  (PROCLAIM '(FTYPE (FUNCTION (FIXNUM FIXNUM) FIXNUM) ROUND-UP))  (PROCLAIM '(FTYPE (FUNCTION (FIXNUM FIXNUM) FIXNUM) ROUND-UP))
61  (PROCLAIM  (PROCLAIM
62      '(FTYPE (FUNCTION NIL *) BREAK-MESSAGE BREAK-UNHIDE-ALL      '(FTYPE (FUNCTION NIL *) BREAK-MESSAGE BREAK-CURRENT
63              SIMPLE-BACKTRACE BREAK-CURRENT))              SIMPLE-BACKTRACE))
64  (PROCLAIM  (PROCLAIM
65      '(FTYPE (FUNCTION NIL T) SLOOP::PARSE-LOOP-FOR      '(FTYPE (FUNCTION (*) *) BREAK-NEXT BREAK-LOCAL BREAK-BDS
66              DM-TOO-MANY-ARGUMENTS DM-TOO-FEW-ARGUMENTS BREAK-HELP-HELP              IHS-BACKTRACE SHOW-BREAK-VARIABLES DBL-BACKTRACE
67              BREAK-HELP-STACK-FUNS BREAK-TAGS BREAK-VARIABLES              SERROR::INF-SIGNAL LOC INFO-ERROR BREAK-QUIT BREAK-PREVIOUS
68              INSPECT-READ-LINE INSPECT-INDENT INSPECT-INDENT-1              BREAK-VS))
69              SLOOP::LOOP-POP SLOOP::LOOP-UN-POP SLOOP::LOOP-PEEK  (PROCLAIM
70              BREAK-BLOCKS SLOOP::PARSE-LOOP1 SLOOP::PARSE-LOOP-DO      '(FTYPE (FUNCTION NIL T) CLEANUP SETUP-LINEINFO INIT-BREAK-POINTS
71              SLOOP::PARSE-ONE-WHEN-CLAUSE BREAK-VARIABLES-VALUES              SLOOP::TYPE-ERROR TOP-LEVEL ALL-TRACE-DECLARATIONS
72              SLOOP::PARSE-LOOP-WHEN SLOOP::PARSE-LOOP-COLLECT              STEP-READ-LINE BREAK-HELP DBL SLOOP::PARSE-LOOP1
73              BREAK-FUNCTIONS SET-CURRENT BREAK-HELP SET-ENV TEST-ERROR              SET-UP-TOP-LEVEL SLOOP::LOOP-PEEK SLOOP::LOOP-POP
74              TOP-LEVEL SLOOP::TYPE-ERROR ILLEGAL-BOA              SLOOP::PARSE-LOOP-FOR INSPECT-INDENT-1 SLOOP::PARSE-LOOP-DO
75              ALL-TRACE-DECLARATIONS STEP-READ-LINE))              SLOOP::PARSE-LOOP-WHEN INSPECT-INDENT
76  (PROCLAIM              SLOOP::PARSE-LOOP-COLLECT INSPECT-READ-LINE
77      '(FTYPE (FUNCTION (*) *) LOC BACKTRACE SHOW-BREAK-VARIABLES              DM-TOO-MANY-ARGUMENTS DM-TOO-FEW-ARGUMENTS
78              BREAK-LOCAL BREAK-LOCALS BREAK-NEXT BREAK-PREVIOUS              SLOOP::LOOP-UN-POP SLOOP::PARSE-ONE-WHEN-CLAUSE
79              BREAK-QUIT BREAK-VS))              GET-INDEX-NODE ILLEGAL-BOA SET-CURRENT SET-ENV
80  (PROCLAIM              DEFAULT-INFO-HOTLIST TEST-ERROR))
81      '(FTYPE (FUNCTION (*) T) Y-OR-N-P YES-OR-NO-P  (PROCLAIM
82              SLOOP::PARSE-LOOP-WITH SLOOP::PARSE-LOOP-DECLARE VECTOR      '(FTYPE (FUNCTION (*) T) CURRENT-STEP-FUN DESCRIBE-ENVIRONMENT
83              MAKE-S-DATA DRIBBLE BREAK))              Y-OR-N-P YES-OR-NO-P DRIBBLE VECTOR STEP-INTO STEP-NEXT
84  (PROCLAIM              SLOOP::PARSE-LOOP-WITH SLOOP::PARSE-LOOP-DECLARE
85      '(FTYPE (FUNCTION (T) *) BREAK-HIDE BREAK-HIDE-PACKAGE              SERROR::MAKE-ERROR-CONDITION MAKE-S-DATA DBL-READ BREAK
86              FIND-DECLARATIONS SEARCH-STACK PRIN1-TO-STRING BREAK-UNHIDE              BREAK-LOCALS MAKE-INSTREAM))
87              PRINC-TO-STRING INSPECT-OBJECT BREAK-UNHIDE-PACKAGE  (PROCLAIM
88              BREAK-BDS BREAK-GO IHS-FNAME DESCRIBE GET-SETF-METHOD      '(FTYPE (FUNCTION (T) *) BREAK-GO INSTREAM-NAME ALOAD DESCRIBE
89              GET-SETF-METHOD-MULTIPLE-VALUE INSPECT))              INSPECT INSPECT-OBJECT GET-&ENVIRONMENT FIND-DECLARATIONS
90                INFO-SUBFILE PRIN1-TO-STRING PRINC-TO-STRING WAITING
91                END-WAITING IHS-FNAME))
92  (PROCLAIM '(FTYPE (FUNCTION (T :DYNAMIC-EXTENT *) T) ADJUST-ARRAY))  (PROCLAIM '(FTYPE (FUNCTION (T :DYNAMIC-EXTENT *) T) ADJUST-ARRAY))
 (PROCLAIM  
     '(FTYPE (FUNCTION (T T *) FIXNUM) VECTOR-PUSH-EXTEND INTERNAL-COUNT  
             COUNT COUNT-IF COUNT-IF-NOT INTERNAL-COUNT-IF  
             INTERNAL-COUNT-IF-NOT))  
93  (PROCLAIM '(FTYPE (FUNCTION (T FIXNUM FIXNUM T T) T) QUICK-SORT))  (PROCLAIM '(FTYPE (FUNCTION (T FIXNUM FIXNUM T T) T) QUICK-SORT))
94    (PROCLAIM '(FTYPE (FUNCTION (STRING) STRING) COERCE-SLASH-TERMINATED))
95    (PROCLAIM '(FTYPE (FUNCTION (STRING) T) RE-QUOTE-STRING))
96  (PROCLAIM  (PROCLAIM
97      '(FTYPE (FUNCTION (T) T) SIGNUM S-DATA-PRINT-FUNCTION      '(FTYPE (FUNCTION (T) T) PRINT-FRS GET-INSTREAM FRS-KIND COSH
98              DM-KEY-NOT-ALLOWED SINH S-DATA-SLOT-DESCRIPTIONS              ADD-TO-HOTLIST IHS-NOT-INTERPRETED-ENV BKPT-FUNCTION
99              SLOOP::AVERAGING-SLOOP-MACRO S-DATA-SLOT-POSITION              BKPT-FILE-LINE FIX-LOAD-PATH WALK-THROUGH BKPT-FILE
100              SLOOP::REPEAT-SLOOP-MACRO SLOOP::SUBSTITUTE-SLOOP-BODY              SERROR::ERROR-FUNCTION BKPT-FORM
101              SIMPLE-ARRAY-P S-DATA-HAS-HOLES SLOOP::RETURN-SLOOP-MACRO              SERROR::ERROR-ERROR-HANDLER-ARGS TANH TRACE-ONE
102              NORMALIZE-TYPE S-DATA-FROZEN KNOWN-TYPE-P LOGNOT              TERMINAL-INTERRUPT SLOOP::SLOOP-SLOOP-MACRO UNTRACE-ONE
103              S-DATA-DOCUMENTATION S-DATA-CONSTRUCTORS S-DATA-OFFSET              DO-F DWIM INSERT-BREAK-POINT SHOW-BREAK-POINT S-DATA-P
104              DM-BAD-KEY S-DATA-NAMED S-DATA-TYPE BEST-ARRAY-ELEMENT-TYPE              SHORT-NAME VECTOR-POP FREEZE-DEFSTRUCT
105              TANH SLOOP::SLOOP-SLOOP-MACRO SHOW-ENVIRONMENT VECTOR-POP              BREAK-BACKWARD-SEARCH-STACK S-DATA-NAME
106              INSPECT-SYMBOL SLOOP::LOOP-COLLECT-KEYWORD-P PHASE              BREAK-FORWARD-SEARCH-STACK S-DATA-RAW FIND-CLASS
107              INSPECT-PACKAGE INSPECT-CHARACTER INSPECT-NUMBER              S-DATA-INCLUDED GET-NEXT-VISIBLE-FUN S-DATA-INCLUDES
108              SLOOP::PARSE-NO-BODY INSPECT-CONS INSPECT-STRING              S-DATA-STATICP S-DATA-PRINT-FUNCTION
109              INSPECT-VECTOR TERMINAL-INTERRUPT PROVIDE INSPECT-ARRAY              S-DATA-SLOT-DESCRIPTIONS S-DATA-SLOT-POSITION
110              INSPECT-STRUCTURE SLOOP::TRANSLATE-NAME              NEXT-STACK-FRAME COMPUTING-ARGS-P CHECK-DECLARATIONS
111              SLOOP::LOOP-LET-BINDINGS SLOOP::PARSE-LOOP              S-DATA-HAS-HOLES CHECK-TRACE-SPEC S-DATA-FROZEN
112              BREAK-BACKWARD-SEARCH-STACK ASK-FOR-FORM              TRACE-ONE-PREPROCESS S-DATA-DOCUMENTATION
113              SLOOP::PARSE-LOOP-INITIALLY TYPECASE-ERROR-STRINGS BOIN-P              RESET-TRACE-DECLARATIONS S-DATA-CONSTRUCTORS S-DATA-OFFSET
114              BREAK-FORWARD-SEARCH-STACK              SEARCH-STACK S-DATA-NAMED S-DATA-TYPE S-DATA-CONC-NAME
115              SLOOP::POINTER-FOR-COLLECT PRINT-IHS PRINT-FRS LEAP-YEAR-P              FIND-ALL-SYMBOLS SLOOP::PARSE-LOOP INSTREAM-P
116              FRS-KIND NUMBER-OF-DAYS-FROM-1900 IHS-VISIBLE              SLOOP::SUBSTITUTE-SLOOP-BODY SLOOP::LOOP-LET-BINDINGS ISQRT
117              IHS-COMPILED-P PRINT-SYMBOL-APROPOS BYTE-SIZE SEQTYPE CIS              FIND-DOCUMENTATION SLOOP::PARSE-LOOP-INITIALLY
118              FIND-DOCUMENTATION COSH TRACE-ONE UNTRACE-ONE ABS S-DATA-P              INSPECT-SYMBOL DM-KEY-NOT-ALLOWED RATIONAL INSPECT-PACKAGE
119              ACOS TRACE-ONE-PREPROCESS RATIONAL ACOSH CHECK-TRACE-SPEC              INSPECT-CHARACTER INSPECT-NUMBER SERROR:ERROR-NAME
120              CHECK-DECLARATIONS RESET-TRACE-DECLARATIONS              INSPECT-CONS SERROR:ERROR-STRING LOGNOT INSPECT-STRING
121              ARRAY-DIMENSIONS ASIN ASINH FREEZE-DEFSTRUCT ATANH              SERROR:ERROR-CONTINUE-STRING INSPECT-VECTOR
122              FIND-ALL-SYMBOLS S-DATA-NAME S-DATA-RAW S-DATA-INCLUDED              SERROR:ERROR-FORMAT-ARGS INSPECT-ARRAY
123              ISQRT S-DATA-INCLUDES BYTE-POSITION S-DATA-STATICP))              SLOOP::POINTER-FOR-COLLECT SLOOP::LOOP-COLLECT-KEYWORD-P
124  (PROCLAIM              INSPECT-STRUCTURE DM-BAD-KEY INSTREAM-STREAM IDESCRIBE
125      '(FTYPE (FUNCTION (T *) *) SET-UP-FOR-DUMP-OUTPUT PRINT-DOC              INSTREAM-STREAM-NAME SLOOP::PARSE-NO-BODY ASK-FOR-FORM
126              APROPOS-DOC WRITE-TO-STRING READ-FROM-STRING              TYPECASE-ERROR-STRINGS BOIN-P SLOOP::TRANSLATE-NAME
127              DECODE-UNIVERSAL-TIME STEPPER APROPOS FCEILING FFLOOR              SERROR::|WTA-tester|
128              FROUND FTRUNCATE))              SERROR::|SUBSCRIPT-OUT-OF-BOUNDS-tester|
129  (PROCLAIM              SERROR::|ERROR-tester| SERROR::|WRONG-TYPE-ARGUMENT-tester|
130      '(FTYPE (FUNCTION (T *) T) SLOOP::ADD-FROM-DATA MAKE-ARRAY              COMPILE-FILE-PATHNAME SERROR::|TOO-FEW-ARGUMENTS-tester|
131              REMOVE-DUPLICATES REQUIRE SBIT SLOOP::LOOP-ADD-TEMPS              COMPLEMENT SERROR::|TOO-MANY-ARGUMENTS-tester| PHASE ABS
132              CONCATENATE WARN BAD-SEQ-LIMIT DELETE-DUPLICATES              CONSTANTLY SERROR::|UNEXPECTED-KEYWORD-tester| ACOS
133              APROPOS-LIST ARRAY-IN-BOUNDS-P ARRAY-ROW-MAJOR-INDEX BIT              SERROR::|INVALID-FORM-tester| ACOSH
134              BIT-NOT))              SERROR::|UNBOUND-VARIABLE-tester|
135  (PROCLAIM '(FTYPE (FUNCTION (T T) *) FIND-DOC SUBTYPEP TYPEP))              SERROR::|INVALID-VARIABLE-tester|
136  (PROCLAIM              SERROR::|UNDEFINED-FUNCTION-tester|
137      '(FTYPE (FUNCTION (T T) T) LDB-TEST LOGANDC1 SLOOP::PARSE-LOOP-MAP              NUMBER-OF-DAYS-FROM-1900 SERROR::|INVALID-FUNCTION-tester|
138              LOGANDC2 LOGNAND LOGNOR DM-V SLOOP::IN-TABLE-SLOOP-MAP              PROVIDE LEAP-YEAR-P ARRAY-DIMENSIONS ASIN ASINH ATANH
139              DM-NTH SUB-INTERVAL-P LOGORC1 DM-NTH-CDR IN-INTERVAL-P              INFO-GET-TAGS NODES-FROM-INDEX SERROR::ERROR-CONDITION-P
140              LOGORC2 SLOOP::IN-PACKAGE-SLOOP-MAP MATCH-DIMENSIONS              PRINT-SYMBOL-APROPOS PROCESS-SOME-ARGS INFO-GET-FILE
141              LOGTEST SUPER-GO SLOOP::=-SLOOP-FOR MASK-FIELD              SETUP-INFO CLASSP CLASS-OF CLASS-PRECEDENCE-LIST
142              SLOOP::IN-CAREFULLY-SLOOP-FOR VECTOR-PUSH SETF-HELPER              BEST-ARRAY-ELEMENT-TYPE SIMPLE-ARRAY-P BYTE-POSITION
143              SLOOP::COLLATE-SLOOP-COLLECT SLOOP::IN-FRINGE-SLOOP-MAP              FIND-CLASS-NO-ERROR BYTE-SIZE IHS-VISIBLE NORMALIZE-TYPE
144              SLOOP::DESETQ1 SETF-EXPAND SLOOP::L-EQUAL SUBSTRINGP              SIGNUM SLOOP::AVERAGING-SLOOP-MACRO KNOWN-TYPE-P SINH
145              INCREMENT-CURSOR SEQUENCE-CURSOR SLOOP::THE-TYPE              SHOW-ENVIRONMENT CIS NODE-OFFSET PRINT-IHS
146              SLOOP::MAKE-VALUE LIST-DELQ CHECK-SEQ-START-END COERCE              SLOOP::REPEAT-SLOOP-MACRO INFO-NODE-FROM-POSITION
147              DOCUMENTATION PARSE-SLOT-DESCRIPTION              SLOOP::RETURN-SLOOP-MACRO SEQTYPE))
148              OVERWRITE-SLOT-DESCRIPTIONS SLOOP::SUM-SLOOP-COLLECT  (PROCLAIM
149              SLOOP::LOGXOR-SLOOP-COLLECT SLOOP::MAXIMIZE-SLOOP-COLLECT      '(FTYPE (FUNCTION (T *) *) INFO DECODE-UNIVERSAL-TIME PRINT-DOC
150              SLOOP::MINIMIZE-SLOOP-COLLECT SLOOP::COUNT-SLOOP-COLLECT              APROPOS-DOC BREAK-FUNCTION STEPPER WRITE-TO-STRING FCEILING
151              SLOOP::THEREIS-SLOOP-COLLECT SLOOP::ALWAYS-SLOOP-COLLECT              FFLOOR FROUND NLOAD FTRUNCATE GET-SETF-METHOD
152              BYTE SLOOP::NEVER-SLOOP-COLLECT LDB))              GET-SETF-METHOD-MULTIPLE-VALUE APROPOS READ-FROM-STRING
153                SHOW-INFO))
154    (PROCLAIM '(FTYPE (FUNCTION (STRING *) *) GET-COMMAND-ARG))
155    (PROCLAIM
156        '(FTYPE (FUNCTION (T *) T) CONCATENATE LIST-MATCHES FILE-SEARCH
157                WARN DELETE-DUPLICATES NTH-STACK-FRAME WARN-VERSION
158                UPGRADED-ARRAY-ELEMENT-TYPE SLOOP::LOOP-ADD-TEMPS
159                SLOOP::ADD-FROM-DATA MAKE-ARRAY BIT APROPOS-LIST
160                FILE-TO-STRING ARRAY-IN-BOUNDS-P ARRAY-ROW-MAJOR-INDEX
161                REMOVE-DUPLICATES REQUIRE BIT-NOT SBIT BREAK-LEVEL
162                BAD-SEQ-LIMIT INFO-SEARCH))
163    (PROCLAIM
164        '(FTYPE (FUNCTION (T T) *) NEWLINE NEW-SEMI-COLON-READER FIND-DOC))
165    (PROCLAIM
166        '(FTYPE (FUNCTION (T T) T) SLOOP::IN-TABLE-SLOOP-MAP
167                CHECK-SEQ-START-END LIST-DELQ SLOOP::IN-PACKAGE-SLOOP-MAP
168                SLOOP::=-SLOOP-FOR ITERATE-OVER-BKPTS SET-DIR
169                SLOOP::IN-CAREFULLY-SLOOP-FOR SLOOP::COLLATE-SLOOP-COLLECT
170                VECTOR-PUSH SLOOP::IN-FRINGE-SLOOP-MAP GET-LINE-OF-FORM
171                DOCUMENTATION SAFE-EVAL SETF-EXPAND SLOOP::DESETQ1
172                COMPILER::COMPILER-DEF-HOOK AUTOLOAD AUTOLOAD-MACRO LDB
173                LDB-TEST DBL-UP SETF-HELPER LOGANDC1 LOGANDC2 LOGNAND
174                LOGNOR LOGORC1 LOGORC2 DM-NTH-CDR SEQUENCE-CURSOR LOGTEST
175                INCREMENT-CURSOR DM-V SLOOP::MAKE-VALUE SUBSTRINGP DM-NTH
176                SLOOP::PARSE-LOOP-MAP SLOOP::THE-TYPE SLOOP::L-EQUAL
177                MASK-FIELD SUPER-GO LEFT-PARENTHESIS-READER
178                SLOOP::SUM-SLOOP-COLLECT GET-MATCH QUOTATION-READER
179                GET-NODES SLOOP::LOGXOR-SLOOP-COLLECT
180                SLOOP::MAXIMIZE-SLOOP-COLLECT SLOOP::MINIMIZE-SLOOP-COLLECT
181                OVERWRITE-SLOT-DESCRIPTIONS SLOOP::COUNT-SLOOP-COLLECT
182                BREAK-STEP-INTO *BREAK-POINTS* SLOOP::THEREIS-SLOOP-COLLECT
183                BREAK-STEP-NEXT SET-BACK SLOOP::ALWAYS-SLOOP-COLLECT
184                IN-INTERVAL-P GET-INFO-CHOICES DISPLAY-ENV MATCH-DIMENSIONS
185                ADD-FILE DISPLAY-COMPILED-ENV BYTE INFO-AUX
186                SLOOP::NEVER-SLOOP-COLLECT PARSE-SLOT-DESCRIPTION
187                ALL-MATCHES SUB-INTERVAL-P COERCE))

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26