aboutsummaryrefslogtreecommitdiff
path: root/src/interp/nrunopt.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2008-08-09 14:13:09 +0000
committerdos-reis <gdr@axiomatics.org>2008-08-09 14:13:09 +0000
commitbbc597dd3deeca1bff1c35491c1911ce50f1af60 (patch)
tree4329038fa43164b6bfa3516bfb6debe13d87cc36 /src/interp/nrunopt.boot
parentca48929b74dee0ecfca92200ec4d5879bff0d4f5 (diff)
downloadopen-axiom-bbc597dd3deeca1bff1c35491c1911ce50f1af60.tar.gz
* interp/buildom.boot: Rename AST code LET to %LET throughout.
* interp/c-util.boot: Likewise. * interp/comp.lisp: Likewise. * interp/compiler.boot: Likewise. * interp/cparse.boot: Likewise. * interp/def.lisp: Likewise. * interp/define.boot: Likewise. * interp/functor.boot: Likewise. * interp/g-opt.boot: Likewise. * interp/i-eval.boot: Likewise. * interp/i-intern.boot: Likewise. * interp/i-map.boot: Likewise. * interp/i-spec1.boot: Likewise. * interp/i-spec2.boot: Likewise. * interp/iterator.boot: Likewise. * interp/mark.boot: Likewise. * interp/newaux.lisp: Likewise. * interp/nruncomp.boot: Likewise. * interp/nrunopt.boot: Likewise. * interp/package.boot: Likewise. * interp/parse.boot: Likewise. * interp/pf2atree.boot: Likewise. * interp/pf2sex.boot: Likewise. * interp/postpar.boot: Likewise. * interp/property.lisp: Likewise. * interp/pspad1.boot: Likewise. * interp/pspad2.boot: Likewise. * interp/slam.boot: Likewise. * interp/spad.lisp: Likewise. * interp/wi1.boot: Likewise. * interp/wi2.boot: Likewise.
Diffstat (limited to 'src/interp/nrunopt.boot')
-rw-r--r--src/interp/nrunopt.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/nrunopt.boot b/src/interp/nrunopt.boot
index 38aed65f..124497ed 100644
--- a/src/interp/nrunopt.boot
+++ b/src/interp/nrunopt.boot
@@ -305,7 +305,7 @@ mungeAddGensyms(u,gal) ==
['LIST,:[fn(x,gal,0) for x in u]] where fn(x,gal,n) ==
atom x => x
g := LASSOC(x,gal) =>
- n = 0 => ['LET,g,x]
+ n = 0 => ["%LET",g,x]
g
[first x,:[fn(y,gal,n + 1) for y in rest x]]