aboutsummaryrefslogtreecommitdiff
path: root/src/interp/macex.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2011-04-22 18:32:46 +0000
committerdos-reis <gdr@axiomatics.org>2011-04-22 18:32:46 +0000
commitb825ed51bc11564e35f84a88bbb43fbe2ac51d99 (patch)
tree6a74d803f5619ec57d8a51228e0192e9df5f7689 /src/interp/macex.boot
parent32efd3b0691918cf1d662b095c653d5a0a17ff7b (diff)
downloadopen-axiom-b825ed51bc11564e35f84a88bbb43fbe2ac51d99.tar.gz
* boot/tokens.boot: Don't translate setDifference.
* boot/initial-env.lisp (SETDIFFERNECE): Remove. * boot/translator.boot (evalBootFile): Rename form EVAL-BOOT-FILE. * boot/utility.boot (setDifference): Define. * interp/unlisp.lisp (ListMemberQ?): Remove. (ListRemoveQ): Likewise. (AlistAssocQ): Likewise.
Diffstat (limited to 'src/interp/macex.boot')
-rw-r--r--src/interp/macex.boot3
1 files changed, 1 insertions, 2 deletions
diff --git a/src/interp/macex.boot b/src/interp/macex.boot
index d25074f6..fdc0c5ff 100644
--- a/src/interp/macex.boot
+++ b/src/interp/macex.boot
@@ -86,8 +86,7 @@ macLambdaParameterHandling( replist , pform ) ==
for p in pfParts pform repeat macLambdaParameterHandling( replist , p )
macSubstituteId( replist , pform ) ==
- ex := AlistAssocQ( pfIdSymbol pform , replist )
- ex =>
+ ex := symbolAssoc( pfIdSymbol pform , replist ) =>
RPLPAIR(pform,rest ex)
pform
pform