Cross Reference: /xsrc/external/mit/xedit/dist/lisp/lisp.c

Lines Matching defs:protect
562     {LispMacro, Lisp_UnwindProtect, "unwind-protect protect &rest cleanup"},
834     lisp__data.protect.length = 0;
934     /* protect environment */
940     /* protect multiple return values */
946     /* protect stack of arguments to builtin functions */
952     /* protect temporary data used by builtin functions */
953     for (pentry = lisp__data.protect.objects,
954 	 eentry = pentry + lisp__data.protect.length;
2154     int length = lisp__data.protect.length;
2174     if (length + 1 >= lisp__data.protect.space)
2176     lisp__data.protect.objects[lisp__data.protect.length++] = list;
2193     lisp__data.protect.length = length;
2194     COD = code;			/* LispRead protect data in COD */
3715 	lisp__data.protect.objects[lisp__data.protect.length++] = tag;
3720     block->protect = lisp__data.protect.length;
3738     lisp__data.protect.length = block->protect;
3833     int protect;
3840     protect = lisp__data.protect.length;
3847     if (protect + 1 >= lisp__data.protect.space)
3849     lisp__data.protect.objects[lisp__data.protect.length++] = NIL;
3879 		/* gc protect result */
3880 		lisp__data.protect.objects[protect] = result;
3885 		    /* gc protect result */
3886 		    lisp__data.protect.objects[protect] = result;
3890 		    /* gc protect result */
3891 		    lisp__data.protect.objects[protect] = result;
3949     lisp__data.protect.length = protect;
4020     objects = realloc(lisp__data.protect.objects,
4021 		      (lisp__data.protect.space + 256) * sizeof(LispObj*));
4026     lisp__data.protect.objects = objects;
4027     lisp__data.protect.space += 256;
4889     /* protect expansion, and executes it */
4913     /* protect expansion */