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

  /xsrc/external/mit/xedit/dist/lisp/
compile.c 282 * (tagbody
322 /* Initialize the TAGBODY */
362 /* Finish the TAGBODY */
877 tagbody &rest body
887 /* Tagbody returns NIL */
892 /* Tagbody always returns NIL */
1279 for (i = 0; i < com->block->tagbody.length; i++)
1280 if (label == com->block->tagbody.labels[i])
1281 LispDestroy("TAGBODY: tag %s specified more than once",
1284 if (com->block->tagbody.length >= com->block->tagbody.space)
    [all...]
bytecode.c 105 /* If in tagbody, ignore anything that is not code */
107 com->level == com->tagbody)
206 } tagbody; member in struct:_CodeBlock
228 int tagbody; /* Inside a tagbody block? */ member in struct:_LispCom
1344 LispFree(block->tagbody.labels);
1345 LispFree(block->tagbody.codes);
1397 com->tagbody = com->level;
1405 com->tagbody = com->block->level;
2125 for (i = 0; i < block->tagbody.length; i++
    [all...]
  /xsrc/external/mit/xedit/dist/lisp/modules/
lisp.lsp 85 `(block nil (let ,init (tagbody ,@body))))
88 `(block nil (let* ,init (tagbody ,@body))))

Completed in 6 milliseconds