diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2001-03-07 10:22:55 -0300 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2001-03-07 10:22:55 -0300 |
commit | 5e870f86a255988ca85eda795adc31063ec1ac70 (patch) | |
tree | 72c428d85c63cd8930217497652bfc387a57ba83 /ltests.c | |
parent | f81b8adb3f2738d2895511082793af622e8581d8 (diff) | |
download | lua-5e870f86a255988ca85eda795adc31063ec1ac70.tar.gz lua-5e870f86a255988ca85eda795adc31063ec1ac70.tar.bz2 lua-5e870f86a255988ca85eda795adc31063ec1ac70.zip |
optimization for tailcall does not seem to pay itself
Diffstat (limited to 'ltests.c')
-rw-r--r-- | ltests.c | 57 |
1 files changed, 48 insertions, 9 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: ltests.c,v 1.73 2001/03/02 17:27:50 roberto Exp roberto $ | 2 | ** $Id: ltests.c,v 1.74 2001/03/06 20:09:38 roberto Exp roberto $ |
3 | ** Internal Module for Debugging of the Lua Implementation | 3 | ** Internal Module for Debugging of the Lua Implementation |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -139,14 +139,53 @@ void *debug_realloc (void *block, size_t oldsize, size_t size) { | |||
139 | 139 | ||
140 | 140 | ||
141 | static const l_char *const instrname[NUM_OPCODES] = { | 141 | static const l_char *const instrname[NUM_OPCODES] = { |
142 | l_s("RETURN"), l_s("CALL"), l_s("TAILCALL"), l_s("PUSHNIL"), l_s("POP"), l_s("PUSHINT"), | 142 | l_s("RETURN"), |
143 | l_s("PUSHSTRING"), l_s("PUSHNUM"), l_s("PUSHNEGNUM"), l_s("PUSHUPVALUE"), l_s("GETLOCAL"), | 143 | l_s("CALL"), |
144 | l_s("GETGLOBAL"), l_s("GETTABLE"), l_s("GETDOTTED"), l_s("GETINDEXED"), l_s("PUSHSELF"), | 144 | l_s("PUSHNIL"), |
145 | l_s("CREATETABLE"), l_s("SETLOCAL"), l_s("SETGLOBAL"), l_s("SETTABLE"), l_s("SETLIST"), l_s("SETMAP"), | 145 | l_s("POP"), |
146 | l_s("ADD"), l_s("ADDI"), l_s("SUB"), l_s("MULT"), l_s("DIV"), l_s("POW"), l_s("CONCAT"), l_s("MINUS"), l_s("NOT"), | 146 | l_s("PUSHINT"), |
147 | l_s("JMPNE"), l_s("JMPEQ"), l_s("JMPLT"), l_s("JMPLE"), l_s("JMPGT"), l_s("JMPGE"), l_s("JMPT"), l_s("JMPF"), | 147 | l_s("PUSHSTRING"), |
148 | l_s("JMPONT"), l_s("JMPONF"), l_s("JMP"), l_s("PUSHNILJMP"), l_s("FORPREP"), l_s("FORLOOP"), l_s("LFORPREP"), | 148 | l_s("PUSHNUM"), |
149 | l_s("LFORLOOP"), l_s("CLOSURE") | 149 | l_s("PUSHNEGNUM"), |
150 | l_s("PUSHUPVALUE"), | ||
151 | l_s("GETLOCAL"), | ||
152 | l_s("GETGLOBAL"), | ||
153 | l_s("GETTABLE"), | ||
154 | l_s("GETDOTTED"), | ||
155 | l_s("GETINDEXED"), | ||
156 | l_s("PUSHSELF"), | ||
157 | l_s("CREATETABLE"), | ||
158 | l_s("SETLOCAL"), | ||
159 | l_s("SETGLOBAL"), | ||
160 | l_s("SETTABLE"), | ||
161 | l_s("SETLIST"), | ||
162 | l_s("SETMAP"), | ||
163 | l_s("ADD"), | ||
164 | l_s("ADDI"), | ||
165 | l_s("SUB"), | ||
166 | l_s("MULT"), | ||
167 | l_s("DIV"), | ||
168 | l_s("POW"), | ||
169 | l_s("CONCAT"), | ||
170 | l_s("MINUS"), | ||
171 | l_s("NOT"), | ||
172 | l_s("JMPNE"), | ||
173 | l_s("JMPEQ"), | ||
174 | l_s("JMPLT"), | ||
175 | l_s("JMPLE"), | ||
176 | l_s("JMPGT"), | ||
177 | l_s("JMPGE"), | ||
178 | l_s("JMPT"), | ||
179 | l_s("JMPF"), | ||
180 | l_s("JMPONT"), | ||
181 | l_s("JMPONF"), | ||
182 | l_s("JMP"), | ||
183 | l_s("PUSHNILJMP"), | ||
184 | l_s("FORPREP"), | ||
185 | l_s("FORLOOP"), | ||
186 | l_s("LFORPREP"), | ||
187 | l_s("LFORLOOP"), | ||
188 | l_s("CLOSURE") | ||
150 | }; | 189 | }; |
151 | 190 | ||
152 | 191 | ||