diff options
author | dos-reis <gdr@axiomatics.org> | 2011-08-20 23:25:37 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2011-08-20 23:25:37 +0000 |
commit | a0601001a4a8df331cbb9b95d5c0af20405eef03 (patch) | |
tree | 2be9e48ed72b3c1d8010cb6f8910374122530af2 /src/interp/br-op1.boot | |
parent | c18e433b18430e31ac9b38fef9fc0a48b4ca77da (diff) | |
download | open-axiom-a0601001a4a8df331cbb9b95d5c0af20405eef03.tar.gz |
* interp/sys-utility.boot (constructorDB): New.
* interp/daase.lisp (dbNiladic?): New. Use it to access niladic
property. of a constructor.
* interp/database.boot: Import daase.
(niladicContructorFromDB): Use it.
* interp/define.boot (compDefineCategory): Don't write
compilerInfo garbage.
(compDefineFunctor1): Likewise.
(compDefineCategory2): Set niladic property.
(compDefineFunctor): Likewise.
* interp/lisplib.boot (loadLib): Do not set niladic property. It
is now a side-effect of loading.
(loadLibNoUpdate): Do not check for version.
(makeConstructorAutoload): Do not set niladic property.
(initializeLisplib): Do not emit code to check version.
(mkCtorDBForm): New.
(writeNiladic?): Likewise.
(finalizeLisplib): Do not set niladic property.
* interp/patches.lisp: Remove deadcode.
* interp/sys-constants.boot (MAJOR-VERSION): Remove.
Diffstat (limited to 'src/interp/br-op1.boot')
-rw-r--r-- | src/interp/br-op1.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/br-op1.boot b/src/interp/br-op1.boot index a7c1efa4..ce3b40a0 100644 --- a/src/interp/br-op1.boot +++ b/src/interp/br-op1.boot @@ -920,7 +920,7 @@ mathform2HtString form == escapeString niladicHack form == form isnt [.,:.] => form - form is [x] and GETL(x,"NILADIC") => x + form is [x] and niladicConstructorFromDB x => x [niladicHack x for x in form] --============================================================================ |