HomeSort by: relevance | last modified time | path
    Searched defs:struc (Results 1 - 5 of 5) sorted by relevancy

  /xsrc/external/mit/xedit/dist/lisp/
struct.c 185 LispObj *struc, *init; local
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 local
355 LispObj *definition, *struc, *name; local
    [all...]
bytecode.c 189 } struc; member in union:_CodeTree::__anon6587
1585 tree->data.struc.offset = offset;
1586 tree->data.struc.definition = definition;
2469 LinkBuildTableConstant(com, tree->data.struc.definition);
2669 bytecode[offset++] = tree->data.struc.offset;
2670 i = FindIndex(tree->data.struc.definition,
3636 if (!STRUCTP(reg0) || reg0->data.struc.def != reg1) {
3644 for (reg0 = reg0->data.struc.fields; offset; offset--)
3651 reg0 = STRUCTP(reg0) && reg0->data.struc.def == reg1 ? T : NIL;
read.c 662 if (READLABELP(object->data.struc.fields))
663 object->data.struc.fields =
664 LispReadLabelCircle(object->data.struc.fields, info);
666 object = object->data.struc.fields;
1861 LispObj *struc, *fields; local
1886 struc = APPLY(Omake_struct, fields);
1889 return (struc);
internal.h 613 } struc; member in union:_LispObj::__anon6613
lisp.c 2311 object = object->data.struc.fields;
2464 object = object->data.struc.fields;
2941 LispObj *struc = LispNew(fields, def); local
2943 struc->type = LispStruct_t;
2944 struc->data.struc.fields = fields;
2945 struc->data.struc.def = def;
2947 return (struc);

Completed in 13 milliseconds