summaryrefslogtreecommitdiff
path: root/MLKPackage.m
diff options
context:
space:
mode:
authorMatthias Benkard <mulk@Minimulk.local>2008-08-24 18:44:05 +0200
committerMatthias Benkard <mulk@Minimulk.local>2008-08-24 18:44:05 +0200
commitf403bb6e9b0c64e2ce05eaf382c95884e753644e (patch)
treee90e54bb8bd0b546dba671741d9a2d062707fefb /MLKPackage.m
parent03f8b9a2dd1a41baee46fd82e07545ad7c10986d (diff)
Promote special operator EVAL to an intrinsic function.
Diffstat (limited to 'MLKPackage.m')
-rw-r--r--MLKPackage.m2
1 files changed, 1 insertions, 1 deletions
diff --git a/MLKPackage.m b/MLKPackage.m
index 6d97652..d432465 100644
--- a/MLKPackage.m
+++ b/MLKPackage.m
@@ -98,7 +98,6 @@ static NSMutableDictionary *packages = nil;
[cl export:[cl intern:@"DECLARE"]];
[cl export:[cl intern:@"QUOTE"]];
[cl export:[cl intern:@"VALUES"]];
- [cl export:[cl intern:@"EVAL"]];
[cl export:[cl intern:@"SPECIAL"]];
[cl export:[cl intern:@"UNWIND-PROTECT"]];
[cl export:[cl intern:@"MULTIPLE-VALUE-CALL"]];
@@ -155,6 +154,7 @@ static NSMutableDictionary *packages = nil;
[sys export:[sys intern:@"COMPILE"]];
[sys export:[sys intern:@"SET"]];
[sys export:[sys intern:@"APPLY"]];
+ [sys export:[sys intern:@"EVAL"]];
[sys export:[sys intern:@"OBJC-CLASS-OF"]];
[sys export:[sys intern:@"OBJC-SUBCLASSP"]];