Lines Matching defs:field
105 /* p is invalid as a field name due to `type'-p */
106 LispDestroy("%s: %s cannot be a field for %s",
112 /* check for repeated field names */
184 LispObj *definition, *object, *field, *fields, *value = NIL, *cons, *list;
190 field = cons = NIL;
218 field = CAR(list);
219 if (CONSP(field)) {
221 if (CONSP(CDR(field)))
222 defvalue = CAR(CDR(field));
223 field = CAR(field);
225 id = ATOMID(field);
228 /* field is a keyword, test above checked it */
229 field = CAR(object);
230 if (id == ATOMID(field)) {
261 * it is acceptable to set a field more than once, but in that case,
269 field = CAR(object);
270 if (CONSP(field))
271 field = CAR(field);
272 if (ATOMID(field) == id)
276 LispDestroy("%s: %s is not a field for %s",