Cross Reference: /xsrc/external/mit/xedit/dist/lisp/compile.c

Lines Matching +refs:symbol +refs:plist
250     LispObj *symbol, *list, *result;
258     symbol = CAR(init);
259     CHECK_SYMBOL(symbol);
260     CHECK_CONSTANT(symbol);
311     ComPush(com, symbol, NIL, 0, 0, 0);
320     COM_VARIABLE_USED(symbol->data.atom);
541     LispObj *symbol, *value, *pair;
561 	    symbol = CAR(pair);
567 				STRFUN(builtin), STROBJ(symbol));
573 	    symbol = pair;
576 	CHECK_SYMBOL(symbol);
577 	CHECK_CONSTANT(symbol);
580 	ComPush(com, symbol, value, 1, 0, 0);
607     LispObj *symbol, *value, *pair;
627 	    symbol = CAR(pair);
633 				STRFUN(builtin), STROBJ(symbol));
639 	    symbol = pair;
642 	CHECK_SYMBOL(symbol);
643 	CHECK_CONSTANT(symbol);
645 	/* LET* is identical to &AUX arguments, just bind the symbol */
646 	ComPush(com, symbol, value, 1, 0, 0);
852     LispObj *form, *symbol, *value;
857 	symbol = CAR(form);
858 	CHECK_SYMBOL(symbol);
859 	CHECK_CONSTANT(symbol);
866 	offset = ComGetVariable(com, symbol);
870 	    com_SetSym(com, symbol->data.atom);
1174 ComAddVariable(LispCom *com, LispObj *symbol, LispObj *value)
1176     LispAtom *atom = symbol->data.atom;
1199     LispAddVar(symbol, value);
1203 ComGetVariable(LispCom *com, LispObj *symbol)
1209     name = symbol->data.atom;
1212 	    /*	Just load <symbol> from the byte stream, keywords are
1244     /* Not found, resolve <symbol> at run time */
1302 ComPush(LispCom *com, LispObj *symbol, LispObj *value,
1311 	    ComAddVariable(com, symbol, value);
1316      * variable <symbol> bounded to <value>, so that it will be available
1319 	ComAddVariable(com, symbol, value);
1335 			com_LoadLet(com, offset, symbol->data.atom);
1344 			com_LoadConLet(com, value, symbol->data.atom);
1352 				       symbol->data.atom);
1362 		    com_Let(com, symbol->data.atom);
1366 	/*  Remember <symbol> will be bound, <value> only matters for
1371 	    ComAddVariable(com, symbol, value);
1382 	com_LoadConLet(com, value, symbol->data.atom);
1383 	/* Remember <symbol> will be bound */
1384 	ComAddVariable(com, symbol, value);
1707 		/* Remember this symbol will be bound */
1944 		    /* Load value bound to symbol at run time */
1978 		RPLACD(com->plist, CONS(CAR(com->plist), CDR(com->plist)));
1979 		RPLACA(com->plist, object);