diff options
Diffstat (limited to 'src/interp/compiler.boot')
| -rw-r--r-- | src/interp/compiler.boot | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/src/interp/compiler.boot b/src/interp/compiler.boot index 386b0014..2eb63a11 100644 --- a/src/interp/compiler.boot +++ b/src/interp/compiler.boot @@ -2261,12 +2261,11 @@ numberize x == atom x => x [numberize first x,:numberize rest x] -++ If there is a local reference to mode `m', return it. Otherwise -++ return `m' itself. +++ If there is a local reference to mode `m', return it. localReferenceIfThere m == m = "$" => m idx := NRTassocIndex m => ["getShellEntry","$",idx] - m + quoteForm m compRepeatOrCollect(form,m,e) == fn(form,[m,:$exitModeStack],[#$exitModeStack,:$leaveLevelStack],$formalArgList |