Home | History | Annotate | Download | only in lisp

Lines Matching refs:ATOM

56     LispAtom *atom;
76     atom = (object = ATOM(name))->data.atom;
78     if (atom->a_builtin)
82     intern = !atom->ext;
127     /* atom should not have been modified */
129     LispSetAtomStructProperty(atom, definition, STRUCT_CONSTRUCTOR);
133     atom = oname->data.atom;
134     if (atom->a_defstruct)
137     LispSetAtomStructProperty(atom, definition, STRUCT_NAME);
140     atom = (object = ATOM(name))->data.atom;
141     LispSetAtomStructProperty(atom, definition, STRUCT_CHECK);
158 	atom = (object = ATOM(name))->data.atom;
159 	LispSetAtomStructProperty(atom, definition, i);
178  lisp::make-struct atom &rest init
182     LispAtom *atom = NULL;
193 	(atom = struc->data.atom)->a_defstruct == 0 ||
194 	 atom->property->structure.function != STRUCT_CONSTRUCTOR)
197     definition = atom->property->structure.definition;
291  lisp::struct-access atom struct
292  lisp::struct-store atom struct value
296     LispAtom *atom;
308 	(atom = name->data.atom)->a_defstruct == 0 ||
309 	(offset = atom->property->structure.function) < 0) {
314 	atom = NULL;
316     definition = atom->property->structure.definition;
332  lisp::struct-access atom struct
341  lisp::struct-store atom struct value
350  lisp::struct-type atom struct
353     LispAtom *atom = NULL;
362 	(atom = name->data.atom)->a_defstruct == 0 ||
363 	(atom->property->structure.function != STRUCT_CHECK))
366     definition = atom->property->structure.definition;