aboutsummaryrefslogtreecommitdiff
path: root/src/interp/nrunopt.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2009-11-01 02:17:47 +0000
committerdos-reis <gdr@axiomatics.org>2009-11-01 02:17:47 +0000
commit90e75eb56b50a8fb87dc241f5bba0c78aec8c973 (patch)
treec262c0766dab62c4cb190c048c52f0fa17fc25db /src/interp/nrunopt.boot
parent43e4aa26464a27fdd5d80272f72839653a0f6cf9 (diff)
downloadopen-axiom-90e75eb56b50a8fb87dc241f5bba0c78aec8c973.tar.gz
Clean up
Diffstat (limited to 'src/interp/nrunopt.boot')
-rw-r--r--src/interp/nrunopt.boot3
1 files changed, 1 insertions, 2 deletions
diff --git a/src/interp/nrunopt.boot b/src/interp/nrunopt.boot
index a4aea6b5..568929ee 100644
--- a/src/interp/nrunopt.boot
+++ b/src/interp/nrunopt.boot
@@ -384,7 +384,6 @@ NRTcatCompare [catform,:pred] == LASSOC(first catform,$levelAlist)
hasDefaultPackage catname ==
defname := INTERN STRCONC(catname,'"&")
constructor? defname => defname
---MEMQ(defname,allConstructors()) => defname
nil
@@ -911,6 +910,6 @@ expandTypeArgs(u,template,domform) ==
templateVal(template,domform,index) ==
--returns a domform or a lazy slot
- index = 0 => harhar() --template
+ index = 0 => BREAK() --template
template.index