aboutsummaryrefslogtreecommitdiff
path: root/src/interp/nrungo.boot.pamphlet
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/nrungo.boot.pamphlet')
-rw-r--r--src/interp/nrungo.boot.pamphlet3
1 files changed, 1 insertions, 2 deletions
diff --git a/src/interp/nrungo.boot.pamphlet b/src/interp/nrungo.boot.pamphlet
index 72a8e153..f0ecf57f 100644
--- a/src/interp/nrungo.boot.pamphlet
+++ b/src/interp/nrungo.boot.pamphlet
@@ -255,9 +255,8 @@ compareSig(sig,tableSig,dollar,domain) ==
and/[lazyCompareSigEqual(s,t,dollar,domain)
for s in rest sig for t in rest tableSig]
---------------------> NEW DEFINITION (override in xrun.boot.pamphlet)
lazyCompareSigEqual(s,tslot,dollar,domain) ==
- tslot = '$ => s = devaluate dollar --needed for browser
+ tslot = '$ => s = tslot -- devaluate dollar --needed for browser
INTEGERP tslot and PAIRP(lazyt:=domain.tslot) and PAIRP s =>
lazyt is [.,.,.,[.,item,.]] and
item is [.,[functorName,:.]] and functorName = CAR s =>