aboutsummaryrefslogtreecommitdiff
path: root/src/interp/lisplib.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/lisplib.boot')
-rw-r--r--src/interp/lisplib.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/lisplib.boot b/src/interp/lisplib.boot
index a6cf576b..7e38ce42 100644
--- a/src/interp/lisplib.boot
+++ b/src/interp/lisplib.boot
@@ -464,11 +464,11 @@ initializeLisplib libName ==
ADDOPTIONS('FILE,$libFile)
mkCtorDBForm ctor ==
- ['constructorDB,quoteForm ctor]
+ ['constructorDB,quote ctor]
writeInfo(ctor,info,key,prop,file) ==
if info ~= nil then
- insn := ['%store,[prop,mkCtorDBForm ctor],quoteForm info]
+ insn := ['%store,[prop,mkCtorDBForm ctor],quote info]
LAM_,FILEACTQ(key,expandToVMForm insn)
lisplibWrite(symbolName key,info,file)