aboutsummaryrefslogtreecommitdiff
path: root/src/interp/sys-utility.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/sys-utility.boot')
-rw-r--r--src/interp/sys-utility.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/sys-utility.boot b/src/interp/sys-utility.boot
index 60660ae1..162ab40c 100644
--- a/src/interp/sys-utility.boot
+++ b/src/interp/sys-utility.boot
@@ -277,7 +277,7 @@ hashTable cmp ==
minimalise x ==
min(x,hashTable 'EQUAL) where
min(x,ht) ==
- y := HGET(ht,x)
+ y := tableValue(ht,x)
y => y
cons? x =>
z := min(first x,ht)
@@ -292,7 +292,7 @@ minimalise x ==
string? x => hashCheck(x,ht)
x
hashCheck(x,ht) ==
- y := HGET(ht,x)
+ y := tableValue(ht,x)
y => y
tableValue(ht,x) := x
x