/[gcl]/gcl/h/protoize.h
ViewVC logotype

Diff of /gcl/h/protoize.h

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

revision 1.28 by camm, Fri Aug 29 20:51:03 2003 UTC revision 1.29 by camm, Sun Sep 14 02:43:02 2003 UTC
# Line 9  Line 9 
9  /* alloc.c:480:OF */ extern void insert_contblock (char *p, int s); /* (p, s) char *p; int s; */  /* alloc.c:480:OF */ extern void insert_contblock (char *p, int s); /* (p, s) char *p; int s; */
10  /* alloc.c:480:OF */ extern void insert_maybe_sgc_contblock (char *p, int s); /* (p, s) char *p; int s; */  /* alloc.c:480:OF */ extern void insert_maybe_sgc_contblock (char *p, int s); /* (p, s) char *p; int s; */
11  /* alloc.c:611:OF */ extern void set_maxpage (void); /* () */  /* alloc.c:611:OF */ extern void set_maxpage (void); /* () */
12  /* alloc.c:635:OF */ extern void init_alloc (void); /* () */  /* alloc.c:635:OF */ extern void gcl_init_alloc (void); /* () */
13  /* alloc.c:737:OF */ extern object fSstaticp (object x); /* (x) object x; */  /* alloc.c:737:OF */ extern object fSstaticp (object x); /* (x) object x; */
14  /* alloc.c:822:OF */ extern object fSallocate_sgc (object type,fixnum min,fixnum max,fixnum free_percent); /* (type, min, max, free_percent) object type; int min; int max; int free_percent; */  /* alloc.c:822:OF */ extern object fSallocate_sgc (object type,fixnum min,fixnum max,fixnum free_percent); /* (type, min, max, free_percent) object type; int min; int max; int free_percent; */
15  /* alloc.c:846:OF */ extern object fSallocate_growth (object type,fixnum min,fixnum max,fixnum percent,fixnum percent_free); /* (type, min, max, percent, percent_free) object type; int min; int max; int percent; int percent_free; */  /* alloc.c:846:OF */ extern object fSallocate_growth (object type,fixnum min,fixnum max,fixnum percent,fixnum percent_free); /* (type, min, max, percent, percent_free) object type; int min; int max; int percent; int percent_free; */
# Line 17  Line 17 
17  /* alloc.c:918:OF */ extern object fSmaximum_contiguous_pages (void); /* () */  /* alloc.c:918:OF */ extern object fSmaximum_contiguous_pages (void); /* () */
18  /* alloc.c:958:OF */ extern object fSallocated_relocatable_pages (void); /* () */  /* alloc.c:958:OF */ extern object fSallocated_relocatable_pages (void); /* () */
19  /* alloc.c:965:OF */ extern object fSget_hole_size (void); /* () */  /* alloc.c:965:OF */ extern object fSget_hole_size (void); /* () */
20  /* alloc.c:1000:OF */ extern void init_alloc_function (void); /* () */  /* alloc.c:1000:OF */ extern void gcl_init_alloc_function (void); /* () */
21  /* alloc.c:1126:OF */ extern void free (void *ptr); /* (ptr) void *ptr; */  /* alloc.c:1126:OF */ extern void free (void *ptr); /* (ptr) void *ptr; */
22  /* array.c:57:OF */ extern void Laref (void); /* () */  /* array.c:57:OF */ extern void Laref (void); /* () */
23  /* array.c:126:OF */ extern object fLsvref (object x, ufixnum i); /* (x, i) object x; unsigned int i; */  /* array.c:126:OF */ extern object fLsvref (object x, ufixnum i); /* (x, i) object x; unsigned int i; */
# Line 52  Line 52 
52  /* array.c:1093:OF */ extern object fSreplace_array (object old, object new); /* (old, new) object old; object new; */  /* array.c:1093:OF */ extern object fSreplace_array (object old, object new); /* (old, new) object old; object new; */
53  /* array.c:1132:OF */ extern object fLarray_total_size (object x); /* (x) object x; */  /* array.c:1132:OF */ extern object fLarray_total_size (object x); /* (x) object x; */
54  /* array.c:1140:OF */ extern object fSaset_by_cursor (object array, object val, object cursor); /* (array, val, cursor) object array; object val; object cursor; */  /* array.c:1140:OF */ extern object fSaset_by_cursor (object array, object val, object cursor); /* (array, val, cursor) object array; object val; object cursor; */
55  /* array.c:1160:OF */ extern void init_array_function (void); /* () */  /* array.c:1160:OF */ extern void gcl_init_array_function (void); /* () */
56  /* assignment.c:62:OF */ extern void setq (object sym, object val); /* (sym, val) object sym; object val; */  /* assignment.c:62:OF */ extern void setq (object sym, object val); /* (sym, val) object sym; object val; */
57  /* assignment.c:128:OF */ extern void Lset (void); /* () */  /* assignment.c:128:OF */ extern void Lset (void); /* () */
58  /* assignment.c:130:OF */ extern object fLset (object symbol, object value); /* (symbol, value) object symbol; object value; */  /* assignment.c:130:OF */ extern object fLset (object symbol, object value); /* (symbol, value) object symbol; object value; */
# Line 63  Line 63 
63  /* assignment.c:230:OF */ extern object fLfmakunbound (object sym); /* (sym) object sym; */  /* assignment.c:230:OF */ extern object fLfmakunbound (object sym); /* (sym) object sym; */
64  /* assignment.c:547:OF */ extern object clear_compiler_properties (object sym, object code); /* (sym, code) object sym; object code; */  /* assignment.c:547:OF */ extern object clear_compiler_properties (object sym, object code); /* (sym, code) object sym; object code; */
65  /* assignment.c:563:OF */ extern object fSclear_compiler_properties (object x0, object x1); /* (x0, x1) object x0; object x1; */  /* assignment.c:563:OF */ extern object fSclear_compiler_properties (object x0, object x1); /* (x0, x1) object x0; object x1; */
66  /* assignment.c:591:OF */ extern void init_assignment (void); /* () */  /* assignment.c:591:OF */ extern void gcl_init_assignment (void); /* () */
67  /* backq.c:259:OF */ extern int backq_car (object x); /* (x) object x; */  /* backq.c:259:OF */ extern int backq_car (object x); /* (x) object x; */
68  /* backq.c:381:OF */ extern void init_backq (void); /* () */  /* backq.c:381:OF */ extern void gcl_init_backq (void); /* () */
69  /* bds.c:31:OF */ extern void bds_unwind (bds_ptr new_bds_top); /* (new_bds_top) bds_ptr new_bds_top; */  /* bds.c:31:OF */ extern void bds_unwind (bds_ptr new_bds_top); /* (new_bds_top) bds_ptr new_bds_top; */
70  /* big.c:53:OF */ extern object fSset_gmp_allocate_relocatable (object flag); /* (flag) object flag; */  /* big.c:53:OF */ extern object fSset_gmp_allocate_relocatable (object flag); /* (flag) object flag; */
71  /* gmp_big.c:96:OF */ extern void init_big1 (void); /* () */  /* gmp_big.c:96:OF */ extern void gcl_init_big1 (void); /* () */
72  /* gmp_big.c:108:OF */ extern object new_bignum (void); /* () */  /* gmp_big.c:108:OF */ extern object new_bignum (void); /* () */
73  /* gmp_big.c:161:OF */ extern object make_integer (__mpz_struct *u); /* (u) __mpz_struct *u; */  /* gmp_big.c:161:OF */ extern object make_integer (__mpz_struct *u); /* (u) __mpz_struct *u; */
74  /* gmp_big.c:207:OF */ extern int big_compare (object x, object y); /* (x, y) object x; object y; */  /* gmp_big.c:207:OF */ extern int big_compare (object x, object y); /* (x, y) object x; object y; */
# Line 82  Line 82 
82  /* gmp_big.c:472:OF */ extern object bignum2 (unsigned int h, unsigned int l); /* (h, l) unsigned int h; unsigned int l; */  /* gmp_big.c:472:OF */ extern object bignum2 (unsigned int h, unsigned int l); /* (h, l) unsigned int h; unsigned int l; */
83  /* gmp_big.c:482:OF */ extern void integer_quotient_remainder_1 (object x, object y, object *qp, object *rp); /* (x, y, qp, rp) object x; object y; object *qp; object *rp; */  /* gmp_big.c:482:OF */ extern void integer_quotient_remainder_1 (object x, object y, object *qp, object *rp); /* (x, y, qp, rp) object x; object y; object *qp; object *rp; */
84  /* gmp_big.c:502:OF */ extern object coerce_big_to_string (object x, int printbase); /* (x, printbase) object x; int printbase; */  /* gmp_big.c:502:OF */ extern object coerce_big_to_string (object x, int printbase); /* (x, printbase) object x; int printbase; */
85  /* gmp_big.c:521:OF */ extern void init_big (void); /* () */  /* gmp_big.c:521:OF */ extern void gcl_init_big (void); /* () */
86  /* big.c:72:OF */ extern int big_sign (object x); /* (x) object x; */  /* big.c:72:OF */ extern int big_sign (object x); /* (x) object x; */
87  /* big.c:78:OF */ extern void set_big_sign (object x, int sign); /* (x, sign) object x; int sign; */  /* big.c:78:OF */ extern void set_big_sign (object x, int sign); /* (x, sign) object x; int sign; */
88  /* big.c:85:OF */ extern void zero_big (object x); /* (x) object x; */  /* big.c:85:OF */ extern void zero_big (object x); /* (x) object x; */
# Line 101  struct key {short n,allow_other_keys; Line 101  struct key {short n,allow_other_keys;
101  /* bind.c:866:OF */ extern int parse_key_new_new (int n, object *base, struct key *keys, object first, va_list ap); /* (n, base, keys, ap) int n; object *base; struct key *keys; va_list ap; */  /* bind.c:866:OF */ extern int parse_key_new_new (int n, object *base, struct key *keys, object first, va_list ap); /* (n, base, keys, ap) int n; object *base; struct key *keys; va_list ap; */
102  /* bind.c:916:OF */ extern int parse_key_rest_new (object rest, int n, object *base, struct key *keys, object first, va_list ap); /* (rest, n, base, keys, ap) object rest; int n; object *base; struct key *keys; va_list ap; */  /* bind.c:916:OF */ extern int parse_key_rest_new (object rest, int n, object *base, struct key *keys, object first, va_list ap); /* (rest, n, base, keys, ap) object rest; int n; object *base; struct key *keys; va_list ap; */
103  /* bind.c:975:OF */ extern void set_key_struct (struct key *ks, object data); /* (ks, data) struct key *ks; object data; */  /* bind.c:975:OF */ extern void set_key_struct (struct key *ks, object data); /* (ks, data) struct key *ks; object data; */
104  /* bind.c:995:OF */ extern void init_bind (void); /* () */  /* bind.c:995:OF */ extern void gcl_init_bind (void); /* () */
105  /* block.c:121:OF */ extern void init_block (void); /* () */  /* block.c:121:OF */ extern void gcl_init_block (void); /* () */
106  /* bsearch.c:5:OF */ extern void *bsearch (const void *key, const void *base, size_t nel, size_t keysize, int (*compar) (const void *,const void *)); /* (key, base, nel, keysize, compar) char *key; char *base; unsigned int nel; unsigned int keysize; int (*compar)(); */  /* bsearch.c:5:OF */ extern void *bsearch (const void *key, const void *base, size_t nel, size_t keysize, int (*compar) (const void *,const void *)); /* (key, base, nel, keysize, compar) char *key; char *base; unsigned int nel; unsigned int keysize; int (*compar)(); */
107  #if defined (__MINGW32__)  #if defined (__MINGW32__)
108  /* bzero.c:3:OF */ /*  extern void bzero (char *b, size_t length); */ /* (b, length) char *b; int length; */  /* bzero.c:3:OF */ /*  extern void bzero (char *b, size_t length); */ /* (b, length) char *b; int length; */
109  #endif  #endif
110  /* catch.c:61:OF */ extern object fSerror_set (object x0); /* (x0) object x0; */  /* catch.c:61:OF */ extern object fSerror_set (object x0); /* (x0) object x0; */
111  /* catch.c:166:OF */ extern void init_catch (void); /* () */  /* catch.c:166:OF */ extern void gcl_init_catch (void); /* () */
112  /* cfun.c:37:OF */ extern object make_cfun (void (*self)(), object name, object data, char *start, int size); /* (self, name, data, start, size) int (*self)(); object name; object data; char *start; int size; */  /* cfun.c:37:OF */ extern object make_cfun (void (*self)(), object name, object data, char *start, int size); /* (self, name, data, start, size) int (*self)(); object name; object data; char *start; int size; */
113  /* cfun.c:56:OF */ extern object make_sfun (object name, object (*self)(), int argd, object data); /* (name, self, argd, data) object name; int (*self)(); int argd; object data; */  /* cfun.c:56:OF */ extern object make_sfun (object name, object (*self)(), int argd, object data); /* (name, self, argd, data) object name; int (*self)(); int argd; object data; */
114  /* cfun.c:91:OF */ extern object make_cclosure_new (void (*self)(), object name, object env, object data); /* (self, name, env, data) int (*self)(); object name; object env; object data; */  /* cfun.c:91:OF */ extern object make_cclosure_new (void (*self)(), object name, object env, object data); /* (self, name, env, data) int (*self)(); object name; object env; object data; */
# Line 126  struct key {short n,allow_other_keys; Line 126  struct key {short n,allow_other_keys;
126  /* cfun.c:352:OF */ extern object fScompiled_function_name (object fun); /* (fun) object fun; */  /* cfun.c:352:OF */ extern object fScompiled_function_name (object fun); /* (fun) object fun; */
127  /* cfun.c:371:OF */ extern void turbo_closure (object fun); /* (fun) object fun; */  /* cfun.c:371:OF */ extern void turbo_closure (object fun); /* (fun) object fun; */
128  /* cfun.c:392:OF */ extern object fSturbo_closure (object funobj); /* (funobj) object funobj; */  /* cfun.c:392:OF */ extern object fSturbo_closure (object funobj); /* (funobj) object funobj; */
129  /* cfun.c:403:OF */ extern void init_cfun (void); /* () */  /* cfun.c:403:OF */ extern void gcl_init_cfun (void); /* () */
130  /* cmac.c:147:OF */ extern object fScmod (object num); /* (num) object num; */  /* cmac.c:147:OF */ extern object fScmod (object num); /* (num) object num; */
131  /* cmac.c:156:OF */ extern object fScplus (object x0, object x1); /* (x0, x1) object x0; object x1; */  /* cmac.c:156:OF */ extern object fScplus (object x0, object x1); /* (x0, x1) object x0; object x1; */
132  /* cmac.c:165:OF */ extern object fSctimes (object x0, object x1); /* (x0, x1) object x0; object x1; */  /* cmac.c:165:OF */ extern object fSctimes (object x0, object x1); /* (x0, x1) object x0; object x1; */
133  /* cmac.c:175:OF */ extern object fScdifference (object x0, object x1); /* (x0, x1) object x0; object x1; */  /* cmac.c:175:OF */ extern object fScdifference (object x0, object x1); /* (x0, x1) object x0; object x1; */
134  /* cmac.c:191:OF */ extern void init_cmac (void); /* () */  /* cmac.c:191:OF */ extern void gcl_init_cmac (void); /* () */
135  /* cmpaux.c:33:OF */ extern void siLspecialp (void); /* () */  /* cmpaux.c:33:OF */ extern void siLspecialp (void); /* () */
136  /* cmpaux.c:35:OF */ extern object fSspecialp (object sym); /* (sym) object sym; */  /* cmpaux.c:35:OF */ extern object fSspecialp (object sym); /* (sym) object sym; */
137  /* cmpaux.c:73:OF */ extern object fSdebug (object sym, object val); /* (sym, val) object sym; object val; */  /* cmpaux.c:73:OF */ extern object fSdebug (object sym, object val); /* (sym, val) object sym; object val; */
138  /* cmpaux.c:82:OF */ extern object fSsetvv (object index, object val); /* (index, val) object index; object val; */  /* cmpaux.c:82:OF */ extern object fSsetvv (object index, object val); /* (index, val) object index; object val; */
139  /* cmpaux.c:95:OF */ extern void init_cmpaux (void); /* () */  /* cmpaux.c:95:OF */ extern void gcl_init_cmpaux (void); /* () */
140  /* cmpaux.c:106:OF */ extern int ifloor (int x, int y); /* (x, y) int x; int y; */  /* cmpaux.c:106:OF */ extern int ifloor (int x, int y); /* (x, y) int x; int y; */
141  /* cmpaux.c:124:OF */ extern int imod (int x, int y); /* (x, y) int x; int y; */  /* cmpaux.c:124:OF */ extern int imod (int x, int y); /* (x, y) int x; int y; */
142  /* cmpaux.c:185:OF */ extern int object_to_int (object x); /* (x) object x; */  /* cmpaux.c:185:OF */ extern int object_to_int (object x); /* (x) object x; */
# Line 144  struct key {short n,allow_other_keys; Line 144  struct key {short n,allow_other_keys;
144  typedef int (*FUNC)();  typedef int (*FUNC)();
145  /* cmpaux.c:294:OF */ extern void call_init (int init_address, object memory, object fasl_vec, FUNC fptr); /* (init_address, memory, fasl_vec, fptr) int init_address; object memory; object fasl_vec; FUNC fptr; */  /* cmpaux.c:294:OF */ extern void call_init (int init_address, object memory, object fasl_vec, FUNC fptr); /* (init_address, memory, fasl_vec, fptr) int init_address; object memory; object fasl_vec; FUNC fptr; */
146  /* cmpaux.c:339:OF */ extern void do_init (object *statVV); /* (statVV) object *statVV; */  /* cmpaux.c:339:OF */ extern void do_init (object *statVV); /* (statVV) object *statVV; */
147  /* cmpaux.c:416:OF */ extern void init_or_load1 (void (*fn) (void), char *file); /* (fn, file) int (*fn)(); char *file; */  /* cmpaux.c:416:OF */ extern void gcl_init_or_load1 (void (*fn) (void), char *file); /* (fn, file) int (*fn)(); char *file; */
148  /* conditional.c:200:OF */ extern void init_conditional (void); /* () */  /* conditional.c:200:OF */ extern void gcl_init_conditional (void); /* () */
149  /* error.c:38:OF */ extern void terminal_interrupt (int correctable); /* (correctable) int correctable; */  /* error.c:38:OF */ extern void terminal_interrupt (int correctable); /* (correctable) int correctable; */
150  /* error.c:147:OF */ extern void Lerror (void); /* () */  /* error.c:147:OF */ extern void Lerror (void); /* () */
151  /* error.c:164:OF */ extern void Lcerror (void); /* () */  /* error.c:164:OF */ extern void Lcerror (void); /* () */
# Line 193  typedef int (*FUNC)(); Line 193  typedef int (*FUNC)();
193  /* error.c:660:OF */ extern void check_socket (object x); /* (x) object x; */  /* error.c:660:OF */ extern void check_socket (object x); /* (x) object x; */
194  /* error.c:670:OF */ extern void check_stream (object strm); /* (strm) object strm; */  /* error.c:670:OF */ extern void check_stream (object strm); /* (strm) object strm; */
195  /* error.c:697:OF */ extern void check_arg_range (int n, int m); /* (n, m) int n; int m; */  /* error.c:697:OF */ extern void check_arg_range (int n, int m); /* (n, m) int n; int m; */
196  /* error.c:727:OF */ extern void init_error (void); /* () */  /* error.c:727:OF */ extern void gcl_init_error (void); /* () */
197  /* eval.c:143:OF */ extern void funcall (object fun); /* (fun) object fun; */  /* eval.c:143:OF */ extern void funcall (object fun); /* (fun) object fun; */
198  /* eval.c:375:OF */ extern void lispcall (object *funp, int narg); /* (funp, narg) object *funp; int narg; */  /* eval.c:375:OF */ extern void lispcall (object *funp, int narg); /* (funp, narg) object *funp; int narg; */
199  /* eval.c:461:OF */ extern void symlispcall (object sym, object *base, int narg); /* (sym, base, narg) object sym; object *base; int narg; */  /* eval.c:461:OF */ extern void symlispcall (object sym, object *base, int narg); /* (sym, base, narg) object sym; object *base; int narg; */
# Line 213  typedef int (*FUNC)(); Line 213  typedef int (*FUNC)();
213  /* eval.c:1328:OF */ extern object ifuncall2 (object fun, object arg1, object arg2); /* (fun, arg1, arg2) object fun; object arg1; object arg2; */  /* eval.c:1328:OF */ extern object ifuncall2 (object fun, object arg1, object arg2); /* (fun, arg1, arg2) object fun; object arg1; object arg2; */
214  /* eval.c:1348:OF */ extern object ifuncall3 (object fun, object arg1, object arg2, object arg3); /* (fun, arg1, arg2, arg3) object fun; object arg1; object arg2; object arg3; */  /* eval.c:1348:OF */ extern object ifuncall3 (object fun, object arg1, object arg2, object arg3); /* (fun, arg1, arg2, arg3) object fun; object arg1; object arg2; object arg3; */
215  typedef void (*funcvoid)(void);  typedef void (*funcvoid)(void);
216  /* eval.c:1545:OF */ extern void init_eval (void); /* () */  /* eval.c:1545:OF */ extern void gcl_init_eval (void); /* () */
217  /* fasdump.c:1465:OF */ extern object read_fasl_vector (object in); /* (in) object in; */  /* fasdump.c:1465:OF */ extern object read_fasl_vector (object in); /* (in) object in; */
218  /* fat_string.c:29:OF */ extern object fSprofile (object start_address, object scale); /* (start_address, scale) object start_address; object scale; */  /* fat_string.c:29:OF */ extern object fSprofile (object start_address, object scale); /* (start_address, scale) object start_address; object scale; */
219  /* fat_string.c:46:OF */ extern object fSfunction_start (object funobj); /* (funobj) object funobj; */  /* fat_string.c:46:OF */ extern object fSfunction_start (object funobj); /* (funobj) object funobj; */
220  /* fat_string.c:331:OF */ extern object fSdisplay_profile (object start_addr, object scal); /* (start_addr, scal) object start_addr; object scal; */  /* fat_string.c:331:OF */ extern object fSdisplay_profile (object start_addr, object scal); /* (start_addr, scal) object start_addr; object scal; */
221  /* fat_string.c:394:OF */ extern object fSarray_adress (object array); /* (array) object array; */  /* fat_string.c:394:OF */ extern object fSarray_adress (object array); /* (array) object array; */
222  /* fat_string.c:435:OF */ extern void init_fat_string (void); /* () */  /* fat_string.c:435:OF */ extern void gcl_init_fat_string (void); /* () */
223  /* format.c:2084:OF */ extern void Lformat (void); /* () */  /* format.c:2084:OF */ extern void Lformat (void); /* () */
224  /* format.c:2171:OF */ extern void init_format (void); /* () */  /* format.c:2171:OF */ extern void gcl_init_format (void); /* () */
225  /* frame.c:32:OF */ extern void unwind (frame_ptr fr, object tag); /* (fr, tag) frame_ptr fr; object tag; */  /* frame.c:32:OF */ extern void unwind (frame_ptr fr, object tag); /* (fr, tag) frame_ptr fr; object tag; */
226  /* frame.c:58:OF */ extern frame_ptr frs_sch (object frame_id); /* (frame_id) object frame_id; */  /* frame.c:58:OF */ extern frame_ptr frs_sch (object frame_id); /* (frame_id) object frame_id; */
227  /* frame.c:69:OF */ extern frame_ptr frs_sch_catch (object frame_id); /* (frame_id) object frame_id; */  /* frame.c:69:OF */ extern frame_ptr frs_sch_catch (object frame_id); /* (frame_id) object frame_id; */
# Line 230  typedef void (*funcvoid)(void); Line 230  typedef void (*funcvoid)(void);
230  /* funlink.c:230:OF */ extern object c_apply_n (object (*fn)(), int n, object *x); /* (fn, n, x) long int (*fn)(); int n; object *x; */  /* funlink.c:230:OF */ extern object c_apply_n (object (*fn)(), int n, object *x); /* (fn, n, x) long int (*fn)(); int n; object *x; */
231  /* funlink.c:696:OF */ extern object call_proc0 (object sym, void *link); /* (sym, link) object sym; void *link; */  /* funlink.c:696:OF */ extern object call_proc0 (object sym, void *link); /* (sym, link) object sym; void *link; */
232  /* funlink.c:784:OF */ extern int clear_stack (object *beg, object *limit); /* (beg, limit) object *beg; object *limit; */  /* funlink.c:784:OF */ extern int clear_stack (object *beg, object *limit); /* (beg, limit) object *beg; object *limit; */
233  /* funlink.c:821:OF */ extern void init_links (void); /* () */  /* funlink.c:821:OF */ extern void gcl_init_links (void); /* () */
234  /* gbc.c:151:OF */ extern void enter_mark_origin (object *p); /* (p) object *p; */  /* gbc.c:151:OF */ extern void enter_mark_origin (object *p); /* (p) object *p; */
235  /* gbc.c:938:OF */ extern void GBC (enum type t); /* (t) enum type t; */  /* gbc.c:938:OF */ extern void GBC (enum type t); /* (t) enum type t; */
236  /* gbc.c:1326:OF */ extern object fLgbc (object x0); /* (x0) object x0; */  /* gbc.c:1326:OF */ extern object fLgbc (object x0); /* (x0) object x0; */
# Line 244  typedef void (*funcvoid)(void); Line 244  typedef void (*funcvoid)(void);
244  /* sgbc.c:1246:OF */ extern void memory_protect (int on); /* (on) int on; */  /* sgbc.c:1246:OF */ extern void memory_protect (int on); /* (on) int on; */
245  /* sgbc.c:1306:OF */ extern void perm_writable (char *p, int n); /* (p, n) char *p; int n; */  /* sgbc.c:1306:OF */ extern void perm_writable (char *p, int n); /* (p, n) char *p; int n; */
246  /* sgbc.c:1321:OF */ extern void system_error (void); /* () */  /* sgbc.c:1321:OF */ extern void system_error (void); /* () */
247  /* gbc.c:1357:OF */ extern void init_GBC (void); /* () */  /* gbc.c:1357:OF */ extern void gcl_init_GBC (void); /* () */
248  /* gnumalloc.c:286:OF */ extern void malloc_init (char *start, void (*warnfun) (/* ??? */)); /* (start, warnfun) char *start; void (*warnfun)(); */  /* gnumalloc.c:286:OF */ extern void malloc_init (char *start, void (*warnfun) (/* ??? */)); /* (start, warnfun) char *start; void (*warnfun)(); */
249  /* gnumalloc.c:301:OF */ extern int malloc_usable_size (char *mem); /* (mem) char *mem; */  /* gnumalloc.c:301:OF */ extern int malloc_usable_size (char *mem); /* (mem) char *mem; */
250  /* gnumalloc.c:461:OF */ /*  extern void *malloc (size_t n); */ /* (n) unsigned int n; */  /* gnumalloc.c:461:OF */ /*  extern void *malloc (size_t n); */ /* (n) unsigned int n; */
# Line 254  typedef void (*funcvoid)(void); Line 254  typedef void (*funcvoid)(void);
254  /* gnumalloc.c:737:OF */ extern int get_lim_data (void); /* () */  /* gnumalloc.c:737:OF */ extern int get_lim_data (void); /* () */
255  /* grab_defs.c:35:OF */ extern int read_some (char *buf, int n, int start_ch, int copy); /* (buf, n, start_ch, copy) char *buf; int n; int start_ch; int copy; */  /* grab_defs.c:35:OF */ extern int read_some (char *buf, int n, int start_ch, int copy); /* (buf, n, start_ch, copy) char *buf; int n; int start_ch; int copy; */
256  /* grab_defs.c:71:OF */ /*  extern int main (void); */ /* () */  /* grab_defs.c:71:OF */ /*  extern int main (void); */ /* () */
257  /* iteration.c:457:OF */ extern void init_iteration (void); /* () */  /* iteration.c:457:OF */ extern void gcl_init_iteration (void); /* () */
258  /* let.c:29:OF */ extern void let_var_list (object var_list); /* (var_list) object var_list; */  /* let.c:29:OF */ extern void let_var_list (object var_list); /* (var_list) object var_list; */
259  /* let.c:321:OF */ extern void init_let (void); /* () */  /* let.c:321:OF */ extern void gcl_init_let (void); /* () */
260  /* lex.c:34:OF */ extern object assoc_eq (object key, object alist); /* (key, alist) object key; object alist; */  /* lex.c:34:OF */ extern object assoc_eq (object key, object alist); /* (key, alist) object key; object alist; */
261  /* lex.c:47:OF */ extern void lex_fun_bind (object name, object fun); /* (name, fun) object name; object fun; */  /* lex.c:47:OF */ extern void lex_fun_bind (object name, object fun); /* (name, fun) object name; object fun; */
262  /* lex.c:59:OF */ extern void lex_macro_bind (object name, object exp_fun); /* (name, exp_fun) object name; object exp_fun; */  /* lex.c:59:OF */ extern void lex_macro_bind (object name, object exp_fun); /* (name, exp_fun) object name; object exp_fun; */
# Line 264  typedef void (*funcvoid)(void); Line 264  typedef void (*funcvoid)(void);
264  /* lex.c:82:OF */ extern void lex_block_bind (object name, object id); /* (name, id) object name; object id; */  /* lex.c:82:OF */ extern void lex_block_bind (object name, object id); /* (name, id) object name; object id; */
265  /* lex.c:95:OF */ extern object lex_tag_sch (object tag); /* (tag) object tag; */  /* lex.c:95:OF */ extern object lex_tag_sch (object tag); /* (tag) object tag; */
266  /* lex.c:110:OF */ extern object lex_block_sch (object name); /* (name) object name; */  /* lex.c:110:OF */ extern object lex_block_sch (object name); /* (name) object name; */
267  /* lex.c:125:OF */ extern void init_lex (void); /* () */  /* lex.c:125:OF */ extern void gcl_init_lex (void); /* () */
268  /* littleXwin.c:32:OF */ /*  extern Window open_window (void); */ /* () */  /* littleXwin.c:32:OF */ /*  extern Window open_window (void); */ /* () */
269  /* littleXwin.c:102:OF */ /*  extern int close_window (Window the_window); */ /* (the_window) Window the_window; */  /* littleXwin.c:102:OF */ /*  extern int close_window (Window the_window); */ /* (the_window) Window the_window; */
270  /* littleXwin.c:110:OF */ /*  extern int draw_line (Window the_window, int x1, int y1, int x2, int y2); */ /* (the_window, x1, y1, x2, y2) Window the_window; int x1; int y1; int x2; int y2; */  /* littleXwin.c:110:OF */ /*  extern int draw_line (Window the_window, int x1, int y1, int x2, int y2); */ /* (the_window, x1, y1, x2, y2) Window the_window; int x1; int y1; int x2; int y2; */
# Line 285  typedef void (*funcvoid)(void); Line 285  typedef void (*funcvoid)(void);
285  /* macros.c:173:OF */ extern void Lmacroexpand (void); /* () */  /* macros.c:173:OF */ extern void Lmacroexpand (void); /* () */
286  /* macros.c:224:OF */ extern void Lmacroexpand_1 (void); /* () */  /* macros.c:224:OF */ extern void Lmacroexpand_1 (void); /* () */
287  /* macros.c:265:OF */ extern object macro_expand (object form); /* (form) object form; */  /* macros.c:265:OF */ extern object macro_expand (object form); /* (form) object form; */
288  /* macros.c:344:OF */ extern void init_macros (void); /* () */  /* macros.c:344:OF */ extern void gcl_init_macros (void); /* () */
289  /* main.c:111:OF */ extern int main (int argc, char **argv, char **envp); /* (argc, argv, envp) int argc; char **argv; char **envp; */  /* main.c:111:OF */ extern int main (int argc, char **argv, char **envp); /* (argc, argv, envp) int argc; char **argv; char **envp; */
290  /* main.c:346:OF */ extern void install_segmentation_catcher (void); /* () */  /* main.c:346:OF */ extern void install_segmentation_catcher (void); /* () */
291  /* main.c:359:OF */ extern void error (char *s); /* (s) char *s; */  /* main.c:359:OF */ extern void error (char *s); /* (s) char *s; */
# Line 308  typedef void (*funcvoid)(void); Line 308  typedef void (*funcvoid)(void);
308  /* makefun.c:122:OF */ extern void SI_makefun (char *strg, object (*fn) (/* ??? */), unsigned int argd); /* (strg, fn, argd) char *strg; object (*fn)(); unsigned int argd; */  /* makefun.c:122:OF */ extern void SI_makefun (char *strg, object (*fn) (/* ??? */), unsigned int argd); /* (strg, fn, argd) char *strg; object (*fn)(); unsigned int argd; */
309  /* makefun.c:131:OF */ extern void LISP_makefun (char *strg, object (*fn) (/* ??? */), unsigned int argd); /* (strg, fn, argd) char *strg; object (*fn)(); unsigned int argd; */  /* makefun.c:131:OF */ extern void LISP_makefun (char *strg, object (*fn) (/* ??? */), unsigned int argd); /* (strg, fn, argd) char *strg; object (*fn)(); unsigned int argd; */
310  /* makefun.c:167:OF */ extern object fSinvoke (object x); /* (x) object x; */  /* makefun.c:167:OF */ extern object fSinvoke (object x); /* (x) object x; */
311  /* mapfun.c:324:OF */ extern void init_mapfun (void); /* () */  /* mapfun.c:324:OF */ extern void gcl_init_mapfun (void); /* () */
312  /* multival.c:32:OF */ extern void Lvalues (void); /* () */  /* multival.c:32:OF */ extern void Lvalues (void); /* () */
313  /* multival.c:37:OF */ extern void Lvalues_list (void); /* () */  /* multival.c:37:OF */ extern void Lvalues_list (void); /* () */
314  /* multival.c:134:OF */ extern void init_multival (void); /* () */  /* multival.c:134:OF */ extern void gcl_init_multival (void); /* () */
315  /* nfunlink.c:190:OF */ extern object IapplyVector (object fun, int nargs, object *base); /* (fun, nargs, base) object fun; int nargs; object *base; */  /* nfunlink.c:190:OF */ extern object IapplyVector (object fun, int nargs, object *base); /* (fun, nargs, base) object fun; int nargs; object *base; */
316  /* nfunlink.c:269:OF */ extern void Iinvoke_c_function_from_value_stack (object (*f)(), int fargd); /* (f, fargd) object (*f)(); int fargd; */  /* nfunlink.c:269:OF */ extern void Iinvoke_c_function_from_value_stack (object (*f)(), int fargd); /* (f, fargd) object (*f)(); int fargd; */
317  /* nsocket.c:190:OF */ extern int CreateSocket (int port, char *host, int server, char *myaddr, int myport, int async); /* (port, host, server, myaddr, myport, async) int port; char *host; int server; char *myaddr; int myport; int async; */  /* nsocket.c:190:OF */ extern int CreateSocket (int port, char *host, int server, char *myaddr, int myport, int async); /* (port, host, server, myaddr, myport, async) int port; char *host; int server; char *myaddr; int myport; int async; */
# Line 340  typedef void (*funcvoid)(void); Line 340  typedef void (*funcvoid)(void);
340  /* num_arith.c:889:OF */ extern void Lminus (void); /* () */  /* num_arith.c:889:OF */ extern void Lminus (void); /* () */
341  /* num_arith.c:907:OF */ extern void Ltimes (void); /* () */  /* num_arith.c:907:OF */ extern void Ltimes (void); /* () */
342  /* num_arith.c:923:OF */ extern void Ldivide (void); /* () */  /* num_arith.c:923:OF */ extern void Ldivide (void); /* () */
343  /* num_arith.c:1029:OF */ extern void init_num_arith (void); /* () */  /* num_arith.c:1029:OF */ extern void gcl_init_num_arith (void); /* () */
344  /* num_co.c:292:OF */ extern object double_to_integer (double d); /* (d) double d; */  /* num_co.c:292:OF */ extern object double_to_integer (double d); /* (d) double d; */
345  /* num_co.c:372:OF */ extern void Lfloat (void); /* () */  /* num_co.c:372:OF */ extern void Lfloat (void); /* () */
346  /* num_co.c:424:OF */ extern void Lnumerator (void); /* () */  /* num_co.c:424:OF */ extern void Lnumerator (void); /* () */
# Line 355  typedef void (*funcvoid)(void); Line 355  typedef void (*funcvoid)(void);
355  /* num_co.c:1114:OF */ extern void Lcomplex (void); /* () */  /* num_co.c:1114:OF */ extern void Lcomplex (void); /* () */
356  /* num_co.c:1136:OF */ extern void Lrealpart (void); /* () */  /* num_co.c:1136:OF */ extern void Lrealpart (void); /* () */
357  /* num_co.c:1147:OF */ extern void Limagpart (void); /* () */  /* num_co.c:1147:OF */ extern void Limagpart (void); /* () */
358  /* num_co.c:1185:OF */ extern void init_num_co (void); /* () */  /* num_co.c:1185:OF */ extern void gcl_init_num_co (void); /* () */
359  /* num_comp.c:40:OF */ extern int number_compare (object x, object y); /* (x, y) object x; object y; */  /* num_comp.c:40:OF */ extern int number_compare (object x, object y); /* (x, y) object x; object y; */
360  /* num_comp.c:269:OF */ extern void Lmonotonically_increasing (void); /* () */  /* num_comp.c:269:OF */ extern void Lmonotonically_increasing (void); /* () */
361  /* num_comp.c:271:OF */ extern void Lmonotonically_nondecreasing (void); /* () */  /* num_comp.c:271:OF */ extern void Lmonotonically_nondecreasing (void); /* () */
362  /* num_comp.c:272:OF */ extern void Lmonotonically_nonincreasing (void); /* () */  /* num_comp.c:272:OF */ extern void Lmonotonically_nonincreasing (void); /* () */
363  /* num_comp.c:292:OF */ extern void Lmin (void); /* () */  /* num_comp.c:292:OF */ extern void Lmin (void); /* () */
364  /* num_comp.c:309:OF */ extern void init_num_comp (void); /* () */  /* num_comp.c:309:OF */ extern void gcl_init_num_comp (void); /* () */
365  /* num_log.c:224:OF */ extern object shift_integer (object x, int w); /* (x, w) object x; int w; */  /* num_log.c:224:OF */ extern object shift_integer (object x, int w); /* (x, w) object x; int w; */
366  /* num_log.c:258:OF */ extern void Llogior (void); /* () */  /* num_log.c:258:OF */ extern void Llogior (void); /* () */
367  /* num_log.c:279:OF */ extern void Llogxor (void); /* () */  /* num_log.c:279:OF */ extern void Llogxor (void); /* () */
# Line 370  typedef void (*funcvoid)(void); Line 370  typedef void (*funcvoid)(void);
370  /* num_log.c:380:OF */ extern void Llogbitp (void); /* () */  /* num_log.c:380:OF */ extern void Llogbitp (void); /* () */
371  /* num_log.c:420:OF */ extern void Lash (void); /* () */  /* num_log.c:420:OF */ extern void Lash (void); /* () */
372  /* num_log.c:482:OF */ extern void Linteger_length (void); /* () */  /* num_log.c:482:OF */ extern void Linteger_length (void); /* () */
373  /* num_log.c:549:OF */ extern void init_num_log (void); /* () */  /* num_log.c:549:OF */ extern void gcl_init_num_log (void); /* () */
374  /* num_log.c:585:OF */ extern void siLbit_array_op (void); /* () */  /* num_log.c:585:OF */ extern void siLbit_array_op (void); /* () */
375  /* num_pred.c:31:OF */ extern int number_zerop (object x); /* (x) object x; */  /* num_pred.c:31:OF */ extern int number_zerop (object x); /* (x) object x; */
376  /* num_pred.c:67:OF */ extern int number_plusp (object x); /* (x) object x; */  /* num_pred.c:67:OF */ extern int number_plusp (object x); /* (x) object x; */
377  /* num_pred.c:107:OF */ extern int number_minusp (object x); /* (x) object x; */  /* num_pred.c:107:OF */ extern int number_minusp (object x); /* (x) object x; */
378  /* num_pred.c:147:OF */ extern int number_oddp (object x); /* (x) object x; */  /* num_pred.c:147:OF */ extern int number_oddp (object x); /* (x) object x; */
379  /* num_pred.c:161:OF */ extern int number_evenp (object x); /* (x) object x; */  /* num_pred.c:161:OF */ extern int number_evenp (object x); /* (x) object x; */
380  /* num_pred.c:240:OF */ extern void init_num_pred (void); /* () */  /* num_pred.c:240:OF */ extern void gcl_init_num_pred (void); /* () */
381  /* num_rand.c:111:OF */ extern void Lrandom (void); /* () */  /* num_rand.c:111:OF */ extern void Lrandom (void); /* () */
382  /* num_rand.c:151:OF */ extern void init_num_rand (void); /* () */  /* num_rand.c:151:OF */ extern void gcl_init_num_rand (void); /* () */
383  /* num_sfun.c:91:OF */ extern object number_expt (object x, object y); /* (x, y) object x; object y; */  /* num_sfun.c:91:OF */ extern object number_expt (object x, object y); /* (x, y) object x; object y; */
384  /* num_sfun.c:453:OF */ extern void Lexp (void); /* () */  /* num_sfun.c:453:OF */ extern void Lexp (void); /* () */
385  /* num_sfun.c:469:OF */ extern void Llog (void); /* () */  /* num_sfun.c:469:OF */ extern void Llog (void); /* () */
# Line 387  typedef void (*funcvoid)(void); Line 387  typedef void (*funcvoid)(void);
387  /* num_sfun.c:495:OF */ extern void Lsin (void); /* () */  /* num_sfun.c:495:OF */ extern void Lsin (void); /* () */
388  /* num_sfun.c:502:OF */ extern void Lcos (void); /* () */  /* num_sfun.c:502:OF */ extern void Lcos (void); /* () */
389  /* num_sfun.c:516:OF */ extern void Latan (void); /* () */  /* num_sfun.c:516:OF */ extern void Latan (void); /* () */
390  /* num_sfun.c:535:OF */ extern void init_num_sfun (void); /* () */  /* num_sfun.c:535:OF */ extern void gcl_init_num_sfun (void); /* () */
391  /* number.c:35:OF */ extern long int fixint (object x); /* (x) object x; */  /* number.c:35:OF */ extern long int fixint (object x); /* (x) object x; */
392  /* number.c:44:OF */ extern int fixnnint (object x); /* (x) object x; */  /* number.c:44:OF */ extern int fixnnint (object x); /* (x) object x; */
393  /* number.c:59:OF */ extern object fSallocate_bigger_fixnum_range (fixnum min,fixnum max); /* (min, max) int min; int max; */  /* number.c:59:OF */ extern object fSallocate_bigger_fixnum_range (fixnum min,fixnum max); /* (min, max) int min; int max; */
# Line 397  typedef void (*funcvoid)(void); Line 397  typedef void (*funcvoid)(void);
397  /* number.c:157:OF */ extern object make_longfloat (longfloat f); /* (f) longfloat f; */  /* number.c:157:OF */ extern object make_longfloat (longfloat f); /* (f) longfloat f; */
398  /* number.c:170:OF */ extern object make_complex (object r, object i); /* (r, i) object r; object i; */  /* number.c:170:OF */ extern object make_complex (object r, object i); /* (r, i) object r; object i; */
399  /* number.c:229:OF */ extern double number_to_double (object x); /* (x) object x; */  /* number.c:229:OF */ extern double number_to_double (object x); /* (x) object x; */
400  /* number.c:254:OF */ extern void init_number (void); /* () */  /* number.c:254:OF */ extern void gcl_init_number (void); /* () */
401  /* peculiar.c:14:OF */ /*  extern int main (void); */ /* () */  /* peculiar.c:14:OF */ /*  extern int main (void); */ /* () */
402  /* predicate.c:35:OF */ extern object fLnot (object x0); /* (x0) object x0; */  /* predicate.c:35:OF */ extern object fLnot (object x0); /* (x0) object x0; */
403  /* predicate.c:46:OF */ extern void Lsymbolp (void); /* () */  /* predicate.c:46:OF */ extern void Lsymbolp (void); /* () */
# Line 441  typedef void (*funcvoid)(void); Line 441  typedef void (*funcvoid)(void);
441  /* predicate.c:797:OF */ extern object fScontains_sharp_comma (object x0); /* (x0) object x0; */  /* predicate.c:797:OF */ extern object fScontains_sharp_comma (object x0); /* (x0) object x0; */
442  /* predicate.c:810:OF */ extern object fSspicep (object x0); /* (x0) object x0; */  /* predicate.c:810:OF */ extern object fSspicep (object x0); /* (x0) object x0; */
443  /* predicate.c:822:OF */ extern object fSfixnump (object x0); /* (x0) object x0; */  /* predicate.c:822:OF */ extern object fSfixnump (object x0); /* (x0) object x0; */
444  /* predicate.c:833:OF */ extern void init_predicate_function (void); /* () */  /* predicate.c:833:OF */ extern void gcl_init_predicate_function (void); /* () */
445  /* prog.c:48:OF */ extern void Ftagbody (object body); /* (body) object body; */  /* prog.c:48:OF */ extern void Ftagbody (object body); /* (body) object body; */
446  /* prog.c:246:OF */ extern void Fprogn (object body); /* (body) object body; */  /* prog.c:246:OF */ extern void Fprogn (object body); /* (body) object body; */
447  /* prog.c:303:OF */ extern void init_prog (void); /* () */  /* prog.c:303:OF */ extern void gcl_init_prog (void); /* () */
448  /* reference.c:32:OF */ extern void Lfboundp (void); /* () */  /* reference.c:32:OF */ extern void Lfboundp (void); /* () */
449  /* reference.c:49:OF */ extern object symbol_function (object sym); /* (sym) object sym; */  /* reference.c:49:OF */ extern object symbol_function (object sym); /* (sym) object sym; */
450  /* reference.c:69:OF */ extern void Lsymbol_function (void); /* () */  /* reference.c:69:OF */ extern void Lsymbol_function (void); /* () */
# Line 452  typedef void (*funcvoid)(void); Line 452  typedef void (*funcvoid)(void);
452  /* reference.c:156:OF */ extern void Lboundp (void); /* () */  /* reference.c:156:OF */ extern void Lboundp (void); /* () */
453  /* reference.c:169:OF */ extern void Lmacro_function (void); /* () */  /* reference.c:169:OF */ extern void Lmacro_function (void); /* () */
454  /* reference.c:180:OF */ extern void Lspecial_form_p (void); /* () */  /* reference.c:180:OF */ extern void Lspecial_form_p (void); /* () */
455  /* reference.c:191:OF */ extern void init_reference (void); /* () */  /* reference.c:191:OF */ extern void gcl_init_reference (void); /* () */
456  /*  #include "regexp.h" */  /*  #include "regexp.h" */
457  /* regexp.c:1588:OF */ extern void regerror (char *s); /* (s) char *s; */  /* regexp.c:1588:OF */ extern void regerror (char *s); /* (s) char *s; */
458  /* regexpr.c:48:OF */ extern object fSmatch_beginning (fixnum i); /* (i) int i; */  /* regexpr.c:48:OF */ extern object fSmatch_beginning (fixnum i); /* (i) int i; */
# Line 467  typedef void (*funcvoid)(void); Line 467  typedef void (*funcvoid)(void);
467  /* structure.c:188:OF */ extern void siLmake_structure (void); /* () */  /* structure.c:188:OF */ extern void siLmake_structure (void); /* () */
468  /* structure.c:281:OF */ extern void siLstructure_set (void); /* () */  /* structure.c:281:OF */ extern void siLstructure_set (void); /* () */
469  /* structure.c:326:OF */ extern void siLlist_nth (void); /* () */  /* structure.c:326:OF */ extern void siLlist_nth (void); /* () */
470  /* structure.c:439:OF */ extern void init_structure_function (void); /* () */  /* structure.c:439:OF */ extern void gcl_init_structure_function (void); /* () */
471  /* toplevel.c:211:OF */ extern void init_toplevel (void); /* () */  /* toplevel.c:211:OF */ extern void gcl_init_toplevel (void); /* () */
472  /* typespec.c:38:OF */ extern void check_type_integer (object *p); /* (p) object *p; */  /* typespec.c:38:OF */ extern void check_type_integer (object *p); /* (p) object *p; */
473  /* typespec.c:47:OF */ extern void check_type_non_negative_integer (object *p); /* (p) object *p; */  /* typespec.c:47:OF */ extern void check_type_non_negative_integer (object *p); /* (p) object *p; */
474  /* typespec.c:65:OF */ extern void check_type_rational (object *p); /* (p) object *p; */  /* typespec.c:65:OF */ extern void check_type_rational (object *p); /* (p) object *p; */
# Line 491  typedef void (*funcvoid)(void); Line 491  typedef void (*funcvoid)(void);
491  /* typespec.c:250:OF */ extern void check_type_array (object *p); /* (p) object *p; */  /* typespec.c:250:OF */ extern void check_type_array (object *p); /* (p) object *p; */
492  /* typespec.c:284:OF */ extern void check_type (object x, int t); /* (x, t) object x; int t; */  /* typespec.c:284:OF */ extern void check_type (object x, int t); /* (x, t) object x; int t; */
493  /* typespec.c:294:OF */ extern void Ltype_of (void); /* () */  /* typespec.c:294:OF */ extern void Ltype_of (void); /* () */
494  /* typespec.c:493:OF */ extern void init_typespec (void); /* () */  /* typespec.c:493:OF */ extern void gcl_init_typespec (void); /* () */
495  /* typespec.c:497:OF */ extern void init_typespec_function (void); /* () */  /* typespec.c:497:OF */ extern void gcl_init_typespec_function (void); /* () */
496  /* unexec-19.29.c:1016:OF */ extern int write_segment (int new, register char *ptr, register char *end); /* (new, ptr, end) int new; register char *ptr; register char *end; */  /* unexec-19.29.c:1016:OF */ extern int write_segment (int new, register char *ptr, register char *end); /* (new, ptr, end) int new; register char *ptr; register char *end; */
497  /* unexec.c:1016:OF */ extern int write_segment (int new, register char *ptr, register char *end); /* (new, ptr, end) int new; register char *ptr; register char *end; */  /* unexec.c:1016:OF */ extern int write_segment (int new, register char *ptr, register char *end); /* (new, ptr, end) int new; register char *ptr; register char *end; */
498  /* unexlin.c:808:OF */ extern int write_segment (int new, register char *ptr, register char *end); /* (new, ptr, end) int new; register char *ptr; register char *end; */  /* unexlin.c:808:OF */ extern int write_segment (int new, register char *ptr, register char *end); /* (new, ptr, end) int new; register char *ptr; register char *end; */
499  /* unixfasl.c:409:OF */ extern void init_unixfasl (void); /* () */  /* unixfasl.c:409:OF */ extern void gcl_init_unixfasl (void); /* () */
500  /* unixfsys.c:145:OF */ extern char *getwd (char *buffer); /* (buffer) char *buffer; */  /* unixfsys.c:145:OF */ extern char *getwd (char *buffer); /* (buffer) char *buffer; */
501  /* unixfsys.c:209:OF */ extern void coerce_to_filename (object pathname, char *p); /* (pathname, p) object pathname; char *p; */  /* unixfsys.c:209:OF */ extern void coerce_to_filename (object pathname, char *p); /* (pathname, p) object pathname; char *p; */
502  /* unixfsys.c:329:OF */ extern bool file_exists (object file); /* (file) object file; */  /* unixfsys.c:329:OF */ extern bool file_exists (object file); /* (file) object file; */
# Line 508  typedef void (*funcvoid)(void); Line 508  typedef void (*funcvoid)(void);
508  /* unixfsys.c:442:OF */ extern object fLdelete_file (object path); /* (path) object path; */  /* unixfsys.c:442:OF */ extern object fLdelete_file (object path); /* (path) object path; */
509  /* unixfsys.c:456:OF */ extern void Lprobe_file (void); /* () */  /* unixfsys.c:456:OF */ extern void Lprobe_file (void); /* () */
510  /* unixfsys.c:533:OF */ extern void Ldirectory (void); /* () */  /* unixfsys.c:533:OF */ extern void Ldirectory (void); /* () */
511  /* unixfsys.c:777:OF */ extern void init_unixfsys (void); /* () */  /* unixfsys.c:777:OF */ extern void gcl_init_unixfsys (void); /* () */
512  /* unixsave.c:173:OF */ extern void init_unixsave (void); /* () */  /* unixsave.c:173:OF */ extern void gcl_init_unixsave (void); /* () */
513  /* unixsys.c:83:OF */ extern object fSgetpid (void); /* () */  /* unixsys.c:83:OF */ extern object fSgetpid (void); /* () */
514  /* unixsys.c:87:OF */ extern void init_unixsys (void); /* () */  /* unixsys.c:87:OF */ extern void gcl_init_unixsys (void); /* () */
515  /* unixtime.c:67:OF */ extern int runtime (void); /* () */  /* unixtime.c:67:OF */ extern int runtime (void); /* () */
516  /* unixtime.c:82:OF */ extern object unix_time_to_universal_time (int i); /* (i) int i; */  /* unixtime.c:82:OF */ extern object unix_time_to_universal_time (int i); /* (i) int i; */
517  /* unixtime.c:99:OF */ extern object fLget_universal_time (void); /* () */  /* unixtime.c:99:OF */ extern object fLget_universal_time (void); /* () */
518  /* unixtime.c:144:OF */ extern object fLget_internal_real_time (void); /* () */  /* unixtime.c:144:OF */ extern object fLget_internal_real_time (void); /* () */
519  /* unixtime.c:173:OF */ extern void init_unixtime (void); /* () */  /* unixtime.c:173:OF */ extern void gcl_init_unixtime (void); /* () */
520  /* user_init.c:2:OF */ extern object user_init (void); /* () */  /* user_init.c:2:OF */ extern object user_init (void); /* () */
521  /* user_init.c:2:OF */ extern int user_match (const char *,int n); /* () */  /* user_init.c:2:OF */ extern int user_match (const char *,int n); /* () */
522  /* usig.c:49:OF */ extern void gcl_signal (int signo, void (*handler) (/* ??? */)); /* (signo, handler) int signo; void (*handler)(); */  /* usig.c:49:OF */ extern void gcl_signal (int signo, void (*handler) (/* ??? */)); /* (signo, handler) int signo; void (*handler)(); */
523  /* usig.c:92:OF */ extern int unblock_signals (int n, int m); /* (n, m) int n; int m; */  /* usig.c:92:OF */ extern int unblock_signals (int n, int m); /* (n, m) int n; int m; */
524  /* usig.c:119:OF */ extern void unblock_sigusr_sigio (void); /* () */  /* usig.c:119:OF */ extern void unblock_sigusr_sigio (void); /* () */
525  /* usig.c:182:OF */ extern void install_default_signals (void); /* () */  /* usig.c:182:OF */ extern void install_default_signals (void); /* () */
526  /* usig2.c:142:OF */ extern void init_safety (void); /* () */  /* usig2.c:142:OF */ extern void gcl_init_safety (void); /* () */
527  /* usig2.c:158:OF */ extern object sSsignal_safety_required (fixnum signo,fixnum safety); /* (signo, safety) int signo; int safety; */  /* usig2.c:158:OF */ extern object sSsignal_safety_required (fixnum signo,fixnum safety); /* (signo, safety) int signo; int safety; */
528  #ifdef __MINGW32__  #ifdef __MINGW32__
529  /* usig2.c:167:OF */ extern void main_signal_handler (int signo); /* (signo) int signo */  /* usig2.c:167:OF */ extern void main_signal_handler (int signo); /* (signo) int signo */
# Line 545  typedef void (*funcvoid)(void); Line 545  typedef void (*funcvoid)(void);
545    
546  /*  readline.d */  /*  readline.d */
547  void  void
548  init_readline_function(void);  gcl_init_readline_function(void);
549    
550  /*  sys_gcl.c */  /*  sys_gcl.c */
551  void  void
552  init_init(void);  gcl_init_init(void);
553    
554  /* misc */  /* misc */
555  void  void
556  init_symbol(void);  gcl_init_symbol(void);
557    
558  void  void
559  init_package(void);  gcl_init_package(void);
560    
561  void  void
562  init_character(void);  gcl_init_character(void);
563    
564  void  void
565  init_read(void);  gcl_init_read(void);
566    
567  void  void
568  init_pathname(void);  gcl_init_pathname(void);
569    
570  void  void
571  init_print(void);  gcl_init_print(void);
572    
573  void  void
574  init_character_function(void);  gcl_init_character_function(void);
575    
576  void  void
577  init_file_function(void);  gcl_init_file_function(void);
578    
579  void  void
580  init_list_function(void);  gcl_init_list_function(void);
581    
582  void  void
583  init_package_function(void);  gcl_init_package_function(void);
584    
585  void  void
586  init_pathname_function(void);  gcl_init_pathname_function(void);
587    
588  void  void
589  init_print_function(void);  gcl_init_print_function(void);
590    
591  void  void
592  init_read_function(void);  gcl_init_read_function(void);
593    
594  void  void
595  init_sequence_function(void);  gcl_init_sequence_function(void);
596    
597  void  void
598  init_string_function(void);  gcl_init_string_function(void);
599    
600  void  void
601  init_symbol_function(void);  gcl_init_symbol_function(void);
602    
603  void  void
604  init_hash(void);  gcl_init_hash(void);
605    
606  void  void
607  import(object,object);  import(object,object);
# Line 613  void Line 613  void
613  NewInit(void);  NewInit(void);
614    
615  void  void
616  init_system(object);  gcl_init_system(object);
617    
618  void  void
619  set_up_string_register(char *);  set_up_string_register(char *);
# Line 736  void Line 736  void
736  build_symbol_table(void);  build_symbol_table(void);
737    
738  void  void
739  init_file(void);  gcl_init_file(void);
740    
741  object  object
742  aset1(object,fixnum,object);  aset1(object,fixnum,object);
# Line 1747  void bcopy ( const void *s1, void *s2, s Line 1747  void bcopy ( const void *s1, void *s2, s
1747  void bzero(void *b, size_t length);  void bzero(void *b, size_t length);
1748  int TcpOutputProc ( int fd, char *buf, int toWrite, int *errorCodePtr, int block );  int TcpOutputProc ( int fd, char *buf, int toWrite, int *errorCodePtr, int block );
1749  void recreate_heap1 ( void );  void recreate_heap1 ( void );
1750  void init_shared_memory ( void );  void gcl_init_shared_memory ( void );
1751  void fix_filename ( object pathname, char *filename1 );  void fix_filename ( object pathname, char *filename1 );
1752  void alarm ( int n );  void alarm ( int n );
1753  void *sbrk ( unsigned long increment );  void *sbrk ( unsigned long increment );

Legend:
Removed from v.1.28  
changed lines
  Added in v.1.29

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