aboutsummaryrefslogtreecommitdiff
path: root/src/interp/parse.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/parse.boot')
-rw-r--r--src/interp/parse.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/parse.boot b/src/interp/parse.boot
index 91273ced..fe466ac2 100644
--- a/src/interp/parse.boot
+++ b/src/interp/parse.boot
@@ -165,7 +165,7 @@ parseTypeEvaluate form ==
cmm :=
fn := constructor? op =>
p := pathname [fn,$spadLibFT,'"*"] =>
- isExistingFile p => getConstructorModemap(abbreviation? fn)
+ isExistingFile p => getConstructorModemapFromDB abbreviation? fn
nil
nil
cmm is [[.,.,:argml],:.] => [op,:parseTypeEvaluateArgs(argl,argml)]