aboutsummaryrefslogtreecommitdiff
path: root/src/interp/br-op1.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2008-08-14 00:48:08 +0000
committerdos-reis <gdr@axiomatics.org>2008-08-14 00:48:08 +0000
commit26c1f12d4d829f293ee9265690ddfb451119df1e (patch)
treee809c83bded28a576618f98383263e529cebc9c1 /src/interp/br-op1.boot
parent39d73f2c6b9fd5077e7a2051abd9cd00824838e9 (diff)
downloadopen-axiom-26c1f12d4d829f293ee9265690ddfb451119df1e.tar.gz
Cleanup GETL(x,'NILADIC)
Diffstat (limited to 'src/interp/br-op1.boot')
-rw-r--r--src/interp/br-op1.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/br-op1.boot b/src/interp/br-op1.boot
index 76aa6e69..8f7fe8c8 100644
--- a/src/interp/br-op1.boot
+++ b/src/interp/br-op1.boot
@@ -922,7 +922,7 @@ mathform2HtString form == escapeString
niladicHack form ==
atom form => form
- form is [x] and GETL(x,'NILADIC) => x
+ form is [x] and niladicConstructorFromDB x => x
[niladicHack x for x in form]
--============================================================================