Lines Matching defs:struc
185 LispObj *struc, *init;
188 struc = ARGUMENT(0);
191 if (!POINTERP(struc) ||
192 !(XSYMBOLP(struc) || XFUNCTIONP(struc)) ||
193 (atom = struc->data.atom)->a_defstruct == 0 ||
196 STRFUN(builtin), STROBJ(struc));
207 ATOMID(struc)->value);
277 ATOMID(struc)->value, STROBJ(CAR(list)),
299 LispObj *name, *struc, *value = NIL;
303 struc = ARGUMENT(1);
319 if (!STRUCTP(struc) || struc->data.struc.def != definition)
321 ATOMID(name)->value, STROBJ(struc), ATOMID(CAR(definition))->value);
323 for (list = struc->data.struc.fields; offset; list = CDR(list), offset--)
355 LispObj *definition, *struc, *name;
357 struc = ARGUMENT(1);
369 if (STRUCTP(struc) && struc->data.struc.def == definition)