diff options
Diffstat (limited to 'src/interp/modemap.boot')
-rw-r--r-- | src/interp/modemap.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/modemap.boot b/src/interp/modemap.boot index fce0fb46..d836c3ed 100644 --- a/src/interp/modemap.boot +++ b/src/interp/modemap.boot @@ -80,7 +80,7 @@ domainMember(dom,domList) == or/[modeEqual(dom,d) for d in domList] getModemap(x is [op,:.],e) == for modemap in get(op,'modemap,e) repeat - if u:= compApplyModemap(x,modemap,e,nil) then return + if u:= compApplyModemap(x,modemap,e) then return ([.,.,sl]:= u; SUBLIS(sl,modemap)) getUniqueSignature(form,e) == |