Searched refs:Symbol_package (Results 1 – 10 of 10) sorted by relevance
776 if (nullp(Symbol_package(sym))) in make_present()777 Symbol_package(sym) = pack; in make_present()783 if (nullp(Symbol_package(sym))) { in make_present()920 Symbol_package(othersym) = NIL; in shadowing_import()967 Symbol_package(STACK_1) = *pack_; in do_shadow()1077 if (eq(Symbol_package(sym),pack)) in unintern()1078 Symbol_package(sym) = NIL; in unintern()1091 if (eq(Symbol_package(sym),pack)) in unintern()1172 if (eq(Symbol_package(othersym),pack)) in import()2176 var object pack = Symbol_package(symbol); in symbol_value_check_lock()[all …]
289 VALUES1(Symbol_package(symbol));
91 object pack = Symbol_package(symbol); in nobject_out1()
431 if (nullp(Symbol_package(obj))) /* uninterned symbol? */ in get_circ_mark()776 if (nullp(Symbol_package(obj))) /* uninterned symbol? */ in get_circ_mark()
667 if (nullp(Symbol_package(obj))) /* uninterned symbol? */ in get_circ_mark()1043 if (nullp(Symbol_package(obj))) /* uninterned symbol? */ in get_circ_mark()
1642 Symbol_package(popSTACK()) = *package_; /* set the home-package */ in init_symbol_tab_2()2104 if (pack_locked_p(Symbol_package(symbol)) in init_module_2()2109 nobject_out(stderr,Symbol_package(symbol)); in init_module_2()
1373 if (symbolp(arg) && eq(Symbol_package(arg),O(charset_package))) in check_encoding()
1397 eq(Symbol_package(arg),O(keyword_package)) ? S(keyword) :
10149 #define Symbol_package(obj) (TheSymbol(obj)->homepackage) macro10182 %% export_def(Symbol_package(obj));
6932 var object home = Symbol_package(sym); /* home-package of the symbol */ in pr_symbol()