Lines Matching refs:definition
59 LispObj *list, *cons, *object, *definition, *documentation;
128 definition = CONS(oname, description);
129 LispSetAtomStructProperty(atom, definition, STRUCT_CONSTRUCTOR);
137 LispSetAtomStructProperty(atom, definition, STRUCT_NAME);
141 LispSetAtomStructProperty(atom, definition, STRUCT_CHECK);
159 LispSetAtomStructProperty(atom, definition, i);
184 LispObj *definition, *object, *field, *fields, *value = NIL, *cons, *list;
197 definition = atom->property->structure.definition;
212 /* create structure, CAR(definition) is structure name */
213 for (list = CDR(definition); CONSP(list); list = CDR(list)) {
241 /* if default value in structure definition */
267 for (object = CDR(definition); CONSP(object);
278 ATOMID(CAR(definition))->value);
285 return (STRUCT(fields, definition));
297 LispObj *definition, *list;
316 definition = atom->property->structure.definition;
319 if (!STRUCTP(struc) || struc->data.struc.def != definition)
321 ATOMID(name)->value, STROBJ(struc), ATOMID(CAR(definition))->value);
355 LispObj *definition, *struc, *name;
366 definition = atom->property->structure.definition;
369 if (STRUCTP(struc) && struc->data.struc.def == definition)