Home
last modified time | relevance | path

Searched refs:SCM_SYM_NAME (Results 1 – 15 of 15) sorted by relevance

/dports/lang/qscheme/qscheme-0.5.1/
H A Dsym.c24 SCM_SYM_NAME(new) = atom; in scm_mksymbol2()
48 scm_gc_mark(SCM_SYM_NAME(obj)); in scm_symbol_mark()
75 if (SCM_SYM_NAME(e) == atom) return(e); in scm_atom_hash_complete()
100 SCM_SYM_NAME(sym), in scm_sym_clone()
227 return(SCM_SYM_NAME(x)); in scm_symbol_name()
H A Dboolean.c36 if (SCM_SYMBOLP(x)) x = SCM_SYM_NAME(x); in scm_eqv()
37 if (SCM_SYMBOLP(y)) y = SCM_SYM_NAME(y); in scm_eqv()
H A Dhash.c165 hc = scm_hash_string(SCM_ATOM_NAME(SCM_SYM_NAME(key))); in scm_hash_code()
348 case SOBJ_T_SYMBOL: p = SCM_ATOM_NAME(SCM_SYM_NAME(key)); break; in scm_hash_search_key()
364 case SOBJ_T_SYMBOL: p = SCM_ATOM_NAME(SCM_SYM_NAME(key)); break; in scm_hash_search_key()
371 if (streq(p, SCM_ATOM_NAME(SCM_SYM_NAME(SCM_CAR(l))))) return(l); in scm_hash_search_key()
429 SCM_SYM_NAME(sym) = scm_mkatom(keystr); in scm_hash_set()
551 l = scm_cons(scm_cons(SCM_SYM_NAME(SCM_CAR(p)), in scm_hash_to_list()
H A Dformat.c52 case SOBJ_T_SYMBOL: av_ptr(alist, void*, SCM_SYM_NAME(obj)); break; in scm_cformat()
H A Dmisc.c40 if (SCM_SYMBOLP(obj)) return(SCM_ATOM_NAME(SCM_SYM_NAME(obj))); in scm_getstr()
H A Ddyn.c398 case SOBJ_T_SYMBOL: av_ptr(*al, void*, SCM_SYM_NAME(obj)); break; in pushargs()
580 case SOBJ_T_SYMBOL: av_ptr(*al, void*, SCM_SYM_NAME(arg)); break; in push_list()
H A Dmodule.c107 if (SCM_SYM_NAME(SCM_CAR(sym)) == atom) { in scm_module_find_exported_symbol()
H A Dasm.c102 if (SCM_CAR(expr) == SCM_SYM_NAME(scm_sym_define)) { in search_local()
1001 var = SCM_SYM_NAME(var); in scm_compile_define()
1162 atom = SCM_SYM_NAME(SCM_CAR(pair)); in scm_compile_let()
1909 sym = lookup_atom(SCM_SYM_NAME(obj), env, &depth, FALSE); in scm_compile_obj()
H A Dobject.c268 case SOBJ_T_SYMBOL: return(SCM_SYM_NAME(x)); in scm_get_atom()
H A Ds.h442 #define SCM_SYM_NAME(x) SCM_VALUE(x,symbol,name) macro
H A Dvm2.c679 SCM_ERR("symbol unbound", SCM_SYM_NAME((SOBJ)ip[-1])); in scm_vm()
H A Dport.c545 port_puts(port, SCM_ATOM_NAME(SCM_SYM_NAME(obj))); in scm_write_obj()
H A Dstr.c522 case SOBJ_T_SYMBOL: return(scm_atom_to_string(SCM_SYM_NAME(sym))); in scm_symbol_to_string()
/dports/lang/gauche/Gauche-0.9.10/src/gauche/priv/
H A Dbuiltin-syms.h143 #define SCM_SYM_NAME SCM_OBJ(&Scm_BuiltinSymbols[136]) macro
/dports/lang/gauche/Gauche-0.9.10/src/
H A Dport.c221 port->attrs = SCM_LIST1(Scm_Cons(SCM_SYM_NAME, Scm_Cons(name, SCM_FALSE))); in make_port()
271 return Scm_PortAttrGet(port, SCM_SYM_NAME, SCM_FALSE); in Scm_PortName()