diff options
Diffstat (limited to 'src/interp/buildom.boot')
-rw-r--r-- | src/interp/buildom.boot | 2 |
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 ] |