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

  /xsrc/external/mit/xedit/dist/lisp/
compile.c 1399 LispObj **symbols, **defaults, **sforms; local
1463 sforms = alist->optionals.sforms;
1468 if (sforms[i]) {
1469 ComPush(com, sforms[i], T, 0, builtin, compile);
1471 COM_VARIABLE_ARGUMENT(sforms[i]->data.atom);
1490 if (sforms[i]) {
1491 ComPush(com, sforms[i], NIL, 0, builtin, compile);
1493 COM_VARIABLE_ARGUMENT(sforms[i]->data.atom);
1518 sforms = alist->keys.sforms
    [all...]
lisp.c 1733 LispMused(alist->optionals.sforms);
1738 LispMused(alist->keys.sforms);
1756 LispFree(alist->optionals.sforms);
1761 LispFree(alist->keys.sforms);
1959 REALLOC_OBJECTS(alist->keys.sforms, count + 1);
1963 alist->keys.sforms[count] = sform;
1995 REALLOC_OBJECTS(alist->optionals.sforms, count + 1);
1998 alist->optionals.sforms[count] = sform;
2098 REALLOC_OBJECTS(alist->keys.sforms, count + 1);
2102 alist->keys.sforms[count] = NULL
4037 LispObj **symbols, **defaults, **sforms; local
    [all...]
private.h 114 LispObj **sforms; /* T if variable specified, NIL otherwise */ member in struct:_LispOptionalArgs
122 LispObj **sforms; /* T if variable specified, NIL otherwise */ member in struct:_LispKeyArgs
write.c 562 if (alist->optionals.sforms[i]) {
564 WRITE_ATOM(alist->optionals.sforms[i]);
589 if (alist->keys.sforms[i]) {
591 WRITE_ATOM(alist->keys.sforms[i]);
bytecode.c 421 int i, sforms; local
423 for (i = sforms = 0; i < alist->optionals.num_symbols; i++)
424 if (alist->optionals.sforms[i])
425 ++sforms;
428 i = sforms +
461 if (alist->keys.sforms[i]) {
773 if (alist->optionals.sforms[i]) {
777 id = alist->optionals.sforms[i]->data.atom->key;
802 if (alist->keys.sforms[i]) {
806 id = alist->keys.sforms[i]->data.atom->key
    [all...]

Completed in 27 milliseconds