diff options
Diffstat (limited to 'src/interp/nrungo.boot')
-rw-r--r-- | src/interp/nrungo.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/nrungo.boot b/src/interp/nrungo.boot index 2acad7a1..b2a2f263 100644 --- a/src/interp/nrungo.boot +++ b/src/interp/nrungo.boot @@ -345,10 +345,10 @@ NRTisRecurrenceRelation(op,body,minivectorName) == pcl := [x for x in pcl | not (x is [''T,:mess] and (CONTAINED('throwMessage,mess) or CONTAINED('throwKeyedMsg,mess)))] - integer := EVALFUN $Integer + integer := eval $Integer iequalSlot:=compiledLookupCheck("=",[$Boolean,"$","$"],integer) lesspSlot:=compiledLookupCheck("<",[$Boolean,"$","$"],integer) - notpSlot:= compiledLookupCheck("not",["$","$"],EVALFUN $Boolean) + notpSlot:= compiledLookupCheck("not",["$","$"],eval $Boolean) for [p,c] in pcl repeat p is ['SPADCALL,sharpVar,n1,['ELT,=minivectorName,slot]] and EQ(iequalSlot,$minivector.slot) => |