diff options
author | Matthias Andreas Benkard <matthias@benkard.de> | 2008-07-31 11:48:46 +0200 |
---|---|---|
committer | Matthias Andreas Benkard <matthias@benkard.de> | 2008-07-31 11:48:46 +0200 |
commit | ca17649dab6d0d1ed49a3e072827e8324629aa64 (patch) | |
tree | 4b6cd04a660f44e11aa6089a02df7ab925c60eaf /MLKPackage.m | |
parent | 0f383318a079bd0c7bb23c909f30771b1c20b29c (diff) |
Reader: Add support for dispatching macro characters.
Diffstat (limited to 'MLKPackage.m')
-rw-r--r-- | MLKPackage.m | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/MLKPackage.m b/MLKPackage.m index 94bff0a..2757455 100644 --- a/MLKPackage.m +++ b/MLKPackage.m @@ -90,6 +90,7 @@ static NSMutableDictionary *packages = nil; [sys export:[sys intern:@"%DEFMACRO"]]; [sys export:[sys intern:@"%LAMBDA"]]; [sys export:[sys intern:@"%FSET"]]; + [sys export:[sys intern:@"%LOOP"]]; [sys export:[sys intern:@"CAR"]]; [sys export:[sys intern:@"CDR"]]; @@ -119,11 +120,12 @@ static NSMutableDictionary *packages = nil; [sys export:[sys intern:@"MAKE-SYMBOL"]]; [sys export:[sys intern:@"IMPORT"]]; [sys export:[sys intern:@"INTERN"]]; + [sys export:[sys intern:@"SYMBOL-NAME"]]; + [sys export:[sys intern:@"OBJC-CLASS-OF"]]; [sys export:[sys intern:@"OBJC-SUBCLASSP"]]; [sys export:[sys intern:@"FIND-OBJC-CLASS"]]; [sys export:[sys intern:@"NS-LOG"]]; - [sys export:[sys intern:@"SYMBOL-NAME"]]; [sys export:[sys intern:@"PRIMITIVE-TYPE-OF"]]; [sys export:[sys intern:@"SEND-BY-NAME"]]; |