aboutsummaryrefslogtreecommitdiff
path: root/src/interp/postpar.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2008-08-02 13:03:26 +0000
committerdos-reis <gdr@axiomatics.org>2008-08-02 13:03:26 +0000
commit4ac600edddd39335715c053ded118a59c804778d (patch)
treed60f88eb9626a3a0de210246dcc36198478b5ad0 /src/interp/postpar.boot
parentc129ad817cd16aef92f5b433a509e15254b9ccd3 (diff)
downloadopen-axiom-4ac600edddd39335715c053ded118a59c804778d.tar.gz
* interp/buildom.boot: Use constants by names.
* interp/i-analy.boot: Likewise. * interp/i-coerfn.boot: Likewise. * interp/i-funsel.boot: Likewise. * interp/i-intern.boot: Likewise. * interp/i-resolv.boot: Likewise. * interp/i-spec1.boot: Likewise. * interp/mark.boot: Likewise. * interp/nrungo.boot: Likewise. * interp/postpar.boot: Likewise. * interp/wi1.boot: Likewise.
Diffstat (limited to 'src/interp/postpar.boot')
-rw-r--r--src/interp/postpar.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/postpar.boot b/src/interp/postpar.boot
index 02ca813c..32afc6b3 100644
--- a/src/interp/postpar.boot
+++ b/src/interp/postpar.boot
@@ -98,7 +98,7 @@ postBigFloat: %ParseTree -> %ParseTree
postBigFloat x ==
[.,mant,:expon] := x
eltword := if $InteractiveMode then "$elt" else "elt"
- postTran [[eltword,'(Float),"float"],[",",[",",mant,expon],10]]
+ postTran [[eltword,$Float,"float"],[",",[",",mant,expon],10]]
postAdd: %ParseTree -> %ParseForm
postAdd x ==