diff options
Diffstat (limited to 'src/interp/i-special.boot')
| -rw-r--r-- | src/interp/i-special.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/i-special.boot b/src/interp/i-special.boot index b7d42e30..9d513364 100644 --- a/src/interp/i-special.boot +++ b/src/interp/i-special.boot @@ -2087,7 +2087,7 @@ uppretend t == -----------------------Compiler for Interpreter--------------------------------- NRTcompileEvalForm(opName,sigTail,dcVector) == u := NRTcompiledLookup(opName,sigTail,dcVector) - not ($insideCompileBodyIfTrue = true) => MKQ u + not $insideCompileBodyIfTrue => MKQ u k := NRTgetMinivectorIndex(u,opName,sigTail,dcVector) ['ELT,"$$$",k] --$$$ denotes minivector |