summaryrefslogtreecommitdiff
path: root/MLKReadEvalPrintLoop.m
diff options
context:
space:
mode:
authorMatthias Andreas Benkard <matthias@benkard.de>2008-08-04 16:20:18 +0200
committerMatthias Andreas Benkard <matthias@benkard.de>2008-08-04 16:20:18 +0200
commita4c9f5bd436dae1d99845f50da55bae733129f56 (patch)
tree22a1718222ab8d76f928cfaa4740442a4d43c1fd /MLKReadEvalPrintLoop.m
parenta0b4d1eafa4312b5970f7268441d848be5231e7b (diff)
Add fixnum-aware macros LRETAIN, LRELEASE, LDESTROY, LAUTORELEASE, LASSIGN_COPY, and LASSIGN.
Diffstat (limited to 'MLKReadEvalPrintLoop.m')
-rw-r--r--MLKReadEvalPrintLoop.m8
1 files changed, 4 insertions, 4 deletions
diff --git a/MLKReadEvalPrintLoop.m b/MLKReadEvalPrintLoop.m
index 2300b77..3c8490b 100644
--- a/MLKReadEvalPrintLoop.m
+++ b/MLKReadEvalPrintLoop.m
@@ -85,7 +85,7 @@ static const char *prompt (EditLine *e) {
NS_DURING
{
input = [NSInputStream inputStreamWithFileAtPath:@"init.lisp"];
- stream = AUTORELEASE ([[MLKStream alloc] initWithInputStream:input]);
+ stream = LAUTORELEASE ([[MLKStream alloc] initWithInputStream:input]);
[input open];
[MLKInterpreter load:stream verbose:YES print:YES];
@@ -111,7 +111,7 @@ static const char *prompt (EditLine *e) {
forSymbol:[[MLKPackage findPackage:@"TOILET-SYSTEM"]
intern:@"*SYSTEM-INITIALISED-P*"]];
- RELEASE (pool);
+ LRELEASE (pool);
while (1)
{
@@ -155,7 +155,7 @@ static const char *prompt (EditLine *e) {
}
NS_ENDHANDLER;
- RELEASE (pool);
+ LRELEASE (pool);
}
//free (line);
@@ -174,6 +174,6 @@ int main (int argc, char **argv)
NSAutoreleasePool *pool;
pool = [[NSAutoreleasePool alloc] init];
[MLKReadEvalPrintLoop run];
- RELEASE (pool);
+ LRELEASE (pool);
return 0;
}