diff options
author | dos-reis <gdr@axiomatics.org> | 2008-11-03 08:31:46 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2008-11-03 08:31:46 +0000 |
commit | a12a4527c1d48988f48b4656c3a46ab91ab4e5e2 (patch) | |
tree | a75ebae2b6d05a13ecbb1ce1904238b0b567305a /src/interp/wi1.boot | |
parent | 58820ffb5e4e1ba4de8840a4883a1e42857a1a2d (diff) | |
download | open-axiom-a12a4527c1d48988f48b4656c3a46ab91ab4e5e2.tar.gz |
* interp/postpar.boot (postcheckTarget): Likewise.
(isPackageType): Likewise.
* interp/lisplib.boot (getSlotFromDomain): Remove.
* interp/macros.lisp (|saySpadMsg|): Remove.
* interp/vmlisp.lisp (qsetq): Remove.
(STATEP, FUNARGP, PAPPP): Likewise.
(LISTOFQUOTES, LISTOFFREES): Likewise.
Diffstat (limited to 'src/interp/wi1.boot')
-rw-r--r-- | src/interp/wi1.boot | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/src/interp/wi1.boot b/src/interp/wi1.boot index 29ea264e..f711677d 100644 --- a/src/interp/wi1.boot +++ b/src/interp/wi1.boot @@ -1065,7 +1065,6 @@ compNot([op,arg], pWas, m, e) == coerce(markAny('compNot, pWas, [["NOT",x],$Boolean,ei]),m) compDefine(form,m,e) == - $tripleHits: local:= 0 $macroIfTrue: local $packagesUsed: local ['DEF,.,originalSignature,.,body] := form @@ -1165,7 +1164,6 @@ compDefineCategory2(form,signature,specialCases,body,m,e, $prefix,$formalArgList) == --1. bind global variables $insideCategoryIfTrue: local:= true - $TOP__LEVEL: local := nil $definition: local := nil --used by DomainSubstitutionFunction $form: local := nil |