diff options
| author | Matthias Andreas Benkard <matthias@benkard.de> | 2008-08-04 18:18:41 +0200 |
|---|---|---|
| committer | Matthias Andreas Benkard <matthias@benkard.de> | 2008-08-04 18:18:41 +0200 |
| commit | 90e6023292e2bfe927bd633bac42fc355bb9f4d1 (patch) | |
| tree | 14664b9e9d98f43c83b78547ea7c554fef8de9d1 /MLKPackage.m | |
| parent | 383e3e833a7fbb8b1560ba861b76e8be96542c6f (diff) | |
Add support for fixnums.
Diffstat (limited to 'MLKPackage.m')
| -rw-r--r-- | MLKPackage.m | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/MLKPackage.m b/MLKPackage.m index cfe8932..1be467b 100644 --- a/MLKPackage.m +++ b/MLKPackage.m @@ -111,11 +111,16 @@ static NSMutableDictionary *packages = nil; [sys export:[sys intern:@"LISTP"]]; [sys export:[sys intern:@"CONSP"]]; [sys export:[sys intern:@"SYMBOLP"]]; + [sys export:[sys intern:@"FIXNUMP"]]; [sys export:[sys intern:@"NULL"]]; [sys export:[sys intern:@"ADD"]]; [sys export:[sys intern:@"SUBTRACT"]]; [sys export:[sys intern:@"MULTIPLY"]]; [sys export:[sys intern:@"DIVIDE"]]; + [sys export:[sys intern:@"ADD-FIXNUMS"]]; + [sys export:[sys intern:@"SUBTRACT-FIXNUMS"]]; + [sys export:[sys intern:@"MULTIPLY-FIXNUMS"]]; + [sys export:[sys intern:@"DIVIDE-FIXNUMS"]]; [sys export:[sys intern:@"LIST"]]; [sys export:[sys intern:@"MACROEXPAND-1"]]; [sys export:[sys intern:@"MACROEXPAND-ALL"]]; @@ -129,6 +134,7 @@ static NSMutableDictionary *packages = nil; [sys export:[sys intern:@"IMPORT"]]; [sys export:[sys intern:@"INTERN"]]; [sys export:[sys intern:@"SYMBOL-NAME"]]; + [sys export:[sys intern:@"FIXNUM-EQ"]]; [sys export:[sys intern:@"OBJC-CLASS-OF"]]; [sys export:[sys intern:@"OBJC-SUBCLASSP"]]; |