aboutsummaryrefslogtreecommitdiff
path: root/src/interp/compiler.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2008-04-14 23:23:30 +0000
committerdos-reis <gdr@axiomatics.org>2008-04-14 23:23:30 +0000
commit2139466e18081430ec55245e16ef1ed338af909a (patch)
treeb16fb3883250feeea75e1ee73348fb213d686a08 /src/interp/compiler.boot
parent8b65bcf401b83f62029436d36cc6a6c8cdf4be85 (diff)
downloadopen-axiom-2139466e18081430ec55245e16ef1ed338af909a.tar.gz
* interp/compiler.boot: Don't special case ListCategory, String,
VECTOR, and VectorCategory.
Diffstat (limited to 'src/interp/compiler.boot')
-rw-r--r--src/interp/compiler.boot4
1 files changed, 0 insertions, 4 deletions
diff --git a/src/interp/compiler.boot b/src/interp/compiler.boot
index 2e880a24..f8f6ca01 100644
--- a/src/interp/compiler.boot
+++ b/src/interp/compiler.boot
@@ -1642,7 +1642,6 @@ for x in [["|", :"compSuchthat"],_
["Join", :"compJoin"],_
["leave", :"compLeave"],_
["LET", :"compSetq"],_
- ["ListCategory", :"compConstructorCategory"],_
["MDEF", :"compMacro"],_
["not", :"compileNot"],_
["pretend", :"compPretend"],_
@@ -1653,14 +1652,11 @@ for x in [["|", :"compSuchthat"],_
["return", :"compReturn"],_
["SEQ", :"compSeq"],_
["SETQ", :"compSetq"],_
- ["String", :"compString"],_
["SubDomain", :"compSubDomain"],_
["SubsetCategory", :"compSubsetCategory"],_
["Union", :"compCat"],_
["Mapping", :"compCat"],_
["UnionCategory", :"compConstructorCategory"],_
- ["VECTOR", :"compVector"],_
- ["VectorCategory", :"compConstructorCategory"],_
["where", :"compWhere"],_
["[||]", :"compileQuasiquote"]] repeat
MAKEPROP(car x, 'SPECIAL, cdr x)