aboutsummaryrefslogtreecommitdiff
path: root/src/interp/br-util.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/br-util.boot')
-rw-r--r--src/interp/br-util.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/br-util.boot b/src/interp/br-util.boot
index 12556dd0..cc28cb4d 100644
--- a/src/interp/br-util.boot
+++ b/src/interp/br-util.boot
@@ -583,7 +583,7 @@ nothingFoundPage(:options) ==
htCopyProplist htPage == [[x,:y] for [x,:y] in htpPropertyList htPage]
dbInfovec name ==
- 'category = GETDATABASE(name,'CONSTRUCTORKIND) => nil
+ "category" = getConstructorKindFromDB name => nil
GETDATABASE(name, 'ASHARP?) => nil
loadLibIfNotLoaded(name)
u := GETL(name,'infovec) => u