This is external_funs.h in view mode; [Download] [Up]
/* for file nfunlink.X */ extern object Icall_proc GPR((object fun_name, int link_desk, object (**link_loc) ( ), ...));; extern float Icall_proc_float GPR((object fun_name, int link_desk, object (**link_loc) ( ), ...));; extern object IapplyVector GPR((object fun, int nargs, object *base));; extern int Iinvoke_c_function_from_value_stack GPR((int f, int fargd));; /* for file alloc.X */ extern char *alloc_page GPR((int n));; extern void add_page_to_freelist GPR((char *p, struct typemanager *tm));; extern object alloc_object GPR((enum type t));; extern int grow_linear GPR((int old, int fract, int grow_min, int grow_max));; extern object make_cons GPR((object a, object d));; extern object on_stack_cons GPR((object x, object y));; extern void call_after_gbc_hook GPR((int t));; extern object fSallocated GPR((object typ));; extern char *alloc_contblock GPR((int n));; extern int insert_contblock GPR((char *p, int s));; extern char *alloc_relblock GPR((int n));; extern int init_tm GPR((enum type t, char *name, int elsize, int nelts, int sgc));; extern int set_maxpage GPR((void));; extern int init_alloc GPR((void));; extern int cant_get_a_type GPR((void));; extern int siLallocate GPR((void));; extern int t_from_type GPR((object type));; extern object siSallocate_sgc GPR((object type, int min, int max, int free_percent));; extern object siSallocate_growth GPR((object type, int min, int max, int percent, int percent_free));; extern int siLallocated_pages GPR((void));; extern int siLmaxpage GPR((void));; extern int siLalloc_contpage GPR((void));; extern int siLncbpage GPR((void));; extern int siLmaxcbpage GPR((void));; extern int siLalloc_relpage GPR((void));; extern int siLnrbpage GPR((void));; extern int siLget_hole_size GPR((void));; extern int siLset_hole_size GPR((void));; extern int init_alloc_function GPR((void));; extern char *malloc GPR((int size));; extern void free GPR((void *ptr));; extern char *realloc GPR((char *ptr, int size));; extern char *calloc GPR((int nelem, int elsize));; extern int cfree GPR((char *ptr));; extern char *memalign GPR((int align, int size));; extern char *valloc GPR((int size));; /* for file array.X */ extern enum aelttype get_aelttype GPR((object x));; extern enum aelttype array_elttype GPR((object x));; extern char *array_address GPR((object x, int inc));; extern char *raw_aet_ptr GPR((object x, short int typ));; extern int gset GPR((char *p1, char *val, int n, int typ));; extern int copy_array_portion GPR((object x, object y, int i1, int i2, int n1));; extern int siLcopy_array_portion GPR((void));; extern int array_allocself GPR((object x, bool staticp, object dflt));; extern object aref GPR((object x, int index));; extern object aset GPR((object x, int index, object value));; extern object aref1 GPR((object v, int index));; extern object aset1 GPR((object v, int index, object val));; extern int displace GPR((object from, object to, object offset));; extern int undisplace GPR((object from));; extern int check_displaced GPR((object dlist, object orig, int newdim));; extern int adjust_displaced GPR((object x, int diff));; extern int setup_fillp GPR((object x, object fillp));; extern int siLmake_pure_array GPR((void));; extern int siLmake_vector GPR((void));; extern int Laref GPR((void));; extern int siLaset GPR((void));; extern int Larray_element_type GPR((void));; extern int Larray_rank GPR((void));; extern int Larray_dimension GPR((void));; extern int Larray_total_size GPR((void));; extern int Ladjustable_array_p GPR((void));; extern int siLdisplaced_array_p GPR((void));; extern int Lsvref GPR((void));; extern int siLsvset GPR((void));; extern int Larray_has_fill_pointer_p GPR((void));; extern int Lfill_pointer GPR((void));; extern int siLfill_pointer_set GPR((void));; extern int siLreplace_array GPR((void));; extern int siLaset_by_cursor GPR((void));; extern int init_array_function GPR((void));; /* for file assignment.X */ extern int setq GPR((object sym, object val));; extern int Fsetq GPR((object form));; extern int Fpsetq GPR((object arg));; extern int Lset GPR((void));; extern int siLfset GPR((void));; extern int Fmultiple_value_setq GPR((object form));; extern int Lmakunbound GPR((void));; extern int Lfmakunbound GPR((void));; extern int Fsetf GPR((object form));; extern int setf GPR((object place, object form));; extern int Fpush GPR((object form));; extern int Fpop GPR((object form));; extern int Fincf GPR((object form));; extern int Fdecf GPR((object form));; extern object clear_compiler_properties GPR((object sym, object code));; extern int siLclear_compiler_properties GPR((void));; extern int init_assignment GPR((void));; /* for file backq.X */ extern int kwote_cdr GPR((void));; extern int kwote_car GPR((void));; extern int backq_cdr GPR((object x));; extern int backq_car GPR((object x));; extern object backq GPR((object x));; extern int Lcomma_reader GPR((void));; extern int Lbackquote_reader GPR((void));; extern int init_backq GPR((void));; /* for file bcmp.X */ extern int bcmp GPR((char *s1, char *s2, int n));; /* for file bcopy.X */ extern void bcopy GPR((char *s1, char *s2, int n));; /* for file bds.X */ extern int bds_unwind GPR((bds_ptr new_bds_top));; /* for file big.X */ extern int bcopy_body GPR((GEN x, GEN y));; extern object make_integer GPR((GEN u));; extern object make_bignum GPR((GEN u));; extern int big_zerop GPR((object x));; extern int big_compare GPR((object x, object y));; extern object big_minus GPR((object x));; extern int gcopy_to_big GPR((GEN res, object x));; extern int add_int_big GPR((int i, object x));; extern int sub_int_big GPR((int i, object x));; extern int mul_int_big GPR((int i, object x));; extern int div_int_big GPR((int i, object x));; extern object big_plus GPR((object x, object y));; extern object big_times GPR((object x, object y));; extern int big_quotient_remainder GPR((object x0, object y0, object *qp, object *rp));; extern double big_to_double GPR((object x));; extern object normalize_big_to_object GPR((object x));; extern object copy_big GPR((object x));; extern object copy_to_big GPR((object x));; extern GEN powerii GPR((GEN x, GEN y));; extern int replace_copy1 GPR((GEN x, GEN y));; extern GEN replace_copy2 GPR((GEN x, GEN y));; extern int obj_replace_copy1 GPR((object x, GEN y));; extern GEN obj_replace_copy2 GPR((object x, GEN y));; extern GEN1 otoi GPR((object x));; extern object alloc_bignum_static GPR((int len));; extern GEN1 setq_io GPR((GEN x, object *all, object val));; extern GEN1 setq_ii GPR((GEN x, object *all, GEN val));; extern void isetq_fix GPR((GEN var, int s));; extern GEN icopy_bignum GPR((object a, GEN y));; extern GEN icopy_fixnum GPR((object a, GEN y));; /* for file bind.X */ extern int lambda_bind GPR((object *arg_top));; extern int bind_var GPR((object var, object val, object spp));; extern int illegal_lambda GPR((void));; extern object find_special GPR((object body, struct bind_temp *start, struct bind_temp *end));; extern object let_bind GPR((object body, struct bind_temp *start, struct bind_temp *end));; extern object letA_bind GPR((object body, struct bind_temp *start, struct bind_temp *end));; extern int parse_key GPR((object *base, bool rest, bool allow_other_keys, register int n, int __builtin_va_alist));; extern int check_other_key GPR((object l, int n, int __builtin_va_alist));; extern int parse_key_new GPR((int n, object *base, struct key *keys, ...));; extern int parse_key_rest GPR((object rest, int n, object *base, struct key *keys, ...));; extern int set_key_struct GPR((struct key *ks, object data));; extern int init_bind GPR((void));; /* for file bitop.X */ extern int get_mark_bit GPR((void));; extern int set_mark_bit GPR((void));; extern int get_set_mark_bit GPR((void));; /* for file block.X */ extern int Fblock GPR((object args));; extern int Freturn_from GPR((object args));; extern int Freturn GPR((object args));; extern int init_block GPR((void));; /* for file bzero.X */ extern int bzero GPR((char *b, int length));; /* for file catch.X */ extern int Fcatch GPR((object args));; extern int siLerror_set GPR((void));; extern int Funwind_protect GPR((object args));; extern int Fthrow GPR((object args));; extern int init_catch GPR((void));; /* for file cfun.X */ extern object make_cfun GPR((int (*self) ( ), object name, object data, char *start, int size));; extern object make_sfun GPR((object name, int (*self) ( ), int argd, object data));; extern object make_vfun GPR((object name, int (*self) ( ), int argd, object data));; extern object make_cclosure_new GPR((int (*self) ( ), object name, object env, object data));; extern object make_cclosure GPR((int (*self) ( ), object name, object env, object data, char *start, int size));; extern int siLmc GPR((void));; extern object MFsfun GPR((object sym, int (*self) ( ), int argd, object data));; extern int siLmfsfun GPR((void));; extern object MFvfun GPR((object sym, int (*self) ( ), int argd, object data));; extern int siLmfvfun GPR((void));; extern object MFvfun_key GPR((object sym, int (*self) ( ), int argd, object data, char *keys));; extern int siLmfvfun_key GPR((void));; extern object MFnew GPR((object sym, int (*self) ( ), object data));; extern int siLmf GPR((void));; extern object MF GPR((object sym, int (*self) ( ), char *start, int size, object data));; extern object MM GPR((object sym, int (*self) ( ), char *start, int size, object data));; extern int siLmm GPR((void));; extern object make_function GPR((char *s, int (*f) ( )));; extern object make_si_sfun GPR((char *s, int (*f) ( ), int argd));; extern object make_si_vfun1 GPR((char *s, int (*f) ( ), int argd));; extern object make_si_function GPR((char *s, int (*f) ( )));; extern object make_special_form GPR((char *s, int (*f) ( )));; extern int siLcompiled_function_name GPR((void));; extern int turbo_closure GPR((object fun));; extern int siLturbo_closure GPR((void));; extern int init_cfun GPR((void));; /* for file character.X */ extern int Lstandard_char_p GPR((void));; extern int Lgraphic_char_p GPR((void));; extern int Lstring_char_p GPR((void));; extern int Lalpha_char_p GPR((void));; extern int Lupper_case_p GPR((void));; extern int Llower_case_p GPR((void));; extern int Lboth_case_p GPR((void));; extern int digitp GPR((int i, int r));; extern int Ldigit_char_p GPR((void));; extern int Lalphanumericp GPR((void));; extern bool char_eq GPR((object x, object y));; extern int Lchar_eq GPR((void));; extern int Lchar_neq GPR((void));; extern int char_cmp GPR((object x, object y));; extern int Lchar_cmp GPR((int s, int t));; extern int Lchar_l GPR((void));; extern int Lchar_g GPR((void));; extern int Lchar_le GPR((void));; extern int Lchar_ge GPR((void));; extern bool char_equal GPR((object x, object y));; extern int Lchar_equal GPR((void));; extern int Lchar_not_equal GPR((void));; extern int char_compare GPR((object x, object y));; extern int Lchar_compare GPR((int s, int t));; extern int Lchar_lessp GPR((void));; extern int Lchar_greaterp GPR((void));; extern int Lchar_not_greaterp GPR((void));; extern int Lchar_not_lessp GPR((void));; extern object coerce_to_character GPR((object x));; extern int Lcharacter GPR((void));; extern int Lchar_code GPR((void));; extern int Lchar_bits GPR((void));; extern int Lchar_font GPR((void));; extern int Lcode_char GPR((void));; extern int Lmake_char GPR((void));; extern int Lchar_upcase GPR((void));; extern int Lchar_downcase GPR((void));; extern int digit_weight GPR((int w, int r));; extern int Ldigit_char GPR((void));; extern int Lchar_int GPR((void));; extern int Lint_char GPR((void));; extern int Lchar_name GPR((void));; extern int Lname_char GPR((void));; extern int Lchar_bit GPR((void));; extern int Lset_char_bit GPR((void));; extern int init_character GPR((void));; extern int init_character_function GPR((void));; /* for file cmpaux.X */ extern int siLspecialp GPR((void));; extern void siLdefvar1 GPR((void));; extern void siLdebug GPR((void));; extern void siLsetvv GPR((void));; extern int init_cmpaux GPR((void));; extern int ifloor GPR((int x, int y));; extern int imod GPR((int x, int y));; extern int set_VV_data GPR((object *VV, int n, object data, char *start, int size));; extern int set_VV GPR((object *VV, int n, object data));; extern char object_to_char GPR((object x));; extern int object_to_int GPR((object x));; extern float object_to_float GPR((object x));; extern double object_to_double GPR((object x));; extern char *object_to_string GPR((object x));; extern int call_init GPR((int init_address, object memory, object fasl_vec));; extern int do_init GPR((object *statVV));; extern void init_or_load1 GPR((int (*fn) ( ), char *file));; /* for file conditional.X */ extern int Fif GPR((object form));; extern int Fcond GPR((object args));; extern int Fcase GPR((object arg));; extern int Fwhen GPR((object form));; extern int Funless GPR((object form));; extern int init_conditional GPR((void));; /* for file earith.X */ extern int init_cmac GPR((void));; extern object signed_bignum2 GPR((int hi, int lo));; extern object fplus GPR((int a, int b));; extern object fminus GPR((int a, int b));; extern int dblrem GPR((int a, int b, int mod));; extern object cmod GPR((object x));; extern object ctimes GPR((object a, object b));; extern object cdifference GPR((object a, object b));; extern object cplus GPR((object a, object b));; extern void siLcmod GPR((void));; extern void siLcplus GPR((void));; extern void siLctimes GPR((void));; extern void siLcdifference GPR((void));; extern object memq GPR((register object a, register object b));; /* for file error.X */ extern int terminal_interrupt GPR((int correctable));; extern object ihs_function_name GPR((object x));; extern object ihs_top_function_name GPR((void));; extern int call_error_handler GPR((void));; extern int FEerror GPR((char *s, int num, object arg1, object arg2, object arg3, object arg4));; extern int FEwrong_type_argument GPR((object type, object value));; extern int FEtoo_few_arguments GPR((object *base, object *top));; extern int FEtoo_few_argumentsF GPR((object args));; extern int FEtoo_many_arguments GPR((object *base, object *top));; extern int FEtoo_many_argumentsF GPR((object args));; extern int FEinvalid_macro_call GPR((void));; extern int FEunexpected_keyword GPR((object key));; extern int FEinvalid_form GPR((char *s, object form));; extern int FEunbound_variable GPR((object sym));; extern int FEinvalid_variable GPR((char *s, object obj));; extern int FEundefined_function GPR((object fname));; extern int FEinvalid_function GPR((object obj));; extern int CEerror GPR((char *err_str, char *cont_str, int num, object arg1, object arg2, object arg3, object arg4));; extern ihs_ptr get_ihs_ptr GPR((object x));; extern int siLihs_top GPR((void));; extern int siLihs_fun GPR((void));; extern int siLihs_vs GPR((void));; extern frame_ptr get_frame_ptr GPR((object x));; extern int siLfrs_top GPR((void));; extern int siLfrs_vs GPR((void));; extern int siLfrs_bds GPR((void));; extern int siLfrs_class GPR((void));; extern int siLfrs_tag GPR((void));; extern int siLfrs_ihs GPR((void));; extern bds_ptr get_bds_ptr GPR((object x));; extern int siLbds_top GPR((void));; extern int siLbds_var GPR((void));; extern int siLbds_val GPR((void));; extern object *get_vs_ptr GPR((object x));; extern int siLvs_top GPR((void));; extern int siLvs GPR((void));; extern int siLsch_frs_base GPR((void));; extern int siLinternal_super_go GPR((void));; extern int siLuniversal_error_handler GPR((void));; extern int check_arg_failed GPR((int n));; extern int too_few_arguments GPR((void));; extern int too_many_arguments GPR((void));; extern int ck_larg_at_least GPR((int n, object x));; extern int ck_larg_exactly GPR((int n, object x));; extern int invalid_macro_call GPR((void));; extern int keyword_value_mismatch GPR((void));; extern int not_a_keyword GPR((object x));; extern int unexpected_keyword GPR((object key));; extern object wrong_type_argument GPR((object typ, object obj));; extern int illegal_declare GPR((int form));; extern int not_a_symbol GPR((int obj));; extern int not_a_variable GPR((int obj));; extern int illegal_index GPR((object x, object i));; extern int Lerror GPR((void));; extern object LVerror GPR((int __builtin_va_alist));; extern int Lcerror GPR((void));; extern int vfun_wrong_number_of_args GPR((object x));; extern int init_error GPR((void));; /* for file eval.X */ extern int quick_call_sfun GPR((object fun));; extern int call_sfun_no_check GPR((object fun));; extern int call_vfun GPR((object fun));; extern int funcall GPR((object fun));; extern int funcall_no_event GPR((object fun));; extern int lispcall GPR((object *funp, int narg));; extern int lispcall_no_event GPR((object *funp, int narg));; extern int symlispcall GPR((object sym, object *base, int narg));; extern int symlispcall_no_event GPR((object sym, object *base, int narg));; extern object simple_lispcall GPR((object *funp, int narg));; extern object simple_lispcall_no_event GPR((object *funp, int narg));; extern object simple_symlispcall GPR((object sym, object *base, int narg));; extern object simple_symlispcall_no_event GPR((object sym, object *base, int narg));; extern int super_funcall GPR((object fun));; extern int super_funcall_no_event GPR((object fun));; extern int eval GPR((object form));; extern int call_applyhook GPR((object fun));; extern int Lfuncall GPR((void));; extern int Lapply GPR((void));; extern int Leval GPR((void));; extern int Levalhook GPR((void));; extern int Lapplyhook GPR((void));; extern int Lconstantp GPR((void));; extern object ieval GPR((object x));; extern object ifuncall1 GPR((object fun, object arg1));; extern object ifuncall2 GPR((object fun, object arg1, object arg2));; extern object ifuncall3 GPR((object fun, object arg1, object arg2, object arg3));; extern int funcall_with_catcher GPR((object fname, object fun));; extern object fcalln_cclosure GPR((...));; extern object fcalln_general GPR((...));; extern object fcalln_vfun GPR((va_list vl));; extern object fcalln GPR((int __builtin_va_alist));; extern object funcall_cfun GPR((funcvoid fn, int n, int __builtin_va_alist));; extern int init_eval GPR((void));;
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.