diff options
Diffstat (limited to 'src/interp/wi2.boot')
| -rw-r--r-- | src/interp/wi2.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/wi2.boot b/src/interp/wi2.boot index 35dcf1e7..ec25e771 100644 --- a/src/interp/wi2.boot +++ b/src/interp/wi2.boot @@ -678,7 +678,7 @@ compMapCond''(cexpr,dc) == --====================================================================== -- From nruncomp.boot --====================================================================== -NRTgetLocalIndex1(item,killBindingIfTrue) == +NRTgetLocalIndex item == k := NRTassocIndex item => k item = $NRTaddForm => 5 item = '$ => 0 @@ -1165,7 +1165,7 @@ doItLet1 item == code is ['LET,:.] => rhsCode:= rhs' op := "setShellEntry" - wiReplaceNode(item,[op,'$,NRTgetLocalIndexClear lhs,rhsCode], 16) + wiReplaceNode(item,[op,'$,NRTgetLocalIndex lhs,rhsCode], 16) wiReplaceNode(item, code, 18) rhsOfLetIsDomainForm code == |