aboutsummaryrefslogtreecommitdiff
path: root/src/interp/br-op1.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2010-05-13 14:47:31 +0000
committerdos-reis <gdr@axiomatics.org>2010-05-13 14:47:31 +0000
commit8f2bad3b8cea97189a9e842ed0f78559aa4be795 (patch)
treef355c7ba0711e9cf0e243eecb0be62faf1468347 /src/interp/br-op1.boot
parent348cdc0022cf9aaf0fc5491ed8d899a7284e07ec (diff)
downloadopen-axiom-8f2bad3b8cea97189a9e842ed0f78559aa4be795.tar.gz
* interp/sys-utility.boot (hashTable): Define.
* interp/word.boot: Use it. * interp/topics.boot: Likewise. * interp/sys-driver.boot: Likewise. * interp/slam.boot: Likewise. * interp/setvars.boot: Likewise. * interp/scan.boot: Likewise. * interp/nrunopt.boot: Likewise. * interp/nruncomp.boot: Likewise. * interp/newfort.boot: Likewise. * interp/mark.boot: Likewise. * interp/interop.boot: Likewise. * interp/i-toplev.boot: Likewise. * interp/i-syscmd.boot: Likewise. * interp/htcheck.boot: Likewise. * interp/guess.boot: Likewise. * interp/g-util.boot: Likewise. * interp/database.boot: Likewise. * interp/compress.boot: Likewise. * interp/clam.boot: Likewise. * interp/cattable.boot: Likewise. * interp/c-util.boot: Likewise. * interp/br-op2.boot: Likewise. * interp/br-op1.boot: Likewise. * interp/br-con.boot: Likewise. * interp/sys-globals.boot ($ConstructorCache): Move elsewhere. ($instantRecord): Likewise. * algebra/newdata.spad.pamphlet: Use EQUAL as equality function for hash table. * algebra/table.spad.pamphlet: Call hashTable builtin function instead of MAKE-HASHTABLE.
Diffstat (limited to 'src/interp/br-op1.boot')
-rw-r--r--src/interp/br-op1.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/br-op1.boot b/src/interp/br-op1.boot
index b75ac711..143782b8 100644
--- a/src/interp/br-op1.boot
+++ b/src/interp/br-op1.boot
@@ -842,7 +842,7 @@ dbExpandOpAlistIfNecessary(htPage,opAlist,which,needOrigins?,condition?) ==
expandFlag = 'lists => --lists are partially expanded
-- entry is [sig, predicate, origin, exposeFlag, comments]
$value: local := nil
- $docTableHash := MAKE_-HASHTABLE 'EQUAL
+ $docTableHash := hashTable 'EQUAL
packageSymbol := false
domform := htpProperty(htPage,'domname) or htpProperty(htPage,'conform)
if isDefaultPackageName opOf domform then