Searched refs:SCM_SYM_NAME (Results 1 – 15 of 15) sorted by relevance
/dports/lang/qscheme/qscheme-0.5.1/ |
H A D | sym.c | 24 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 D | boolean.c | 36 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 D | hash.c | 165 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 D | format.c | 52 case SOBJ_T_SYMBOL: av_ptr(alist, void*, SCM_SYM_NAME(obj)); break; in scm_cformat()
|
H A D | misc.c | 40 if (SCM_SYMBOLP(obj)) return(SCM_ATOM_NAME(SCM_SYM_NAME(obj))); in scm_getstr()
|
H A D | dyn.c | 398 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 D | module.c | 107 if (SCM_SYM_NAME(SCM_CAR(sym)) == atom) { in scm_module_find_exported_symbol()
|
H A D | asm.c | 102 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 D | object.c | 268 case SOBJ_T_SYMBOL: return(SCM_SYM_NAME(x)); in scm_get_atom()
|
H A D | s.h | 442 #define SCM_SYM_NAME(x) SCM_VALUE(x,symbol,name) macro
|
H A D | vm2.c | 679 SCM_ERR("symbol unbound", SCM_SYM_NAME((SOBJ)ip[-1])); in scm_vm()
|
H A D | port.c | 545 port_puts(port, SCM_ATOM_NAME(SCM_SYM_NAME(obj))); in scm_write_obj()
|
H A D | str.c | 522 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 D | builtin-syms.h | 143 #define SCM_SYM_NAME SCM_OBJ(&Scm_BuiltinSymbols[136]) macro
|
/dports/lang/gauche/Gauche-0.9.10/src/ |
H A D | port.c | 221 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()
|