aboutsummaryrefslogtreecommitdiff
path: root/src/interp/interop.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2011-08-25 01:34:18 +0000
committerdos-reis <gdr@axiomatics.org>2011-08-25 01:34:18 +0000
commit75a4b333cb95b26efc29b07d6a078b12f2d0b921 (patch)
tree400faaa1adbec082f08ed23842786e6800366704 /src/interp/interop.boot
parentffbca7d35e4541017c1e1d736dacbe27e0de2c21 (diff)
downloadopen-axiom-75a4b333cb95b26efc29b07d6a078b12f2d0b921.tar.gz
* interp/daase.lisp (dbArity, dbInstanceCache): New accessors.
* interp/database.boot (loadDBIfnecessary): New. (dbMutable?): Likewise. * interp/lisplib.boot (finalizeLisplib): Record mutable property.
Diffstat (limited to 'src/interp/interop.boot')
-rw-r--r--src/interp/interop.boot4
1 files changed, 0 insertions, 4 deletions
diff --git a/src/interp/interop.boot b/src/interp/interop.boot
index 28408072..c9c0f67d 100644
--- a/src/interp/interop.boot
+++ b/src/interp/interop.boot
@@ -664,10 +664,6 @@ HasCategory(domain,catform') ==
opOf(catform) in '(Object Type) or --temporary hack
or/[compareSigEqual(catform,cat,domain0,domain) for cat in catlist]
---systemDependentMkAutoload(fn,cnam) ==
--- FBOUNDP(cnam) => "next"
--- symbolFunction(cnam) := mkAutoLoad(fn, cnam)
-
domainEqual(a,b) ==
vector? a and vector? b and a.0 = b.0