summaryrefslogtreecommitdiff
path: root/MLKPackage.m
diff options
context:
space:
mode:
authorMatthias Benkard <mulk@minimulk.mst-plus>2008-08-18 16:13:54 +0200
committerMatthias Benkard <mulk@minimulk.mst-plus>2008-08-18 16:13:54 +0200
commiteec88254d7e37ecb07b0503a9e87abfb81ce2460 (patch)
treed96aa76e24b4b090383623134b35eaf6a10f3431 /MLKPackage.m
parent5cd4de577c08637cb5d78d1c3376b1ff80e74065 (diff)
parent054dc70426505f72a1e9856c9e48c0ae3349d68d (diff)
Merge branch 'master' of http://matthias.benkard.de/code/mulklisp
Diffstat (limited to 'MLKPackage.m')
-rw-r--r--MLKPackage.m6
1 files changed, 3 insertions, 3 deletions
diff --git a/MLKPackage.m b/MLKPackage.m
index acaf6db..6d97652 100644
--- a/MLKPackage.m
+++ b/MLKPackage.m
@@ -92,7 +92,6 @@ static NSMutableDictionary *packages = nil;
[cl export:[cl intern:@"FUNCALL"]];
[cl export:[cl intern:@"FUNCTION"]];
[cl export:[cl intern:@"PROGN"]];
- [cl export:[cl intern:@"APPLY"]];
[cl export:[cl intern:@"PROGV"]];
[cl export:[cl intern:@"SETQ"]];
[cl export:[cl intern:@"SETF"]];
@@ -101,15 +100,14 @@ static NSMutableDictionary *packages = nil;
[cl export:[cl intern:@"VALUES"]];
[cl export:[cl intern:@"EVAL"]];
[cl export:[cl intern:@"SPECIAL"]];
- [cl export:[cl intern:@"SET"]];
[cl export:[cl intern:@"UNWIND-PROTECT"]];
[cl export:[cl intern:@"MULTIPLE-VALUE-CALL"]];
[cl export:[cl intern:@"EVAL-WHEN"]];
- [sys export:[sys intern:@"%DEFMACRO"]];
[sys export:[sys intern:@"%LAMBDA"]];
[sys export:[sys intern:@"%FSET"]];
[sys export:[sys intern:@"%FSETQ"]];
+ [sys export:[sys intern:@"%MACROSET"]];
[sys export:[sys intern:@"%LOOP"]];
[sys export:[sys intern:@"%FLET"]];
[sys export:[sys intern:@"%MACROLET"]];
@@ -155,6 +153,8 @@ static NSMutableDictionary *packages = nil;
[sys export:[sys intern:@"DECLARATIONS-AND-DOC-AND-FORMS"]];
[sys export:[sys intern:@"DECLARATIONS-AND-FORMS"]];
[sys export:[sys intern:@"COMPILE"]];
+ [sys export:[sys intern:@"SET"]];
+ [sys export:[sys intern:@"APPLY"]];
[sys export:[sys intern:@"OBJC-CLASS-OF"]];
[sys export:[sys intern:@"OBJC-SUBCLASSP"]];