123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157 |
- extern int scm_symhash_dim;
- && (SCM_TYP7S (x) == scm_tc7_ssymbol))
- || (SCM_TYP7S(x) == scm_tc7_ssymbol)))
- ? SCM_INUM (SCM_CADR (x)) + SCM_CHARS (SCM_CDDR (x)) \
- : SCM_CHARS (x)))
- ? SCM_INUM (SCM_CADR (x)) + SCM_UCHARS (SCM_CDDR (x))\
- : SCM_UCHARS (x)))
- x = scm_makfromstr (SCM_ROCHARS (x), \
- SCM_ROLENGTH (x), 0)
- extern unsigned long scm_strhash (const unsigned char *str, scm_sizet len, unsigned long n)
- extern SCM scm_sym2vcell (SCM sym, SCM thunk, SCM definep)
- extern SCM scm_sym2ovcell_soft (SCM sym, SCM obarray)
- extern SCM scm_sym2ovcell (SCM sym, SCM obarray)
- extern SCM scm_intern_obarray_soft (const char *name, scm_sizet len, SCM obarray, int softness)
- extern SCM scm_intern_obarray (const char *name, scm_sizet len, SCM obarray)
- extern SCM scm_intern (const char *name, scm_sizet len)
- extern SCM scm_intern0 (const char *name)
- extern SCM scm_sysintern (const char *name, SCM val)
- extern SCM scm_sysintern0 (const char *name)
- extern SCM scm_sysintern0_no_module_lookup (const char *name)
- extern SCM scm_symbol_value0 (const char *name)
- extern SCM scm_symbol_p (SCM x)
- extern SCM scm_symbol_to_string (SCM s)
- extern SCM scm_string_to_symbol (SCM s)
- extern SCM scm_string_to_obarray_symbol (SCM o, SCM s, SCM softp)
- extern SCM scm_intern_symbol (SCM o, SCM s)
- extern SCM scm_unintern_symbol (SCM o, SCM s)
- extern SCM scm_symbol_binding (SCM o, SCM s)
- extern SCM scm_symbol_interned_p (SCM o, SCM s)
- extern SCM scm_symbol_bound_p (SCM o, SCM s)
- extern SCM scm_symbol_set_x (SCM o, SCM s, SCM v)
- extern SCM scm_symbol_fref (SCM s)
- extern SCM scm_symbol_pref (SCM s)
- extern SCM scm_symbol_fset_x (SCM s, SCM val)
- extern SCM scm_symbol_pset_x (SCM s, SCM val)
- extern SCM scm_symbol_hash (SCM s)
- extern SCM scm_builtin_bindings (void)
- extern SCM scm_builtin_weak_bindings (void)
- extern SCM scm_gensym (SCM name, SCM obarray)
- extern void scm_init_symbols (void)
- extern int scm_can_use_top_level_lookup_closure_var;
|