ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/microscheme/opdefines.h
(Generate patch)

Comparing microscheme/opdefines.h (file contents):
Revision 1.4 by root, Thu Nov 26 21:32:16 2015 UTC vs.
Revision 1.5 by root, Thu Nov 26 22:53:28 2015 UTC

1OP_DEF (0, "load", 1, 1, TST_STRING, OP_LOAD) 1OP_DEF (0, "load", 1, 1, TST_STRING, OP_LOAD)
2OP_DEF (0, 0, 0, 0, 0, OP_T0LVL) 2OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_T0LVL)
3OP_DEF (0, 0, 0, 0, 0, OP_T1LVL) 3OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_T1LVL)
4OP_DEF (0, 0, 0, 0, 0, OP_READ_INTERNAL) 4OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_READ_INTERNAL)
5OP_DEF (0, "gensym", 0, 0, 0, OP_GENSYM) 5OP_DEF (0, "gensym", 0, 0, 0, OP_GENSYM)
6OP_DEF (0, 0, 0, 0, 0, OP_VALUEPRINT) 6OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_VALUEPRINT)
7OP_DEF (0, 0, 0, 0, 0, OP_EVAL) 7OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_EVAL)
8#if USE_TRACING 8#if USE_TRACING
9OP_DEF (0, 0, 0, 0, 0, OP_REAL_EVAL) 9OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_REAL_EVAL)
10#endif 10#endif
11OP_DEF (0, 0, 0, 0, 0, OP_E0ARGS) 11OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_E0ARGS)
12OP_DEF (0, 0, 0, 0, 0, OP_E1ARGS) 12OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_E1ARGS)
13OP_DEF (0, 0, 0, 0, 0, OP_APPLY) 13OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_APPLY)
14#if USE_TRACING 14#if USE_TRACING
15OP_DEF (0, 0, 0, 0, 0, OP_REAL_APPLY) 15OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_REAL_APPLY)
16OP_DEF (0, "tracing", 1, 1, TST_NATURAL, OP_TRACING) 16OP_DEF (0, "tracing", 1, 1, TST_NATURAL, OP_TRACING)
17#endif 17#endif
18OP_DEF (0, 0, 0, 0, 0, OP_DOMACRO) 18OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_DOMACRO)
19OP_DEF (0, 0, 0, 0, 0, OP_LAMBDA) 19OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_LAMBDA)
20OP_DEF (0, 0, 0, 0, 0, OP_LAMBDA1) 20OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_LAMBDA1)
21OP_DEF (0, "make-closure", 1, 2, TST_PAIR TST_ENVIRONMENT, OP_MKCLOSURE) 21OP_DEF (0, "make-closure", 1, 2, TST_PAIR TST_ENVIRONMENT, OP_MKCLOSURE)
22OP_DEF (0, 0, 0, 0, 0, OP_QUOTE) 22OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_QUOTE)
23OP_DEF (0, 0, 0, 0, 0, OP_DEF0) 23OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_DEF0)
24OP_DEF (0, 0, 0, 0, 0, OP_DEF1) 24OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_DEF1)
25OP_DEF (0, "defined?", 1, 2, TST_SYMBOL TST_ENVIRONMENT, OP_DEFP) 25OP_DEF (0, "defined?", 1, 2, TST_SYMBOL TST_ENVIRONMENT, OP_DEFP)
26OP_DEF (0, 0, 0, 0, 0, OP_BEGIN) 26OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_BEGIN)
27OP_DEF (0, 0, 0, 0, 0, OP_IF0) 27OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_IF0)
28OP_DEF (0, 0, 0, 0, 0, OP_IF1) 28OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_IF1)
29OP_DEF (0, 0, 0, 0, 0, OP_SET0) 29OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_SET0)
30OP_DEF (0, 0, 0, 0, 0, OP_SET1) 30OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_SET1)
31OP_DEF (0, 0, 0, 0, 0, OP_LET0) 31OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_LET0)
32OP_DEF (0, 0, 0, 0, 0, OP_LET1) 32OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_LET1)
33OP_DEF (0, 0, 0, 0, 0, OP_LET2) 33OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_LET2)
34OP_DEF (0, 0, 0, 0, 0, OP_LET0AST) 34OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_LET0AST)
35OP_DEF (0, 0, 0, 0, 0, OP_LET1AST) 35OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_LET1AST)
36OP_DEF (0, 0, 0, 0, 0, OP_LET2AST) 36OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_LET2AST)
37OP_DEF (0, 0, 0, 0, 0, OP_LET0REC) 37OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_LET0REC)
38OP_DEF (0, 0, 0, 0, 0, OP_LET1REC) 38OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_LET1REC)
39OP_DEF (0, 0, 0, 0, 0, OP_LET2REC) 39OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_LET2REC)
40OP_DEF (0, 0, 0, 0, 0, OP_COND0) 40OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_COND0)
41OP_DEF (0, 0, 0, 0, 0, OP_COND1) 41OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_COND1)
42OP_DEF (0, 0, 0, 0, 0, OP_DELAY) 42OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_DELAY)
43OP_DEF (0, 0, 0, 0, 0, OP_AND0) 43OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_AND0)
44OP_DEF (0, 0, 0, 0, 0, OP_AND1) 44OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_AND1)
45OP_DEF (0, 0, 0, 0, 0, OP_OR0) 45OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_OR0)
46OP_DEF (0, 0, 0, 0, 0, OP_OR1) 46OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_OR1)
47OP_DEF (0, 0, 0, 0, 0, OP_C0STREAM) 47OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_C0STREAM)
48OP_DEF (0, 0, 0, 0, 0, OP_C1STREAM) 48OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_C1STREAM)
49OP_DEF (0, 0, 0, 0, 0, OP_MACRO0) 49OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_MACRO0)
50OP_DEF (0, 0, 0, 0, 0, OP_MACRO1) 50OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_MACRO1)
51OP_DEF (0, 0, 0, 0, 0, OP_CASE0) 51OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_CASE0)
52OP_DEF (0, 0, 0, 0, 0, OP_CASE1) 52OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_CASE1)
53OP_DEF (0, 0, 0, 0, 0, OP_CASE2) 53OP_DEF (0, UNNAMED_OP, 0, 0, 0, OP_CASE2)
54OP_DEF (0, "eval", 1, 2, TST_ANY TST_ENVIRONMENT, OP_PEVAL) 54OP_DEF (0, "eval", 1, 2, TST_ANY TST_ENVIRONMENT, OP_PEVAL)
55OP_DEF (0, "apply", 1, INF_ARG, TST_NONE, OP_PAPPLY) 55OP_DEF (0, "apply", 1, INF_ARG, TST_NONE, OP_PAPPLY)
56OP_DEF (0, "call-with-current-continuation", 1, 1, TST_NONE, OP_CONTINUATION) 56OP_DEF (0, "call-with-current-continuation", 1, 1, TST_NONE, OP_CONTINUATION)
57#if USE_MATH 57#if USE_MATH
58OP_DEF (2, "inexact->exact", 1, 1, TST_NUMBER, OP_INEX2EX) 58OP_DEF (1, "inexact->exact", 1, 1, TST_NUMBER, OP_INEX2EX)
59OP_DEF (2, "exp", 1, 1, TST_NUMBER, OP_EXP) 59OP_DEF (1, "exp", 1, 1, TST_NUMBER, OP_EXP)
60OP_DEF (2, "log", 1, 1, TST_NUMBER, OP_LOG) 60OP_DEF (1, "log", 1, 1, TST_NUMBER, OP_LOG)
61OP_DEF (2, "sin", 1, 1, TST_NUMBER, OP_SIN) 61OP_DEF (1, "sin", 1, 1, TST_NUMBER, OP_SIN)
62OP_DEF (2, "cos", 1, 1, TST_NUMBER, OP_COS) 62OP_DEF (1, "cos", 1, 1, TST_NUMBER, OP_COS)
63OP_DEF (2, "tan", 1, 1, TST_NUMBER, OP_TAN) 63OP_DEF (1, "tan", 1, 1, TST_NUMBER, OP_TAN)
64OP_DEF (2, "asin", 1, 1, TST_NUMBER, OP_ASIN) 64OP_DEF (1, "asin", 1, 1, TST_NUMBER, OP_ASIN)
65OP_DEF (2, "acos", 1, 1, TST_NUMBER, OP_ACOS) 65OP_DEF (1, "acos", 1, 1, TST_NUMBER, OP_ACOS)
66OP_DEF (2, "atan", 1, 2, TST_NUMBER, OP_ATAN) 66OP_DEF (1, "atan", 1, 2, TST_NUMBER, OP_ATAN)
67OP_DEF (2, "sqrt", 1, 1, TST_NUMBER, OP_SQRT) 67OP_DEF (1, "sqrt", 1, 1, TST_NUMBER, OP_SQRT)
68OP_DEF (2, "expt", 2, 2, TST_NUMBER, OP_EXPT) 68OP_DEF (1, "expt", 2, 2, TST_NUMBER, OP_EXPT)
69OP_DEF (2, "floor", 1, 1, TST_NUMBER, OP_FLOOR) 69OP_DEF (1, "floor", 1, 1, TST_NUMBER, OP_FLOOR)
70OP_DEF (2, "ceiling", 1, 1, TST_NUMBER, OP_CEILING) 70OP_DEF (1, "ceiling", 1, 1, TST_NUMBER, OP_CEILING)
71OP_DEF (2, "truncate", 1, 1, TST_NUMBER, OP_TRUNCATE) 71OP_DEF (1, "truncate", 1, 1, TST_NUMBER, OP_TRUNCATE)
72OP_DEF (2, "round", 1, 1, TST_NUMBER, OP_ROUND) 72OP_DEF (1, "round", 1, 1, TST_NUMBER, OP_ROUND)
73#endif 73#endif
74OP_DEF (2, "+", 0, INF_ARG, TST_NUMBER, OP_ADD) 74OP_DEF (1, "+", 0, INF_ARG, TST_NUMBER, OP_ADD)
75OP_DEF (2, "-", 1, INF_ARG, TST_NUMBER, OP_SUB) 75OP_DEF (1, "-", 1, INF_ARG, TST_NUMBER, OP_SUB)
76OP_DEF (2, "*", 0, INF_ARG, TST_NUMBER, OP_MUL) 76OP_DEF (1, "*", 0, INF_ARG, TST_NUMBER, OP_MUL)
77OP_DEF (2, "/", 1, INF_ARG, TST_NUMBER, OP_DIV) 77OP_DEF (1, "/", 1, INF_ARG, TST_NUMBER, OP_DIV)
78OP_DEF (2, "quotient", 1, INF_ARG, TST_INTEGER, OP_INTDIV) 78OP_DEF (1, "quotient", 1, INF_ARG, TST_INTEGER, OP_INTDIV)
79OP_DEF (2, "remainder", 2, 2, TST_INTEGER, OP_REM) 79OP_DEF (1, "remainder", 2, 2, TST_INTEGER, OP_REM)
80OP_DEF (2, "modulo", 2, 2, TST_INTEGER, OP_MOD) 80OP_DEF (1, "modulo", 2, 2, TST_INTEGER, OP_MOD)
81OP_DEF (2, "car", 1, 1, TST_PAIR, OP_CAR) 81OP_DEF (1, "car", 1, 1, TST_PAIR, OP_CAR)
82OP_DEF (2, "cdr", 1, 1, TST_PAIR, OP_CDR) 82OP_DEF (1, "cdr", 1, 1, TST_PAIR, OP_CDR)
83OP_DEF (2, "cons", 2, 2, TST_NONE, OP_CONS) 83OP_DEF (1, "cons", 2, 2, TST_NONE, OP_CONS)
84OP_DEF (2, "set-car!", 2, 2, TST_PAIR TST_ANY, OP_SETCAR) 84OP_DEF (1, "set-car!", 2, 2, TST_PAIR TST_ANY, OP_SETCAR)
85OP_DEF (2, "set-cdr!", 2, 2, TST_PAIR TST_ANY, OP_SETCDR) 85OP_DEF (1, "set-cdr!", 2, 2, TST_PAIR TST_ANY, OP_SETCDR)
86OP_DEF (2, "char->integer", 1, 1, TST_CHAR, OP_CHAR2INT) 86OP_DEF (1, "char->integer", 1, 1, TST_CHAR, OP_CHAR2INT)
87OP_DEF (2, "integer->char", 1, 1, TST_NATURAL, OP_INT2CHAR) 87OP_DEF (1, "integer->char", 1, 1, TST_NATURAL, OP_INT2CHAR)
88OP_DEF (2, "char-upcase", 1, 1, TST_CHAR, OP_CHARUPCASE) 88OP_DEF (1, "char-upcase", 1, 1, TST_CHAR, OP_CHARUPCASE)
89OP_DEF (2, "char-downcase", 1, 1, TST_CHAR, OP_CHARDNCASE) 89OP_DEF (1, "char-downcase", 1, 1, TST_CHAR, OP_CHARDNCASE)
90OP_DEF (2, "symbol->string", 1, 1, TST_SYMBOL, OP_SYM2STR) 90OP_DEF (1, "symbol->string", 1, 1, TST_SYMBOL, OP_SYM2STR)
91OP_DEF (2, "atom->string", 1, 2, TST_ANY TST_NATURAL, OP_ATOM2STR) 91OP_DEF (1, "atom->string", 1, 2, TST_ANY TST_NATURAL, OP_ATOM2STR)
92OP_DEF (2, "string->symbol", 1, 1, TST_STRING, OP_STR2SYM) 92OP_DEF (1, "string->symbol", 1, 1, TST_STRING, OP_STR2SYM)
93OP_DEF (2, "string->atom", 1, 2, TST_STRING TST_NATURAL, OP_STR2ATOM) 93OP_DEF (1, "string->atom", 1, 2, TST_STRING TST_NATURAL, OP_STR2ATOM)
94OP_DEF (2, "make-string", 1, 2, TST_NATURAL TST_CHAR, OP_MKSTRING) 94OP_DEF (1, "make-string", 1, 2, TST_NATURAL TST_CHAR, OP_MKSTRING)
95OP_DEF (2, "string-length", 1, 1, TST_STRING, OP_STRLEN) 95OP_DEF (1, "string-length", 1, 1, TST_STRING, OP_STRLEN)
96OP_DEF (2, "string-ref", 2, 2, TST_STRING TST_NATURAL, OP_STRREF) 96OP_DEF (1, "string-ref", 2, 2, TST_STRING TST_NATURAL, OP_STRREF)
97OP_DEF (2, "string-set!", 3, 3, TST_STRING TST_NATURAL TST_CHAR, OP_STRSET) 97OP_DEF (1, "string-set!", 3, 3, TST_STRING TST_NATURAL TST_CHAR, OP_STRSET)
98OP_DEF (2, "string-append", 0, INF_ARG, TST_STRING, OP_STRAPPEND) 98OP_DEF (1, "string-append", 0, INF_ARG, TST_STRING, OP_STRAPPEND)
99OP_DEF (2, "substring", 2, 3, TST_STRING TST_NATURAL, OP_SUBSTR) 99OP_DEF (1, "substring", 2, 3, TST_STRING TST_NATURAL, OP_SUBSTR)
100OP_DEF (2, "vector", 0, INF_ARG, TST_NONE, OP_VECTOR) 100OP_DEF (1, "vector", 0, INF_ARG, TST_NONE, OP_VECTOR)
101OP_DEF (2, "make-vector", 1, 2, TST_NATURAL TST_ANY, OP_MKVECTOR) 101OP_DEF (1, "make-vector", 1, 2, TST_NATURAL TST_ANY, OP_MKVECTOR)
102OP_DEF (2, "vector-length", 1, 1, TST_VECTOR, OP_VECLEN) 102OP_DEF (1, "vector-length", 1, 1, TST_VECTOR, OP_VECLEN)
103OP_DEF (2, "vector-ref", 2, 2, TST_VECTOR TST_NATURAL, OP_VECREF) 103OP_DEF (1, "vector-ref", 2, 2, TST_VECTOR TST_NATURAL, OP_VECREF)
104OP_DEF (2, "vector-set!", 3, 3, TST_VECTOR TST_NATURAL TST_ANY, OP_VECSET) 104OP_DEF (1, "vector-set!", 3, 3, TST_VECTOR TST_NATURAL TST_ANY, OP_VECSET)
105OP_DEF (r, "=", 2, INF_ARG, TST_NUMBER, OP_NUMEQ) 105OP_DEF (2, "=", 2, INF_ARG, TST_NUMBER, OP_NUMEQ)
106OP_DEF (r, "<", 2, INF_ARG, TST_NUMBER, OP_LESS) 106OP_DEF (2, "<", 2, INF_ARG, TST_NUMBER, OP_LESS)
107OP_DEF (r, ">", 2, INF_ARG, TST_NUMBER, OP_GRE) 107OP_DEF (2, ">", 2, INF_ARG, TST_NUMBER, OP_GRE)
108OP_DEF (r, "<=", 2, INF_ARG, TST_NUMBER, OP_LEQ) 108OP_DEF (2, "<=", 2, INF_ARG, TST_NUMBER, OP_LEQ)
109OP_DEF (r, ">=", 2, INF_ARG, TST_NUMBER, OP_GEQ) 109OP_DEF (2, ">=", 2, INF_ARG, TST_NUMBER, OP_GEQ)
110OP_DEF (3, "not", 1, 1, TST_NONE, OP_NOT) 110OP_DEF (3, "not", 1, 1, TST_NONE, OP_NOT)
111OP_DEF (3, "boolean?", 1, 1, TST_NONE, OP_BOOLP) 111OP_DEF (3, "boolean?", 1, 1, TST_NONE, OP_BOOLP)
112OP_DEF (3, "eof-object?", 1, 1, TST_NONE, OP_EOFOBJP) 112OP_DEF (3, "eof-object?", 1, 1, TST_NONE, OP_EOFOBJP)
113OP_DEF (3, "null?", 1, 1, TST_NONE, OP_NULLP) 113OP_DEF (3, "null?", 1, 1, TST_NONE, OP_NULLP)
114OP_DEF (3, "symbol?", 1, 1, TST_ANY, OP_SYMBOLP) 114OP_DEF (3, "symbol?", 1, 1, TST_ANY, OP_SYMBOLP)
… …
135OP_DEF (3, "environment?", 1, 1, TST_ANY, OP_ENVP) 135OP_DEF (3, "environment?", 1, 1, TST_ANY, OP_ENVP)
136OP_DEF (3, "vector?", 1, 1, TST_ANY, OP_VECTORP) 136OP_DEF (3, "vector?", 1, 1, TST_ANY, OP_VECTORP)
137OP_DEF (3, "eq?", 2, 2, TST_ANY, OP_EQ) 137OP_DEF (3, "eq?", 2, 2, TST_ANY, OP_EQ)
138OP_DEF (3, "eqv?", 2, 2, TST_ANY, OP_EQV) 138OP_DEF (3, "eqv?", 2, 2, TST_ANY, OP_EQV)
139OP_DEF (4, "force", 1, 1, TST_ANY, OP_FORCE) 139OP_DEF (4, "force", 1, 1, TST_ANY, OP_FORCE)
140OP_DEF (4, 0, 0, 0, 0, OP_SAVE_FORCED) 140OP_DEF (4, UNNAMED_OP, 0, 0, 0, OP_SAVE_FORCED)
141#if USE_PORTS 141#if USE_PORTS
142OP_DEF (4, "write", 1, 2, TST_ANY TST_OUTPORT, OP_WRITE) 142OP_DEF (4, "write", 1, 2, TST_ANY TST_OUTPORT, OP_WRITE)
143OP_DEF (4, "write-char", 1, 2, TST_CHAR TST_OUTPORT, OP_WRITE_CHAR) 143OP_DEF (4, "write-char", 1, 2, TST_CHAR TST_OUTPORT, OP_WRITE_CHAR)
144OP_DEF (4, "display", 1, 2, TST_ANY TST_OUTPORT, OP_DISPLAY) 144OP_DEF (4, "display", 1, 2, TST_ANY TST_OUTPORT, OP_DISPLAY)
145OP_DEF (4, "newline", 0, 1, TST_OUTPORT, OP_NEWLINE) 145OP_DEF (4, "newline", 0, 1, TST_OUTPORT, OP_NEWLINE)
146#endif 146#endif
147OP_DEF (4, "error", 1, INF_ARG, TST_NONE, OP_ERR0) 147OP_DEF (4, "error", 1, INF_ARG, TST_NONE, OP_ERR0)
148OP_DEF (4, 0, 0, 0, 0, OP_ERR1) 148OP_DEF (4, UNNAMED_OP, 0, 0, 0, OP_ERR1)
149OP_DEF (4, "reverse", 1, 1, TST_LIST, OP_REVERSE) 149OP_DEF (4, "reverse", 1, 1, TST_LIST, OP_REVERSE)
150OP_DEF (4, "list*", 1, INF_ARG, TST_NONE, OP_LIST_STAR) 150OP_DEF (4, "list*", 1, INF_ARG, TST_NONE, OP_LIST_STAR)
151OP_DEF (4, "append", 0, INF_ARG, TST_NONE, OP_APPEND) 151OP_DEF (4, "append", 0, INF_ARG, TST_NONE, OP_APPEND)
152#if USE_PLIST 152#if USE_PLIST
153OP_DEF (4, "put", 3, 3, TST_NONE, OP_PUT) 153OP_DEF (4, "put", 3, 3, TST_NONE, OP_PUT)
… …
181OP_DEF (5, "peek-char", 0, 1, TST_INPORT, OP_PEEK_CHAR) 181OP_DEF (5, "peek-char", 0, 1, TST_INPORT, OP_PEEK_CHAR)
182OP_DEF (5, "char-ready?", 0, 1, TST_INPORT, OP_CHAR_READY) 182OP_DEF (5, "char-ready?", 0, 1, TST_INPORT, OP_CHAR_READY)
183OP_DEF (5, "set-input-port", 1, 1, TST_INPORT, OP_SET_INPORT) 183OP_DEF (5, "set-input-port", 1, 1, TST_INPORT, OP_SET_INPORT)
184OP_DEF (5, "set-output-port", 1, 1, TST_OUTPORT, OP_SET_OUTPORT) 184OP_DEF (5, "set-output-port", 1, 1, TST_OUTPORT, OP_SET_OUTPORT)
185#endif 185#endif
186OP_DEF (5, 0, 0, 0, 0, OP_RDSEXPR) 186OP_DEF (5, UNNAMED_OP, 0, 0, 0, OP_RDSEXPR)
187OP_DEF (5, 0, 0, 0, 0, OP_RDLIST) 187OP_DEF (5, UNNAMED_OP, 0, 0, 0, OP_RDLIST)
188OP_DEF (5, 0, 0, 0, 0, OP_RDDOT) 188OP_DEF (5, UNNAMED_OP, 0, 0, 0, OP_RDDOT)
189OP_DEF (5, 0, 0, 0, 0, OP_RDQUOTE) 189OP_DEF (5, UNNAMED_OP, 0, 0, 0, OP_RDQUOTE)
190OP_DEF (5, 0, 0, 0, 0, OP_RDQQUOTE) 190OP_DEF (5, UNNAMED_OP, 0, 0, 0, OP_RDQQUOTE)
191OP_DEF (5, 0, 0, 0, 0, OP_RDQQUOTEVEC) 191OP_DEF (5, UNNAMED_OP, 0, 0, 0, OP_RDQQUOTEVEC)
192OP_DEF (5, 0, 0, 0, 0, OP_RDUNQUOTE) 192OP_DEF (5, UNNAMED_OP, 0, 0, 0, OP_RDUNQUOTE)
193OP_DEF (5, 0, 0, 0, 0, OP_RDUQTSP) 193OP_DEF (5, UNNAMED_OP, 0, 0, 0, OP_RDUQTSP)
194OP_DEF (5, 0, 0, 0, 0, OP_RDVEC) 194OP_DEF (5, UNNAMED_OP, 0, 0, 0, OP_RDVEC)
195OP_DEF (5, 0, 0, 0, 0, OP_P0LIST) 195OP_DEF (5, UNNAMED_OP, 0, 0, 0, OP_P0LIST)
196OP_DEF (5, 0, 0, 0, 0, OP_P1LIST) 196OP_DEF (5, UNNAMED_OP, 0, 0, 0, OP_P1LIST)
197OP_DEF (5, 0, 0, 0, 0, OP_PVECFROM) 197OP_DEF (5, UNNAMED_OP, 0, 0, 0, OP_PVECFROM)
198OP_DEF (6, "length", 1, 1, TST_LIST, OP_LIST_LENGTH) 198OP_DEF (6, "length", 1, 1, TST_LIST, OP_LIST_LENGTH)
199OP_DEF (6, "assq", 2, 2, TST_NONE, OP_ASSQ) 199OP_DEF (6, "assq", 2, 2, TST_NONE, OP_ASSQ)
200OP_DEF (6, "get-closure-code", 1, 1, TST_NONE, OP_GET_CLOSURE) 200OP_DEF (6, "get-closure-code", 1, 1, TST_NONE, OP_GET_CLOSURE)
201OP_DEF (6, "closure?", 1, 1, TST_NONE, OP_CLOSUREP) 201OP_DEF (6, "closure?", 1, 1, TST_NONE, OP_CLOSUREP)
202OP_DEF (6, "macro?", 1, 1, TST_NONE, OP_MACROP) 202OP_DEF (6, "macro?", 1, 1, TST_NONE, OP_MACROP)
203

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines