aboutsummaryrefslogtreecommitdiff
path: root/src/interp/buildom.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2011-04-27 07:41:49 +0000
committerdos-reis <gdr@axiomatics.org>2011-04-27 07:41:49 +0000
commit320d0c5d61b2fc8cb6780b9c7e426a76e126307a (patch)
treee593716c7f294b29fbfe4dd1f71758453f9b3586 /src/interp/buildom.boot
parentb34b11df886a81fe707bb09677c1ecd9715dbe70 (diff)
downloadopen-axiom-320d0c5d61b2fc8cb6780b9c7e426a76e126307a.tar.gz
* interp/br-util.boot (dbInfovec): Move to c-util.boot
Diffstat (limited to 'src/interp/buildom.boot')
-rw-r--r--src/interp/buildom.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/buildom.boot b/src/interp/buildom.boot
index 4d4322e7..7720c423 100644
--- a/src/interp/buildom.boot
+++ b/src/interp/buildom.boot
@@ -525,7 +525,7 @@ EnumerationCategory(:"x") == constructorCategory ["Enumeration",:x]
UnionCategory(:"x") == constructorCategory ["Union",:x]
constructorCategory (title is [op,:.]) ==
- constructorFunction:= GETL(op,"makeFunctionList") or
+ constructorFunction:= property(op,"makeFunctionList") or
systemErrorHere ['"constructorCategory",title]
[funlist,.]:= FUNCALL(constructorFunction,"$",title,$CategoryFrame)
oplist:= [[[a,b],true,c] for [a,b,c] in funlist]