diff options
| author | dos-reis <gdr@axiomatics.org> | 2011-10-03 02:10:23 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2011-10-03 02:10:23 +0000 |
| commit | 5a03f408233bf4e17759ace9a83dcf6012f72dcc (patch) | |
| tree | 5af46b5ebca646527bb7ec115cfaaf68d5e00d23 /src/interp/lisplib.boot | |
| parent | a2fd94946c6b380e2ee7ec242fd56aa4d52d9c92 (diff) | |
| download | open-axiom-5a03f408233bf4e17759ace9a83dcf6012f72dcc.tar.gz | |
Cleanup.
Diffstat (limited to 'src/interp/lisplib.boot')
| -rw-r--r-- | src/interp/lisplib.boot | 4 |
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) |