/[gcl]/gcl/cmpnew/gcl_lfun_list.lsp
ViewVC logotype

Diff of /gcl/cmpnew/gcl_lfun_list.lsp

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

revision 1.1 by camm, Sun Sep 14 02:30:34 2003 UTC revision 1.2 by camm, Sun Sep 14 02:43:02 2003 UTC
# Line 0  Line 1 
1    
2    ;; Modified data base including return values types
3    ;; and making the arglists correct if they have optional args.
4    ;;
5    
6    (in-package 'compiler)
7    
8    (DEFSYSFUN 'GENSYM "Lgensym" '(*) 'T NIL NIL)
9    (DEFSYSFUN 'SUBSEQ "Lsubseq" '(T T *) 'T NIL NIL)
10    (DEFSYSFUN 'MINUSP "Lminusp" '(T) 'T NIL T)
11    (DEFSYSFUN 'INTEGER-DECODE-FLOAT "Linteger_decode_float" '(T)
12        '(VALUES T T T) NIL NIL)
13    (DEFSYSFUN '- "Lminus" '(T *) 'T NIL NIL)
14    (DEFSYSFUN 'INT-CHAR "Lint_char" '(T) 'CHARACTER NIL NIL)
15    (DEFSYSFUN 'CHAR-INT "Lchar_int" '(T) 'FIXNUM NIL NIL)
16    (DEFSYSFUN '/= "Lall_different" '(T *) 'T NIL T)
17    (DEFSYSFUN 'COPY-SEQ "Lcopy_seq" '(T) 'T NIL NIL)
18    (DEFSYSFUN 'KEYWORDP "Lkeywordp" '(T) 'T NIL T)
19    (DEFSYSFUN 'NAME-CHAR "Lname_char" '(T) 'CHARACTER NIL NIL)
20    (DEFSYSFUN 'CHAR-NAME "Lchar_name" '(T) 'T NIL NIL)
21    (DEFSYSFUN 'RASSOC-IF "Lrassoc_if" '(T T) 'T NIL NIL)
22    (DEFSYSFUN 'MAKE-LIST "Lmake_list" '(T *) 'T NIL NIL)
23    (DEFSYSFUN 'HOST-NAMESTRING "Lhost_namestring" '(T) 'STRING NIL NIL)
24    (DEFSYSFUN 'MAKE-ECHO-STREAM "Lmake_echo_stream" '(T T) 'T NIL NIL)
25    (DEFSYSFUN 'NTH "Lnth" '(T T) 'T NIL NIL)
26    (DEFSYSFUN 'SIN "Lsin" '(T) 'T NIL NIL)
27    (DEFSYSFUN 'NUMERATOR "Lnumerator" '(T) 'T NIL NIL)
28    (DEFSYSFUN 'ARRAY-RANK "Larray_rank" '(T) 'FIXNUM NIL NIL)
29    (DEFSYSFUN 'CAAR "Lcaar" '(T) 'T NIL NIL)
30    ;#-clcs (DEFSYSFUN 'LOAD "Lload" '(T *) 'T NIL NIL)
31    ;#-clcs (DEFSYSFUN 'OPEN "Lopen" '(T *) 'T NIL NIL)
32    (DEFSYSFUN 'BOTH-CASE-P "Lboth_case_p" '(T) 'T NIL T)
33    (DEFSYSFUN 'NULL "Lnull" '(T) 'T NIL T)
34    (DEFSYSFUN 'RENAME-FILE "Lrename_file" '(T T) 'T NIL NIL)
35    (DEFSYSFUN 'FILE-AUTHOR "Lfile_author" '(T) 'T NIL NIL)
36    (DEFSYSFUN 'STRING-CAPITALIZE "Lstring_capitalize" '(T *) 'STRING NIL
37        NIL)
38    (DEFSYSFUN 'MACROEXPAND "Lmacroexpand" '(T *) '(VALUES T T) NIL NIL)
39    (DEFSYSFUN 'NCONC "Lnconc" '(*) 'T NIL NIL)
40    (DEFSYSFUN 'BOOLE "Lboole" '(T T T) 'T NIL NIL)
41    (DEFSYSFUN 'TAILP "Ltailp" '(T T) 'T NIL T)
42    (DEFSYSFUN 'CONSP "Lconsp" '(T) 'T NIL T)
43    (DEFSYSFUN 'LISTP "Llistp" '(T) 'T NIL T)
44    (DEFSYSFUN 'MAPCAN "Lmapcan" '(T T *) 'T NIL NIL)
45    (DEFSYSFUN 'LENGTH "Llength" '(T) 'FIXNUM T NIL)
46    (DEFSYSFUN 'RASSOC "Lrassoc" '(T T *) 'T NIL NIL)
47    (DEFSYSFUN 'PPRINT "Lpprint" '(T *) 'T NIL NIL)
48    (DEFSYSFUN 'PATHNAME-HOST "Lpathname_host" '(T) 'T NIL NIL)
49    (DEFSYSFUN 'NSUBST-IF-NOT "Lnsubst_if_not" '(T T T *) 'T NIL NIL)
50    (DEFSYSFUN 'FILE-POSITION "Lfile_position" '(T *) 'T NIL NIL)
51    (DEFSYSFUN 'STRING< "Lstring_l" '(T T *) 'T NIL T)
52    (DEFSYSFUN 'REVERSE "Lreverse" '(T) 'T NIL NIL)
53    (DEFSYSFUN 'STREAMP "Lstreamp" '(T) 'T NIL T)
54    (DEFSYSFUN 'SYSTEM::PUTPROP "siLputprop" '(T T T) 'T NIL NIL)
55    (DEFSYSFUN 'REMPROP "Lremprop" '(T T) 'T NIL NIL)
56    (DEFSYSFUN 'SYMBOL-PACKAGE "Lsymbol_package" '(T) 'T NIL NIL)
57    (DEFSYSFUN 'NSTRING-UPCASE "Lnstring_upcase" '(T *) 'STRING NIL NIL)
58    (DEFSYSFUN 'STRING>= "Lstring_ge" '(T T *) 'T NIL T)
59    (DEFSYSFUN 'REALPART "Lrealpart" '(T) 'T NIL NIL)
60    ;;broken on suns..
61    ;(DEFSYSFUN 'USER-HOMEDIR-PATHNAME "Luser_homedir_pathname" '(*) 'T NIL
62    ;    NIL)
63    (DEFSYSFUN 'NBUTLAST "Lnbutlast" '(T *) 'T NIL NIL)
64    (DEFSYSFUN 'ARRAY-DIMENSION "Larray_dimension" '(T T) 'FIXNUM NIL NIL)
65    (DEFSYSFUN 'CDR "Lcdr" '(T) 'T NIL NIL)
66    (DEFSYSFUN 'EQL "Leql" '(T T) 'T NIL T)
67    (DEFSYSFUN 'LOG "Llog" '(T *) 'T NIL NIL)
68    (DEFSYSFUN 'DIRECTORY "Ldirectory" '(T) 'T NIL NIL)
69    (DEFSYSFUN 'STRING-NOT-EQUAL "Lstring_not_equal" '(T T *) 'T NIL T)
70    (DEFSYSFUN 'SHADOWING-IMPORT "Lshadowing_import" '(T *) 'T NIL NIL)
71    (DEFSYSFUN 'MAPC "Lmapc" '(T T *) 'T NIL NIL)
72    (DEFSYSFUN 'MAPL "Lmapl" '(T T *) 'T NIL NIL)
73    (DEFSYSFUN 'MAKUNBOUND "Lmakunbound" '(T) 'T NIL NIL)
74    (DEFSYSFUN 'CONS "Lcons" '(T T) 'T NIL NIL)
75    (DEFSYSFUN 'LIST "Llist" '(*) 'T NIL NIL)
76    (DEFSYSFUN 'USE-PACKAGE "Luse_package" '(T *) 'T NIL NIL)
77    (DEFSYSFUN 'FILE-LENGTH "Lfile_length" '(T) 'T NIL NIL)
78    (DEFSYSFUN 'MAKE-SYMBOL "Lmake_symbol" '(T) 'T NIL NIL)
79    (DEFSYSFUN 'STRING-RIGHT-TRIM "Lstring_right_trim" '(T T) 'STRING NIL
80        NIL)
81    (DEFSYSFUN 'ENOUGH-NAMESTRING "Lenough_namestring" '(T *) 'STRING NIL
82        NIL)
83    (DEFSYSFUN 'PRINT "Lprint" '(T *) 'T NIL NIL)
84    (DEFSYSFUN 'CDDAAR "Lcddaar" '(T) 'T NIL NIL)
85    (DEFSYSFUN 'CDADAR "Lcdadar" '(T) 'T NIL NIL)
86    (DEFSYSFUN 'CDAADR "Lcdaadr" '(T) 'T NIL NIL)
87    (DEFSYSFUN 'CADDAR "Lcaddar" '(T) 'T NIL NIL)
88    (DEFSYSFUN 'CADADR "Lcadadr" '(T) 'T NIL NIL)
89    (DEFSYSFUN 'CAADDR "Lcaaddr" '(T) 'T NIL NIL)
90    (DEFSYSFUN 'SET-MACRO-CHARACTER "Lset_macro_character" '(T T *) 'T NIL
91        NIL)
92    (DEFSYSFUN 'FORCE-OUTPUT "Lforce_output" '(*) 'T NIL NIL)
93    (DEFSYSFUN 'NTHCDR "Lnthcdr" '(T T) 'T NIL NIL)
94    (DEFSYSFUN 'LOGIOR "Llogior" '(*) 'T NIL NIL)
95    (DEFSYSFUN 'CHAR-DOWNCASE "Lchar_downcase" '(T) 'CHARACTER NIL NIL)
96    (DEFSYSFUN 'STRING-CHAR-P "Lstring_char_p" '(T) 'T NIL T)
97    (DEFSYSFUN 'STREAM-ELEMENT-TYPE "Lstream_element_type" '(T) 'T NIL NIL)
98    (DEFSYSFUN 'PACKAGE-USED-BY-LIST "Lpackage_used_by_list" '(T) 'T NIL
99        NIL)
100    (DEFSYSFUN '/ "Ldivide" '(T *) 'T NIL NIL)
101    (DEFSYSFUN 'MAPHASH "Lmaphash" '(T T) 'T NIL NIL)
102    (DEFSYSFUN 'STRING= "Lstring_eq" '(T T *) 'T NIL T)
103    (DEFSYSFUN 'PAIRLIS "Lpairlis" '(T T *) 'T NIL NIL)
104    (DEFSYSFUN 'SYMBOLP "Lsymbolp" '(T) 'T NIL T)
105    (DEFSYSFUN 'CHAR-NOT-LESSP "Lchar_not_lessp" '(T *) 'T NIL T)
106    (DEFSYSFUN '1+ "Lone_plus" '(T) 'T NIL NIL)
107    (DEFSYSFUN 'BY "Lby" 'NIL 'T NIL NIL)
108    (DEFSYSFUN 'NSUBST-IF "Lnsubst_if" '(T T T *) 'T NIL NIL)
109    (DEFSYSFUN 'COPY-LIST "Lcopy_list" '(T) 'T NIL NIL)
110    (DEFSYSFUN 'TAN "Ltan" '(T) 'T NIL NIL)
111    (DEFSYSFUN 'SET "Lset" '(T T) 'T NIL NIL)
112    (DEFSYSFUN 'FUNCTIONP "Lfunctionp" '(T) 'T NIL T)
113    (DEFSYSFUN 'WRITE-BYTE "Lwrite_byte" '(T T) 'T NIL NIL)
114    (DEFSYSFUN 'LAST "Llast" '(T) 'T NIL NIL)
115    (DEFSYSFUN 'MAKE-STRING "Lmake_string" '(T *) 'STRING NIL NIL)
116    (DEFSYSFUN 'CAAAR "Lcaaar" '(T) 'T NIL NIL)
117    (DEFSYSFUN 'LIST-LENGTH "Llist_length" '(T) 'T NIL NIL)
118    (DEFSYSFUN 'CDDDR "Lcdddr" '(T) 'T NIL NIL)
119    (DEFSYSFUN 'PRIN1 "Lprin1" '(T *) 'T NIL NIL)
120    (DEFSYSFUN 'PRINC "Lprinc" '(T *) 'T NIL NIL)
121    (DEFSYSFUN 'LOWER-CASE-P "Llower_case_p" '(T) 'T NIL T)
122    (DEFSYSFUN 'CHAR<= "Lchar_le" '(T *) 'T NIL T)
123    (DEFSYSFUN 'STRING-EQUAL "Lstring_equal" '(T T *) 'T NIL T)
124    (DEFSYSFUN 'CLEAR-OUTPUT "Lclear_output" '(*) 'T NIL NIL)
125    #-clcs (DEFSYSFUN 'CERROR "Lcerror" '(T T *) 'T NIL NIL)
126    (DEFSYSFUN 'TERPRI "Lterpri" '(*) 'T NIL NIL)
127    (DEFSYSFUN 'NSUBST "Lnsubst" '(T T T *) 'T NIL NIL)
128    (DEFSYSFUN 'UNUSE-PACKAGE "Lunuse_package" '(T *) 'T NIL NIL)
129    (DEFSYSFUN 'STRING-NOT-GREATERP "Lstring_not_greaterp" '(T T *) 'T NIL
130        T)
131    (DEFSYSFUN 'STRING> "Lstring_g" '(T T *) 'T NIL T)
132    (DEFSYSFUN 'FINISH-OUTPUT "Lfinish_output" '(*) 'T NIL NIL)
133    (DEFSYSFUN 'SPECIAL-FORM-P "Lspecial_form_p" '(T) 'T NIL T)
134    (DEFSYSFUN 'STRINGP "Lstringp" '(T) 'T NIL T)
135    (DEFSYSFUN 'GET-INTERNAL-RUN-TIME "Lget_internal_run_time" 'NIL 'T NIL
136        NIL)
137    (DEFSYSFUN 'TRUNCATE "Ltruncate" '(T *) '(VALUES T T) NIL NIL)
138    (DEFSYSFUN 'CODE-CHAR "Lcode_char" '(T *) 'CHARACTER NIL NIL)
139    (DEFSYSFUN 'CHAR-CODE "Lchar_code" '(T) 'FIXNUM NIL NIL)
140    (DEFSYSFUN 'SIMPLE-STRING-P "Lsimple_string_p" '(T) 'T NIL T)
141    (DEFSYSFUN 'REVAPPEND "Lrevappend" '(T T) 'T NIL NIL)
142    (DEFSYSFUN 'HASH-TABLE-COUNT "Lhash_table_count" '(T) 'T NIL NIL)
143    (DEFSYSFUN 'PACKAGE-USE-LIST "Lpackage_use_list" '(T) 'T NIL NIL)
144    (DEFSYSFUN 'REM "Lrem" '(T T) 'T NIL NIL)
145    (DEFSYSFUN 'MIN "Lmin" '(T *) 'T NIL NIL)
146    (DEFSYSFUN 'APPLYHOOK "Lapplyhook" '(T T T T *) 'T NIL NIL)
147    (DEFSYSFUN 'EXP "Lexp" '(T) 'T NIL NIL)
148    (DEFSYSFUN 'CHAR-LESSP "Lchar_lessp" '(T *) 'T NIL T)
149    (DEFSYSFUN 'CDAR "Lcdar" '(T) 'T NIL NIL)
150    (DEFSYSFUN 'CADR "Lcadr" '(T) 'T NIL NIL)
151    (DEFSYSFUN 'LIST-ALL-PACKAGES "Llist_all_packages" 'NIL 'T NIL NIL)
152    (DEFSYSFUN 'REST "Lcdr" '(T) 'T NIL NIL)
153    (DEFSYSFUN 'COPY-SYMBOL "Lcopy_symbol" '(T *) 'T NIL NIL)
154    (DEFSYSFUN 'ACONS "Lacons" '(T T T) 'T NIL NIL)
155    (DEFSYSFUN 'ADJUSTABLE-ARRAY-P "Ladjustable_array_p" '(T) 'T NIL T)
156    (DEFSYSFUN 'SVREF "Lsvref" '(T T) 'T NIL NIL)
157    (DEFSYSFUN 'APPLY "Lapply" '(T T *) 'T NIL NIL)
158    (DEFSYSFUN 'DECODE-FLOAT "Ldecode_float" '(T) '(VALUES T T T) NIL NIL)
159    (DEFSYSFUN 'SUBST-IF-NOT "Lsubst_if_not" '(T T T *) 'T NIL NIL)
160    (DEFSYSFUN 'RPLACA "Lrplaca" '(T T) 'T NIL NIL)
161    (DEFSYSFUN 'SYMBOL-PLIST "Lsymbol_plist" '(T) 'T NIL NIL)
162    (DEFSYSFUN 'WRITE-STRING "Lwrite_string" '(T *) 'T NIL NIL)
163    (DEFSYSFUN 'LOGEQV "Llogeqv" '(*) 'T NIL NIL)
164    (DEFSYSFUN 'STRING "Lstring" '(T) 'STRING NIL NIL)
165    (DEFSYSFUN 'STRING-UPCASE "Lstring_upcase" '(T *) 'STRING NIL NIL)
166    (DEFSYSFUN 'CEILING "Lceiling" '(T *) '(VALUES T T) NIL NIL)
167    (DEFSYSFUN 'GETHASH "Lgethash" '(T T *) '(VALUES T T) NIL NIL)
168    (DEFSYSFUN 'TYPE-OF "Ltype_of" '(T) 'T NIL NIL)
169    (DEFSYSFUN 'BUTLAST "Lbutlast" '(T *) 'T NIL NIL)
170    (DEFSYSFUN '1- "Lone_minus" '(T) 'T NIL NIL)
171    (DEFSYSFUN 'MAKE-HASH-TABLE "Lmake_hash_table" '(*) 'T NIL NIL)
172    (DEFSYSFUN 'STRING/= "Lstring_neq" '(T T *) 'T NIL T)
173    (DEFSYSFUN '<= "Lmonotonically_nondecreasing" '(T *) 'T NIL T)
174    (DEFSYSFUN 'MAKE-BROADCAST-STREAM "Lmake_broadcast_stream" '(*) 'T NIL
175        NIL)
176    (DEFSYSFUN 'IMAGPART "Limagpart" '(T) 'T NIL NIL)
177    (DEFSYSFUN 'INTEGERP "Lintegerp" '(T) 'T NIL T)
178    (DEFSYSFUN 'READ-CHAR "Lread_char" '(*) 'T NIL NIL)
179    (DEFSYSFUN 'PEEK-CHAR "Lpeek_char" '(*) 'T NIL NIL)
180    (DEFSYSFUN 'CHAR-FONT "Lchar_font" '(T) 'FIXNUM NIL NIL)
181    (DEFSYSFUN 'STRING-GREATERP "Lstring_greaterp" '(T T *) 'T NIL T)
182    (DEFSYSFUN 'OUTPUT-STREAM-P "Loutput_stream_p" '(T) 'T NIL T)
183    (DEFSYSFUN 'ASH "Lash" '(T T) 'T NIL NIL)
184    (DEFSYSFUN 'LCM "Llcm" '(T *) 'T NIL NIL)
185    (DEFSYSFUN 'ELT "Lelt" '(T T) 'T NIL NIL)
186    (DEFSYSFUN 'COS "Lcos" '(T) 'T NIL NIL)
187    (DEFSYSFUN 'NSTRING-DOWNCASE "Lnstring_downcase" '(T *) 'STRING NIL
188        NIL)
189    (DEFSYSFUN 'COPY-ALIST "Lcopy_alist" '(T) 'T NIL NIL)
190    (DEFSYSFUN 'ATAN "Latan" '(T *) 'T NIL NIL)
191    (DEFSYSFUN 'DELETE-FILE "Ldelete_file" '(T) 'T NIL NIL)
192    (DEFSYSFUN 'FLOAT-RADIX "Lfloat_radix" '(T) 'FIXNUM NIL NIL)
193    (DEFSYSFUN 'SYMBOL-NAME "Lsymbol_name" '(T) 'STRING NIL NIL)
194    (DEFSYSFUN 'CLEAR-INPUT "Lclear_input" '(*) 'T NIL NIL)
195    (DEFSYSFUN 'FIND-SYMBOL "Lfind_symbol" '(T *) '(VALUES T T) NIL NIL)
196    (DEFSYSFUN 'CHAR< "Lchar_l" '(T *) 'T NIL T)
197    (DEFSYSFUN 'HASH-TABLE-P "Lhash_table_p" '(T) 'T NIL T)
198    (DEFSYSFUN 'EVENP "Levenp" '(T) 'T NIL T)
199    (DEFSYSFUN 'SYSTEM::CMOD "siLcmod" '(T) 'T NIL T)
200    (DEFSYSFUN 'SYSTEM::CPLUS "siLcplus" '(T T) 'T NIL T)
201    (DEFSYSFUN 'SYSTEM::CTIMES "siLctimes" '(T T) 'T NIL T)
202    (DEFSYSFUN 'SYSTEM::CDIFFERENCE "siLcdifference" '(T T) 'T NIL T)
203    (DEFSYSFUN 'ZEROP "Lzerop" '(T) 'T NIL T)
204    (DEFSYSFUN 'CAAAAR "Lcaaaar" '(T) 'T NIL NIL)
205    (DEFSYSFUN 'CHAR>= "Lchar_ge" '(T *) 'T NIL T)
206    (DEFSYSFUN 'CDDDAR "Lcdddar" '(T) 'T NIL NIL)
207    (DEFSYSFUN 'CDDADR "Lcddadr" '(T) 'T NIL NIL)
208    (DEFSYSFUN 'CDADDR "Lcdaddr" '(T) 'T NIL NIL)
209    (DEFSYSFUN 'CADDDR "Lcadddr" '(T) 'T NIL NIL)
210    (DEFSYSFUN 'FILL-POINTER "Lfill_pointer" '(T) 'FIXNUM NIL NIL)
211    (DEFSYSFUN 'MAPCAR "Lmapcar" '(T T *) 'T NIL NIL)
212    (DEFSYSFUN 'FLOATP "Lfloatp" '(T) 'T NIL T)
213    (DEFSYSFUN 'SHADOW "Lshadow" '(T *) 'T NIL NIL)
214    (DEFSYSFUN 'MACROEXPAND-1 "Lmacroexpand_1" '(T *) '(VALUES T T) NIL
215        NIL)
216    (DEFSYSFUN 'SXHASH "Lsxhash" '(T) 'FIXNUM NIL NIL)
217    (DEFSYSFUN 'LISTEN "Llisten" '(*) 'T NIL NIL)
218    (DEFSYSFUN 'ARRAYP "Larrayp" '(T) 'T NIL T)
219    (DEFSYSFUN 'MAKE-PATHNAME "Lmake_pathname" '(*) 'T NIL NIL)
220    (DEFSYSFUN 'PATHNAME-TYPE "Lpathname_type" '(T) 'T NIL NIL)
221    (DEFSYSFUN 'FUNCALL "Lfuncall" '(T *) 'T NIL NIL)
222    (DEFSYSFUN 'CLRHASH "Lclrhash" '(T) 'T NIL NIL)
223    (DEFSYSFUN 'GRAPHIC-CHAR-P "Lgraphic_char_p" '(T) 'T NIL T)
224    (DEFSYSFUN 'FBOUNDP "Lfboundp" '(T) 'T NIL T)
225    (DEFSYSFUN 'NSUBLIS "Lnsublis" '(T T *) 'T NIL NIL)
226    (DEFSYSFUN 'CHAR-NOT-EQUAL "Lchar_not_equal" '(T *) 'T NIL T)
227    (DEFSYSFUN 'MACRO-FUNCTION "Lmacro_function" '(T) 'T NIL NIL)
228    (DEFSYSFUN 'SUBST-IF "Lsubst_if" '(T T T *) 'T NIL NIL)
229    (DEFSYSFUN 'COMPLEXP "Lcomplexp" '(T) 'T NIL T)
230    (DEFSYSFUN 'READ-LINE "Lread_line" '(*) '(VALUES T T) NIL NIL)
231    (DEFSYSFUN 'PATHNAMEP "Lpathnamep" '(T) 'T NIL T)
232    (DEFSYSFUN 'MAX "Lmax" '(T *) 'T NIL NIL)
233    (DEFSYSFUN 'IN-PACKAGE "Lin_package" '(T *) 'T NIL NIL)
234    (DEFSYSFUN 'READTABLEP "Lreadtablep" '(T) 'T NIL T)
235    (DEFSYSFUN 'FLOAT-SIGN "Lfloat_sign" '(T *) 'T NIL NIL)
236    (DEFSYSFUN 'CHARACTERP "Lcharacterp" '(T) 'T NIL T)
237    (DEFSYSFUN 'READ "Lread" '(*) 'T NIL NIL)
238    (DEFSYSFUN 'NAMESTRING "Lnamestring" '(T) 'T NIL NIL)
239    (DEFSYSFUN 'UNREAD-CHAR "Lunread_char" '(T *) 'T NIL NIL)
240    (DEFSYSFUN 'CDAAR "Lcdaar" '(T) 'T NIL NIL)
241    (DEFSYSFUN 'CADAR "Lcadar" '(T) 'T NIL NIL)
242    (DEFSYSFUN 'CAADR "Lcaadr" '(T) 'T NIL NIL)
243    (DEFSYSFUN 'CHAR= "Lchar_eq" '(T *) 'T NIL T)
244    (DEFSYSFUN 'ALPHA-CHAR-P "Lalpha_char_p" '(T) 'T NIL T)
245    (DEFSYSFUN 'STRING-TRIM "Lstring_trim" '(T T) 'STRING NIL NIL)
246    (DEFSYSFUN 'MAKE-PACKAGE "Lmake_package" '(T *) 'T NIL NIL)
247    (DEFSYSFUN 'CLOSE "Lclose" '(T *) 'T NIL NIL)
248    (DEFSYSFUN 'DENOMINATOR "Ldenominator" '(T) 'T NIL NIL)
249    (DEFSYSFUN 'FLOAT "Lfloat" '(T *) 'T NIL NIL)
250    (DEFSYSFUN 'FIRST "Lcar" '(T) 'T NIL NIL)
251    (DEFSYSFUN 'ROUND "Lround" '(T *) '(VALUES T T) NIL NIL)
252    (DEFSYSFUN 'SUBST "Lsubst" '(T T T *) 'T NIL NIL)
253    (DEFSYSFUN 'UPPER-CASE-P "Lupper_case_p" '(T) 'T NIL T)
254    (DEFSYSFUN 'ARRAY-ELEMENT-TYPE "Larray_element_type" '(T) 'T NIL NIL)
255    (DEFSYSFUN 'ADJOIN "Ladjoin" '(T T *) 'T NIL NIL)
256    (DEFSYSFUN 'LOGAND "Llogand" '(*) 'T NIL NIL)
257    (DEFSYSFUN 'MAPCON "Lmapcon" '(T T *) 'T NIL NIL)
258    (DEFSYSFUN 'INTERN "Lintern" '(T *) '(VALUES T T) NIL NIL)
259    (DEFSYSFUN 'VALUES "Lvalues" '(*) '* NIL NIL)
260    (DEFSYSFUN 'EXPORT "Lexport" '(T *) 'T NIL NIL)
261    (DEFSYSFUN '* "Ltimes" '(*) 'T NIL NIL)
262    (DEFSYSFUN '< "Lmonotonically_increasing" '(T *) 'T NIL T)
263    (DEFSYSFUN 'COMPLEX "Lcomplex" '(T *) 'T NIL NIL)
264    (DEFSYSFUN 'SET-SYNTAX-FROM-CHAR "Lset_syntax_from_char" '(T T *) 'T
265        NIL NIL)
266    (DEFSYSFUN 'CHAR-BIT "Lchar_bit" '(T T) 'FIXNUM NIL NIL)
267    (DEFSYSFUN 'INTEGER-LENGTH "Linteger_length" '(T) 'FIXNUM NIL NIL)
268    (DEFSYSFUN 'PACKAGEP "Lpackagep" '(T) 'T NIL T)
269    (DEFSYSFUN 'INPUT-STREAM-P "Linput_stream_p" '(T) 'T NIL T)
270    (DEFSYSFUN '>= "Lmonotonically_nonincreasing" '(T *) 'T NIL T)
271    (DEFSYSFUN 'PATHNAME "Lpathname" '(T) 'T NIL NIL)
272    (DEFSYSFUN 'EQ "Leq" '(T T) 'T NIL T)
273    (DEFSYSFUN 'MAKE-CHAR "Lmake_char" '(T *) 'CHARACTER NIL NIL)
274    (DEFSYSFUN 'FILE-NAMESTRING "Lfile_namestring" '(T) 'STRING NIL NIL)
275    (DEFSYSFUN 'CHARACTER "Lcharacter" '(T) 'CHARACTER NIL NIL)
276    (DEFSYSFUN 'SYMBOL-FUNCTION "Lsymbol_function" '(T) 'T NIL NIL)
277    (DEFSYSFUN 'CONSTANTP "Lconstantp" '(T) 'T NIL T)
278    (DEFSYSFUN 'CHAR-EQUAL "Lchar_equal" '(T *) 'T NIL T)
279    (DEFSYSFUN 'TREE-EQUAL "Ltree_equal" '(T T *) 'T NIL T)
280    (DEFSYSFUN 'CDDR "Lcddr" '(T) 'T NIL NIL)
281    (DEFSYSFUN 'GETF "Lgetf" '(T T *) 'T NIL NIL)
282    (DEFSYSFUN 'SAVE "Lsave" '(T) 'T NIL NIL)
283    (DEFSYSFUN 'MAKE-RANDOM-STATE "Lmake_random_state" '(*) 'T NIL NIL)
284    (DEFSYSFUN 'CHAR-NOT-GREATERP "Lchar_not_greaterp" '(T *) 'T NIL T)
285    (DEFSYSFUN 'EXPT "Lexpt" '(T T) 'T NIL NIL)
286    (DEFSYSFUN 'SQRT "Lsqrt" '(T) 'T NIL NIL)
287    (DEFSYSFUN 'SCALE-FLOAT "Lscale_float" '(T T) 'T NIL NIL)
288    (DEFSYSFUN 'CHAR> "Lchar_g" '(T *) 'T NIL T)
289    (DEFSYSFUN 'LDIFF "Lldiff" '(T T) 'T NIL NIL)
290    (DEFSYSFUN 'ASSOC-IF-NOT "Lassoc_if_not" '(T T) 'T NIL NIL)
291    (DEFSYSFUN 'BIT-VECTOR-P "Lbit_vector_p" '(T) 'T NIL T)
292    (DEFSYSFUN 'NSTRING-CAPITALIZE "Lnstring_capitalize" '(T *) 'STRING NIL
293        NIL)
294    (DEFSYSFUN 'SYMBOL-VALUE "Lsymbol_value" '(T) 'T NIL NIL)
295    (DEFSYSFUN 'RPLACD "Lrplacd" '(T T) 'T NIL NIL)
296    (DEFSYSFUN 'BOUNDP "Lboundp" '(T) 'T NIL T)
297    (DEFSYSFUN 'EQUALP "Lequalp" '(T T) 'T NIL T)
298    (DEFSYSFUN 'SIMPLE-BIT-VECTOR-P "Lsimple_bit_vector_p" '(T) 'T NIL T)
299    (DEFSYSFUN 'MEMBER-IF-NOT "Lmember_if_not" '(T T *) 'T NIL NIL)
300    (DEFSYSFUN 'MAKE-TWO-WAY-STREAM "Lmake_two_way_stream" '(T T) 'T NIL
301        NIL)
302    (DEFSYSFUN 'PARSE-INTEGER "Lparse_integer" '(T *) 'T NIL NIL)
303    (DEFSYSFUN '+ "Lplus" '(*) 'T NIL NIL)
304    (DEFSYSFUN '= "Lall_the_same" '(T *) 'T NIL T)
305    (DEFSYSFUN 'GENTEMP "Lgentemp" '(*) 'T NIL NIL)
306    (DEFSYSFUN 'RENAME-PACKAGE "Lrename_package" '(T T *) 'T NIL NIL)
307    (DEFSYSFUN 'COMMONP "Lcommonp" '(T) 'T NIL T)
308    (DEFSYSFUN 'NUMBERP "Lnumberp" '(T) 'T NIL T)
309    (DEFSYSFUN 'COPY-READTABLE "Lcopy_readtable" '(*) 'T NIL NIL)
310    (DEFSYSFUN 'RANDOM-STATE-P "Lrandom_state_p" '(T) 'T NIL T)
311    (DEFSYSFUN 'DIRECTORY-NAMESTRING "Ldirectory_namestring" '(T) 'STRING
312        NIL NIL)
313    (DEFSYSFUN 'STANDARD-CHAR-P "Lstandard_char_p" '(T) 'T NIL T)
314    (DEFSYSFUN 'TRUENAME "Ltruename" '(T) 'T NIL NIL)
315    (DEFSYSFUN 'IDENTITY "Lidentity" '(T) 'T NIL NIL)
316    (DEFSYSFUN 'NREVERSE "Lnreverse" '(T) 'T NIL NIL)
317    (DEFSYSFUN 'PATHNAME-DEVICE "Lpathname_device" '(T) 'T NIL NIL)
318    (DEFSYSFUN 'UNINTERN "Lunintern" '(T *) 'T NIL NIL)
319    (DEFSYSFUN 'UNEXPORT "Lunexport" '(T *) 'T NIL NIL)
320    (DEFSYSFUN 'FLOAT-PRECISION "Lfloat_precision" '(T) 'FIXNUM NIL NIL)
321    (DEFSYSFUN 'STRING-DOWNCASE "Lstring_downcase" '(T *) 'STRING NIL NIL)
322    (DEFSYSFUN 'CAR "Lcar" '(T) 'T NIL NIL)
323    (DEFSYSFUN 'CONJUGATE "Lconjugate" '(T) 'T NIL NIL)
324    (DEFSYSFUN 'NOT "Lnull" '(T) 'T NIL T)
325    (DEFSYSFUN 'READ-CHAR-NO-HANG "Lread_char_no_hang" '(*) 'T NIL NIL)
326    (DEFSYSFUN 'FRESH-LINE "Lfresh_line" '(*) 'T NIL NIL)
327    (DEFSYSFUN 'WRITE-CHAR "Lwrite_char" '(T *) 'T NIL NIL)
328    (DEFSYSFUN 'PARSE-NAMESTRING "Lparse_namestring" '(T *) 'T NIL NIL)
329    (DEFSYSFUN 'STRING-NOT-LESSP "Lstring_not_lessp" '(T T *) 'T NIL T)
330    (DEFSYSFUN 'CHAR "Lchar" '(T T) 'CHARACTER NIL NIL)
331    (DEFSYSFUN 'AREF "Laref" '(T *) 'T NIL NIL)
332    (DEFSYSFUN 'PACKAGE-NICKNAMES "Lpackage_nicknames" '(T) 'T NIL NIL)
333    (DEFSYSFUN 'ENDP "Lendp" '(T) 'T NIL T)
334    (DEFSYSFUN 'ODDP "Loddp" '(T) 'T NIL T)
335    (DEFSYSFUN 'CHAR-UPCASE "Lchar_upcase" '(T) 'CHARACTER NIL NIL)
336    (DEFSYSFUN 'LIST* "LlistA" '(T *) 'T NIL NIL)
337    (DEFSYSFUN 'VALUES-LIST "Lvalues_list" '(T) '* NIL NIL)
338    (DEFSYSFUN 'EQUAL "Lequal" '(T T) 'T NIL T)
339    (DEFSYSFUN 'DIGIT-CHAR-P "Ldigit_char_p" '(T *) 'T NIL NIL)
340    #-clcs (DEFSYSFUN 'ERROR "Lerror" '(T *) 'T NIL NIL)
341    (DEFSYSFUN 'CHAR/= "Lchar_neq" '(T *) 'T NIL T)
342    (DEFSYSFUN 'PATHNAME-DIRECTORY "Lpathname_directory" '(T) 'T NIL NIL)
343    (DEFSYSFUN 'CDAAAR "Lcdaaar" '(T) 'T NIL NIL)
344    (DEFSYSFUN 'CADAAR "Lcadaar" '(T) 'T NIL NIL)
345    (DEFSYSFUN 'CAADAR "Lcaadar" '(T) 'T NIL NIL)
346    (DEFSYSFUN 'CAAADR "Lcaaadr" '(T) 'T NIL NIL)
347    (DEFSYSFUN 'CDDDDR "Lcddddr" '(T) 'T NIL NIL)
348    (DEFSYSFUN 'GET-MACRO-CHARACTER "Lget_macro_character" '(T *) 'T NIL
349        NIL)
350    (DEFSYSFUN 'FORMAT "Lformat" '(T T *) 'T NIL NIL)
351    (DEFSYSFUN 'COMPILED-FUNCTION-P "Lcompiled_function_p" '(T) 'T NIL T)
352    (DEFSYSFUN 'SUBLIS "Lsublis" '(T T *) 'T NIL NIL)
353    (DEFSYSFUN 'PATHNAME-NAME "Lpathname_name" '(T) 'T NIL NIL)
354    (DEFSYSFUN 'IMPORT "Limport" '(T *) 'T NIL NIL)
355    (DEFSYSFUN 'LOGXOR "Llogxor" '(*) 'T NIL NIL)
356    (DEFSYSFUN 'RASSOC-IF-NOT "Lrassoc_if_not" '(T T) 'T NIL NIL)
357    (DEFSYSFUN 'CHAR-GREATERP "Lchar_greaterp" '(T *) 'T NIL T)
358    (DEFSYSFUN 'MAKE-SYNONYM-STREAM "Lmake_synonym_stream" '(T) 'T NIL NIL)
359    (DEFSYSFUN 'ALPHANUMERICP "Lalphanumericp" '(T) 'T NIL T)
360    (DEFSYSFUN 'REMHASH "Lremhash" '(T T) 'T NIL NIL)
361    (DEFSYSFUN 'NRECONC "Lreconc" '(T T) 'T NIL NIL)
362    (DEFSYSFUN '> "Lmonotonically_decreasing" '(T *) 'T NIL T)
363    (DEFSYSFUN 'LOGBITP "Llogbitp" '(T T) 'T NIL T)
364    (DEFSYSFUN 'MAPLIST "Lmaplist" '(T T *) 'T NIL NIL)
365    (DEFSYSFUN 'VECTORP "Lvectorp" '(T) 'T NIL T)
366    (DEFSYSFUN 'ASSOC-IF "Lassoc_if" '(T T) 'T NIL NIL)
367    (DEFSYSFUN 'GET-PROPERTIES "Lget_properties" '(T T) '* NIL NIL)
368    (DEFSYSFUN 'STRING<= "Lstring_le" '(T T *) 'T NIL T)
369    (DEFSYSFUN 'EVALHOOK "Levalhook" '(T T T *) 'T NIL NIL)
370    (DEFSYSFUN 'FILE-WRITE-DATE "Lfile_write_date" '(T) 'T NIL NIL)
371    (DEFSYSFUN 'LOGCOUNT "Llogcount" '(T) 'T NIL NIL)
372    (DEFSYSFUN 'MERGE-PATHNAMES "Lmerge_pathnames" '(T *) 'T NIL NIL)
373    (DEFSYSFUN 'MEMBER-IF "Lmember_if" '(T T *) 'T NIL NIL)
374    (DEFSYSFUN 'READ-BYTE "Lread_byte" '(T *) 'T NIL NIL)
375    (DEFSYSFUN 'SIMPLE-VECTOR-P "Lsimple_vector_p" '(T) 'T NIL T)
376    (DEFSYSFUN 'CHAR-BITS "Lchar_bits" '(T) 'FIXNUM NIL NIL)
377    (DEFSYSFUN 'COPY-TREE "Lcopy_tree" '(T) 'T NIL NIL)
378    (DEFSYSFUN 'GCD "Lgcd" '(*) 'T NIL NIL)
379    (DEFSYSFUN 'BYE "Lby" 'NIL 'T NIL NIL)
380    ;(DEFSYSFUN 'QUIT "Lquit" 'NIL 'T NIL NIL)
381    ;(DEFSYSFUN 'EXIT "Lexit" 'NIL 'T NIL NIL)
382    (DEFSYSFUN 'GET "Lget" '(T T *) 'T NIL NIL)
383    (DEFSYSFUN 'MOD "Lmod" '(T T) 'T NIL NIL)
384    (DEFSYSFUN 'DIGIT-CHAR "Ldigit_char" '(T *) 'CHARACTER NIL NIL)
385    (DEFSYSFUN 'PROBE-FILE "Lprobe_file" '(T) 'T NIL NIL)
386    (DEFSYSFUN 'STRING-LEFT-TRIM "Lstring_left_trim" '(T T) 'STRING NIL
387        NIL)
388    (DEFSYSFUN 'PATHNAME-VERSION "Lpathname_version" '(T) 'T NIL NIL)
389    (DEFSYSFUN 'WRITE-LINE "Lwrite_line" '(T *) 'T NIL NIL)
390    (DEFSYSFUN 'EVAL "Leval" '(T) 'T NIL NIL)
391    (DEFSYSFUN 'ATOM "Latom" '(T) 'T NIL T)
392    (DEFSYSFUN 'CDDAR "Lcddar" '(T) 'T NIL NIL)
393    (DEFSYSFUN 'CDADR "Lcdadr" '(T) 'T NIL NIL)
394    (DEFSYSFUN 'CADDR "Lcaddr" '(T) 'T NIL NIL)
395    (DEFSYSFUN 'FMAKUNBOUND "Lfmakunbound" '(T) 'T NIL NIL)
396    (DEFSYSFUN 'SLEEP "Lsleep" '(T) 'T NIL NIL)
397    (DEFSYSFUN 'PACKAGE-NAME "Lpackage_name" '(T) 'T NIL NIL)
398    (DEFSYSFUN 'FIND-PACKAGE "Lfind_package" '(T) 'T NIL NIL)
399    (DEFSYSFUN 'ASSOC "Lassoc" '(T T *) 'T NIL NIL)
400    (DEFSYSFUN 'SET-CHAR-BIT "Lset_char_bit" '(T T T) 'CHARACTER NIL NIL)
401    (DEFSYSFUN 'FLOOR "Lfloor" '(T *) '(VALUES T T) NIL NIL)
402    (DEFSYSFUN 'WRITE "Lwrite" '(T *) 'T NIL NIL)
403    (DEFSYSFUN 'PLUSP "Lplusp" '(T) 'T NIL T)
404    (DEFSYSFUN 'FLOAT-DIGITS "Lfloat_digits" '(T) 'FIXNUM NIL NIL)
405    (DEFSYSFUN 'READ-DELIMITED-LIST "Lread_delimited_list" '(T *) 'T NIL
406        NIL)
407    (DEFSYSFUN 'APPEND "Lappend" '(*) 'T NIL NIL)
408    (DEFSYSFUN 'MEMBER "Lmember" '(T T *) 'T NIL NIL)
409    (DEFSYSFUN 'STRING-LESSP "Lstring_lessp" '(T T *) 'T NIL T)
410    (DEFSYSFUN 'RANDOM "Lrandom" '(T *) 'T NIL NIL)
411    (DEFSYSFUN 'SYSTEM::SPECIALP "siLspecialp" '(T) 'T NIL T)
412    (DEFSYSFUN 'SYSTEM::OUTPUT-STREAM-STRING "siLoutput_stream_string" '(T)
413        'T NIL NIL)
414    ;#-clcs (DEFSYSFUN 'SYSTEM::ERROR-SET "siLerror_set" '(T) '* NIL NIL)
415    (DEFSYSFUN 'SYSTEM::STRUCTUREP "siLstructurep" '(T) 'T NIL T)
416    (DEFSYSFUN 'SYSTEM::COPY-STREAM "siLcopy_stream" '(T T) 'T NIL NIL)
417    (DEFSYSFUN 'SYSTEM::INIT-SYSTEM "siLinit_system" 'NIL 'T NIL NIL)
418    (DEFSYSFUN 'SYSTEM::STRING-TO-OBJECT "siLstring_to_object" '(T) 'T NIL
419        NIL)
420    (DEFSYSFUN 'SYSTEM::RESET-STACK-LIMITS "siLreset_stack_limits" 'NIL 'T
421        NIL NIL)
422    (DEFSYSFUN 'SYSTEM::DISPLACED-ARRAY-P "siLdisplaced_array_p" '(T) 'T NIL
423        T)
424    (DEFSYSFUN 'SYSTEM::RPLACA-NTHCDR "siLrplaca_nthcdr" NIL T NIL NIL)
425    (DEFSYSFUN 'SYSTEM::LIST-NTH "siLlist_nth" NIL T NIL NIL)
426    ;(DEFSYSFUN 'SYSTEM::MAKE-PURE-ARRAY "siLmake_pure_array" NIL T NIL NIL)
427    (DEFSYSFUN 'SYSTEM::MAKE-VECTOR "siLmake_vector" NIL 'VECTOR NIL NIL)
428    ;(DEFSYSFUN 'SYSTEM::ARRAY-DISPLACEMENT "siLarray_displacement" NIL T NIL NIL)
429    (DEFSYSFUN 'SYSTEM::ASET "siLaset" '(ARRAY *) NIL NIL NIL)
430    (DEFSYSFUN 'SYSTEM::SVSET "siLsvset" '(SIMPLE-VECTOR FIXNUM T) T NIL
431        NIL)
432    (DEFSYSFUN 'SYSTEM::FILL-POINTER-SET "siLfill_pointer_set"
433        '(VECTOR FIXNUM) 'FIXNUM NIL NIL)
434    (DEFSYSFUN 'SYSTEM::REPLACE-ARRAY "siLreplace_array" NIL T NIL NIL)
435    (DEFSYSFUN 'SYSTEM::FSET "siLfset" '(SYMBOL T) NIL NIL NIL)
436    (DEFSYSFUN 'SYSTEM::HASH-SET "siLhash_set" NIL T NIL NIL)
437    (DEFSYSFUN 'BOOLE3 "Lboole" NIL T NIL NIL)
438    (DEFSYSFUN 'SYSTEM::PACKAGE-INTERNAL "siLpackage_internal" NIL T NIL
439        NIL)
440    (DEFSYSFUN 'SYSTEM::PACKAGE-EXTERNAL "siLpackage_external" NIL T NIL
441        NIL)
442    (DEFSYSFUN 'SYSTEM::ELT-SET "siLelt_set" '(SEQUENCE FIXNUM T) T NIL NIL)
443    (DEFSYSFUN 'SYSTEM::CHAR-SET "siLchar_set" '(STRING FIXNUM CHARACTER)
444        'CHARACTER NIL NIL)
445    (DEFSYSFUN 'SYSTEM::MAKE-STRUCTURE "siLmake_structure" NIL T NIL NIL)
446    (DEFSYSFUN 'SYSTEM::STRUCTURE-NAME "siLstructure_name" '(T) 'SYMBOL NIL
447        NIL)
448    (DEFSYSFUN 'SYSTEM::STRUCTURE-REF "siLstructure_ref" '(T T FIXNUM) T NIL
449        NIL)
450    (DEFSYSFUN 'SYSTEM::STRUCTURE-SET "siLstructure_set" '(T T FIXNUM T) T
451        NIL NIL)
452    (DEFSYSFUN 'SYSTEM::PUT-F "siLput_f" NIL '(T T) NIL NIL)
453    (DEFSYSFUN 'SYSTEM::REM-F "siLrem_f" NIL '(T T) NIL NIL)
454    (DEFSYSFUN 'SYSTEM::SET-SYMBOL-PLIST "siLset_symbol_plist" '(SYMBOL T) T
455        NIL NIL)
456    (DEFSYSFUN 'SI::BIT-ARRAY-OP "siLbit_array_op" NIL T NIL NIL)
457    
458    
459    
460    
461    

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

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