aboutsummaryrefslogtreecommitdiff
path: root/src/interp/nrungo.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2008-04-22 02:42:48 +0000
committerdos-reis <gdr@axiomatics.org>2008-04-22 02:42:48 +0000
commita8469b11f4b06fd70bf1e2082fcd0016de428053 (patch)
tree2ef2d7419ab531414dcf0fe4deb33feaf3b062ff /src/interp/nrungo.boot
parentd2883391871a704dd5c5d9a28c947d5a54784b48 (diff)
downloadopen-axiom-a8469b11f4b06fd70bf1e2082fcd0016de428053.tar.gz
* interp/br-data.boot: Tidy.
* interp/br-util.boot: Likewise. * interp/c-doc.boot: Likewise. * interp/cattable.boot: Likewise. * interp/clammed.boot: Likewise. * interp/define.boot: Likewise. * interp/g-cndata.boot: Likewise. * interp/g-util.boot: Likewise. * interp/ht-util.boot: Likewise. * interp/i-map.boot: Likewise. * interp/modemap.boot: Likewise. * interp/nrungo.boot: Likewise. * interp/rulesets.boot: Likewise. * interp/slam.boot: Likewise. * interp/i-spec1.boot: Likewise. * interp/Makefile.pamphlet (br-util.$(FASLEXT)): Don't compile as Old Boot. (bc-solve.$(FASLEXT)): Likewise. (ht-util.$(FASLEXT)): Likewise. (rulesets.$(FASLEXT)): Likewise. (i-object.$(FASLEXT)): Likewise. (i-util.$(FASLEXT)): Likewise. (nrunfast.$(FASLEXT)): Likewise. (nrungo.$(FASLEXT)): Likewise. (iterator.$(FASLEXT)): Likewise. (cattable.$(FASLEXT)): Likewise. (c-doc.$(FASLEXT)): Likewise. (posit.$(FASLEXT)): Likewise. (modemap.$(FASLEXT)): Likewise. (slam.$(FASLEXT)): Likewise. (clammed.$(FASLEXT)): Likewise. (g-opt.$(FASLEXT)): Likewise. (g-error.$(FASLEXT)): Likewise. (pathname.$(FASLEXT)): Likewise. (g-util.$(FASLEXT)): Likewise. (g-cndata.$(FASLEXT)): Likewise. * boot/tokens.boot: Remove renaming of NOT to NULL, when compiling Old Boot.
Diffstat (limited to 'src/interp/nrungo.boot')
-rw-r--r--src/interp/nrungo.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/nrungo.boot b/src/interp/nrungo.boot
index e9228806..237b392f 100644
--- a/src/interp/nrungo.boot
+++ b/src/interp/nrungo.boot
@@ -384,7 +384,7 @@ NRTisRecurrenceRelation(op,body,minivectorName) ==
sharpPosition := PARSE_-INTEGER SUBSTRING(sharpArg,1,nil)
al:= mkDiffAssoc(op,generalTerm,k,sharpPosition,sharpArg,diffSlot,minivectorName)
null al => false
- '$failed in al => false
+ "$failed" in al => false
body:= generalTerm
for [a,:b] in al repeat
body:= substitute(b,a,body)