diff options
Diffstat (limited to 'src/interp/slam.boot')
-rw-r--r-- | src/interp/slam.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/slam.boot b/src/interp/slam.boot index c3f79904..450e70a2 100644 --- a/src/interp/slam.boot +++ b/src/interp/slam.boot @@ -104,7 +104,7 @@ isRecurrenceRelation(op,body,minivectorName) == diffSlot := or/[i for i in 0.. for x in $minivector | EQ(x,diffCell)] or return nil --Check general term for references to just the k previous values - sharpPosition := PARSE_-INTEGER SUBSTRING(sharpArg,1,nil) + sharpPosition := readInteger SUBSTRING(sharpArg,1,nil) al:= mkDiffAssoc(op,generalTerm,k,sharpPosition,sharpArg,diffSlot,minivectorName) null al => false "$failed" in al => false |