aboutsummaryrefslogtreecommitdiff
path: root/src/interp/buildom.boot
diff options
context:
space:
mode:
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 3f1db902..a9c89ca5 100644
--- a/src/interp/buildom.boot
+++ b/src/interp/buildom.boot
@@ -472,7 +472,7 @@ MappingPrint(x, dom) == coerceMap2E(x)
coerceMap2E(x) ==
-- nrlib domain
- ARRAYP rest x => ["theMap", BPINAME first x,
+ array? rest x => ["theMap", BPINAME first x,
if $testingSystem then 0 else HASHEQ(rest x) rem 1000]
-- aldor
["theMap", BPINAME first x ]