Mercurial > hg > xemacs-beta

annotate src/bytecode-ops.h @ 5139:a48ef26d87ee

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Clean up prototypes for Lisp variables/symbols. Put decls for them with the other stuff related to the file they're in. In the process, fix a few places with incorrect initialization of symbols and variables. -------------------- ChangeLog entries follow: -------------------- src/ChangeLog addition: 2010-03-12 Ben Wing <ben@xemacs.org> * lisp.h: * lisp.h (redo-symbols): Removed. Put the Lisp variables and symbols where they belong, with other stuff related to the file they're in. * event-Xt.c (THIS_IS_X): * event-Xt.c (syms_of_event_Xt): * event-Xt.c (reinit_vars_of_event_Xt): * event-gtk.c: * event-gtk.c (syms_of_event_gtk): * event-gtk.c (reinit_vars_of_event_gtk): * event-stream.c: * event-stream.c (syms_of_event_stream): * event-stream.c (reinit_vars_of_event_stream): * events.c (reinit_vars_of_events): * events.c (vars_of_events): `sans-modifiers' was defsymbol'ed more than once. Move it to events-stream.c. `self-insert-command' was defsymbol'ed more than once. Vevent_resource should be staticpro_nodump()ed as it's declared in a reinit_*() method. * lread.c (vars_of_lread): Vfile_domain wasn't staticpro'ed. * minibuf.c: * minibuf.c (reinit_complex_vars_of_minibuf): Vminibuffer_zero and Vecho_area_buffer weren't staticpro'ed.
author Ben Wing <ben@xemacs.org>
date Fri, 12 Mar 2010 20:23:50 -0600
parents 99f8ebc082d9
children 308d34e9f07d
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
4921
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
1 /* Execution of byte code produced by bytecomp.el.
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
2 Implementation of compiled-function objects.
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
3 Copyright (C) 1992, 1993 Free Software Foundation, Inc.
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
4 Copyright (C) 1995, 2002, 2010 Ben Wing.
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
5
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
6 This file is part of XEmacs.
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
7
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
8 XEmacs is free software; you can redistribute it and/or modify it
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
9 under the terms of the GNU General Public License as published by the
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
10 Free Software Foundation; either version 2, or (at your option) any
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
11 later version.
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
12
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
13 XEmacs is distributed in the hope that it will be useful, but WITHOUT
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
14 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
15 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
16 for more details.
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
17
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
18 You should have received a copy of the GNU General Public License
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
19 along with XEmacs; see the file COPYING. If not, write to
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
20 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
21 Boston, MA 02111-1307, USA. */
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
22
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
23 /* Synched up with: Mule 2.0, FSF 19.30. */
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
24
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
25 /* There is more than one place in bytecode.c that may want to do something
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
26 with the list of all the opcodes. To handle this, we extract them into
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
27 a separate file that can get included after defining OPCODE(sym, val)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
28 appropriately. No need to undefine OPCODE; that happens automatically.
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
29 */
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
30
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
31 OPCODE (varref, 010)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
32 OPCODE (varset, 020)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
33 OPCODE (varbind, 030)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
34 OPCODE (call, 040)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
35 OPCODE (unbind, 050)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
36
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
37 OPCODE (nth, 070)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
38 OPCODE (symbolp, 071)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
39 OPCODE (consp, 072)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
40 OPCODE (stringp, 073)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
41 OPCODE (listp, 074)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
42 OPCODE (old_eq, 075)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
43 OPCODE (old_memq, 076)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
44 OPCODE (not, 077)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
45 OPCODE (car, 0100)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
46 OPCODE (cdr, 0101)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
47 OPCODE (cons, 0102)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
48 OPCODE (list1, 0103)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
49 OPCODE (list2, 0104)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
50 OPCODE (list3, 0105)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
51 OPCODE (list4, 0106)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
52 OPCODE (length, 0107)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
53 OPCODE (aref, 0110)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
54 OPCODE (aset, 0111)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
55 OPCODE (symbol_value, 0112)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
56 OPCODE (symbol_function, 0113)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
57 OPCODE (set, 0114)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
58 OPCODE (fset, 0115)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
59 OPCODE (get, 0116)
5089
99f8ebc082d9 Make #'substring an alias of #'subseq; give the latter the byte code.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4921
diff changeset
60 OPCODE (subseq, 0117)
4921
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
61 OPCODE (concat2, 0120)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
62 OPCODE (concat3, 0121)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
63 OPCODE (concat4, 0122)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
64 OPCODE (sub1, 0123)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
65 OPCODE (add1, 0124)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
66 OPCODE (eqlsign, 0125)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
67 OPCODE (gtr, 0126)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
68 OPCODE (lss, 0127)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
69 OPCODE (leq, 0130)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
70 OPCODE (geq, 0131)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
71 OPCODE (diff, 0132)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
72 OPCODE (negate, 0133)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
73 OPCODE (plus, 0134)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
74 OPCODE (max, 0135)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
75 OPCODE (min, 0136)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
76 OPCODE (mult, 0137)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
77
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
78 OPCODE (point, 0140)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
79 OPCODE (eq, 0141) /* was Bmark, but no longer
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
80 generated as of v18 */
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
81 OPCODE (goto_char, 0142)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
82 OPCODE (insert, 0143)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
83 OPCODE (point_max, 0144)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
84 OPCODE (point_min, 0145)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
85 OPCODE (char_after, 0146)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
86 OPCODE (following_char, 0147)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
87 OPCODE (preceding_char, 0150)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
88 OPCODE (current_column, 0151)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
89 OPCODE (indent_to, 0152)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
90 OPCODE (equal, 0153) /* was Bscan_buffer, but no
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
91 longer generated as of
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
92 v18 */
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
93 OPCODE (eolp, 0154)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
94 OPCODE (eobp, 0155)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
95 OPCODE (bolp, 0156)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
96 OPCODE (bobp, 0157)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
97 OPCODE (current_buffer, 0160)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
98 OPCODE (set_buffer, 0161)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
99 OPCODE (save_current_buffer, 0162) /* was Bread_char, but no
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
100 longer generated as of
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
101 v19 */
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
102 OPCODE (memq, 0163) /* was Bset_mark, but no
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
103 longer generated as of
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
104 v18 */
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
105 OPCODE (interactive_p, 0164) /* Needed since interactive-p
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
106 takes unevalled args */
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
107 OPCODE (forward_char, 0165)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
108 OPCODE (forward_word, 0166)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
109 OPCODE (skip_chars_forward, 0167)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
110 OPCODE (skip_chars_backward, 0170)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
111 OPCODE (forward_line, 0171)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
112 OPCODE (char_syntax, 0172)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
113 OPCODE (buffer_substring, 0173)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
114 OPCODE (delete_region, 0174)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
115 OPCODE (narrow_to_region, 0175)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
116 OPCODE (widen, 0176)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
117 OPCODE (end_of_line, 0177)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
118
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
119 OPCODE (constant2, 0201)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
120 OPCODE (goto, 0202)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
121 OPCODE (gotoifnil, 0203)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
122 OPCODE (gotoifnonnil, 0204)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
123 OPCODE (gotoifnilelsepop, 0205)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
124 OPCODE (gotoifnonnilelsepop, 0206)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
125 OPCODE (return, 0207)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
126 OPCODE (discard, 0210)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
127 OPCODE (dup, 0211)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
128
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
129 OPCODE (save_excursion, 0212)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
130 OPCODE (save_window_excursion, 0213)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
131 OPCODE (save_restriction, 0214)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
132 OPCODE (catch, 0215)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
133
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
134 OPCODE (unwind_protect, 0216)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
135 OPCODE (condition_case, 0217)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
136 OPCODE (temp_output_buffer_setup, 0220)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
137 OPCODE (temp_output_buffer_show, 0221)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
138
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
139 OPCODE (unbind_all, 0222)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
140
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
141 OPCODE (set_marker, 0223)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
142 OPCODE (match_beginning, 0224)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
143 OPCODE (match_end, 0225)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
144 OPCODE (upcase, 0226)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
145 OPCODE (downcase, 0227)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
146
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
147 OPCODE (string_equal, 0230)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
148 OPCODE (string_lessp, 0231)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
149 OPCODE (old_equal, 0232)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
150 OPCODE (nthcdr, 0233)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
151 OPCODE (elt, 0234)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
152 OPCODE (old_member, 0235)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
153 OPCODE (old_assq, 0236)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
154 OPCODE (nreverse, 0237)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
155 OPCODE (setcar, 0240)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
156 OPCODE (setcdr, 0241)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
157 OPCODE (car_safe, 0242)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
158 OPCODE (cdr_safe, 0243)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
159 OPCODE (nconc, 0244)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
160 OPCODE (quo, 0245)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
161 OPCODE (rem, 0246)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
162 OPCODE (numberp, 0247)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
163 OPCODE (fixnump, 0250) /* Was Bintegerp. */
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
164
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
165 OPCODE (Rgoto, 0252)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
166 OPCODE (Rgotoifnil, 0253)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
167 OPCODE (Rgotoifnonnil, 0254)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
168 OPCODE (Rgotoifnilelsepop, 0255)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
169 OPCODE (Rgotoifnonnilelsepop, 0256)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
170
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
171 OPCODE (listN, 0257)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
172 OPCODE (concatN, 0260)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
173 OPCODE (insertN, 0261)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
174
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
175 OPCODE (bind_multiple_value_limits, 0262) /* New in 21.5. */
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
176 OPCODE (multiple_value_list_internal, 0263) /* New in 21.5. */
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
177 OPCODE (multiple_value_call, 0264) /* New in 21.5. */
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
178 OPCODE (throw, 0265) /* New in 21.5. */
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
179
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
180 OPCODE (member, 0266) /* new in v20 */
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
181 OPCODE (assq, 0267) /* new in v20 */
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
182
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
183 OPCODE (constant, 0300)
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
184
17362f371cc2 add more byte-code assertions and better failure output
Ben Wing <ben@xemacs.org>
parents:
diff changeset
185 #undef OPCODE