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

  /xsrc/external/mit/xedit/dist/lisp/
debugger.c 135 * is a macro for lisp__data.dbglist
143 * ENV is the value of lisp__data.stack.base (a FIXNUM)
144 * LEN is the value of lisp__data.env.length (a FIXNUM)
145 * LEX is the value of lisp__data.env.lex (a FIXNUM)
149 * is macro for lisp__data.brklist
179 ++lisp__data.debug_level;
181 DBG = CONS(CONS(name, CONS(arg, CONS(FIXNUM(lisp__data.stack.base),
182 CONS(FIXNUM(lisp__data.env.length),
183 FIXNUM(lisp__data.env.lex))))), DBG);
211 if (lisp__data.debug_level < lisp__data.debug_step
    [all...]
lisp.c 149 LispMac lisp__data; variable
652 if (!lisp__data.destroyed) {
660 if (!lisp__data.ignore_errors) {
669 lisp__data.error_condition = STRING(string);
672 if (lisp__data.debugging) {
678 lisp__data.destroyed = 1;
680 if (lisp__data.errexit)
685 if (lisp__data.debugging) {
687 lisp__data.debug_level = -1;
688 lisp__data.debug = LispDebugUnspec
    [all...]
private.h 67 (lisp__data.features->data.atom->a_object ? \
68 (LispObj *)lisp__data.features->data.atom->property->value : \
70 #define PACK lisp__data.packlist
72 #define PACKAGE lisp__data.package->data.atom->property->value
73 #define MOD lisp__data.modlist
74 #define COD lisp__data.codlist
75 #define RUN lisp__data.runlist
76 #define RES lisp__data.reslist
77 #define DBG lisp__data.dbglist
78 #define BRK lisp__data.brklis
    [all...]
bytecode.c 490 lex = com.lex = lisp__data.env.lex;
494 lisp__data.env.lex = base;
500 lisp__data.env.lex = lex;
501 lisp__data.env.head = lisp__data.env.length = base;
1206 com.lex = lisp__data.env.lex;
2968 pbase = lisp__data.protect.length;
2973 if (lisp__data.env.length + offset > lisp__data.env.space) {
2976 while (lisp__data.env.length + offset >= lisp__data.env.space)
    [all...]
io.c 60 LispUngetInfo *unget = lisp__data.unget[lisp__data.iunget];
95 lisp__data.eof = 1;
103 LispUngetInfo *unget = lisp__data.unget[lisp__data.iunget];
123 lisp__data.input_list = CONS(stream, lisp__data.input_list);
125 if (lisp__data.iunget + 1 == lisp__data.nunget) {
127 realloc(lisp__data.unget
    [all...]
time.c 75 lisp__data.gc.gctime = 0;
76 lisp__data.gc.timebits = 1;
78 count = lisp__data.gc.count;
134 lisp__data.gc.count - count, lisp__data.gc.gctime / 1000000.0);
135 lisp__data.gc.timebits = 0;
compile.c 301 unbound = lisp__data.env.length - lisp__data.env.lex;
317 lisp__data.env.head += 2;
374 lisp__data.env.head -= 2;
375 lisp__data.env.length -= 2;
588 lisp__data.env.head += count;
592 lisp__data.env.head -= count;
593 lisp__data.env.length -= count;
650 ++lisp__data.env.head;
659 lisp__data.env.head -= count
    [all...]
require.c 120 if (lisp__data.module == NULL) {
138 lisp_module->next = lisp__data.module;
139 lisp__data.module = lisp_module;
149 LispSetVar(lisp__data.modules, MOD);
package.c 133 package == lisp__data.keyword ||
163 if (package == lisp__data.keyword ||
164 symbol->data.atom->package == lisp__data.keyword)
202 int head = lisp__data.env.length;
241 ++lisp__data.env.head;
272 lisp__data.env.head = lisp__data.env.length = head;
293 *presult = lisp__data.block.block_ret;
354 savepack = lisp__data.pack;
358 lisp__data.pack = package->data.package.package
    [all...]
helper.c 591 stack = lisp__data.stack.length;
592 lex = lisp__data.env.lex;
593 head = lisp__data.env.length;
615 ++lisp__data.env.head;
629 lisp__data.env.head = lisp__data.env.length;
679 lisp__data.stack.length = stack;
680 lisp__data.env.lex = lex;
681 lisp__data.env.head = lisp__data.env.length = head
    [all...]
struct.c 181 int nfld, ncvt, length = lisp__data.protect.length;
250 if (length + 1 >= lisp__data.protect.space)
252 lisp__data.protect.objects[lisp__data.protect.length++] = fields;
283 lisp__data.protect.length = length;
core.c 250 --lisp__data.protect.length;
609 *pres = lisp__data.block.block_ret;
627 if (atom->package == lisp__data.keyword ||
800 *pres = lisp__data.block.block_ret;
1499 lex = lisp__data.env.lex;
1500 lisp__data.env.lex = lisp__data.env.length;
1502 lisp__data.env.lex = lex;
1889 unsigned blevel = lisp__data.block.block_level;
1896 LispBlock *block = lisp__data.block.block[--blevel]
    [all...]
internal.h 306 ((object)->data.atom->package == lisp__data.keyword)
443 lisp__data.stack.values[lisp__data.stack.base + (index)]
445 #define RETURN(index) lisp__data.returns.values[(index)]
446 #define RETURN_COUNT lisp__data.returns.count
451 #define GC_ENTER() int gc__protect = lisp__data.protect.length
454 if (lisp__data.protect.length >= lisp__data.protect.space) \
456 lisp__data.protect.objects[lisp__data.protect.length++] = objec
    [all...]
write.c 200 head = lisp__data.env.length;
202 ++lisp__data.env.head;
204 lisp__data.env.head = lisp__data.env.length = head;
259 int head = lisp__data.env.length;
289 lisp__data.env.head = lisp__data.env.length;
293 lisp__data.env.head = lisp__data.env.length = head;
1271 if (atom->package == lisp__data.keyword
    [all...]
xedit.c 42 int lisp__running = lisp__data.running
58 lisp__data.running = 1; \
61 if (sigsetjmp(lisp__data.jmp, 1) != 0) { \
63 lisp__data.running = 0; \
73 lisp__data.running = 0; \
273 lisp__data.pack = lisp__data.savepack = xedit->data.package.package;
294 lisp__data.pack = savepackage->data.package.package;
read.c 273 else if (CONSP(lisp__data.input_list)) {
313 input_stream = lisp__data.input;
1295 thepackage = lisp__data.keyword;
1296 pack = lisp__data.key;
1309 if (pack == lisp__data.pack && intern) {
1318 else if (intern || pack == lisp__data.key) {
1325 savepack = lisp__data.pack;
1328 lisp__data.pack = pack;
1332 if (pack == lisp__data.key)
1340 lisp__data.pack = savepack
    [all...]
format.c 1567 lisp__data.protect.objects[gc__protect] = strings;
1891 head = lisp__data.env.length;
1893 ++lisp__data.env.head;
1895 lisp__data.env.head = lisp__data.env.length = head;
1898 head = lisp__data.env.length;
1900 ++lisp__data.env.head;
1902 lisp__data.env.head = lisp__data.env.length = head;
stream.c 514 stream = lisp__data.standard_input;

Completed in 48 milliseconds