diff options
author | Matthias Andreas Benkard <matthias@benkard.de> | 2008-08-04 16:20:18 +0200 |
---|---|---|
committer | Matthias Andreas Benkard <matthias@benkard.de> | 2008-08-04 16:20:18 +0200 |
commit | a4c9f5bd436dae1d99845f50da55bae733129f56 (patch) | |
tree | 22a1718222ab8d76f928cfaa4740442a4d43c1fd /MLKReadEvalPrintLoop.m | |
parent | a0b4d1eafa4312b5970f7268441d848be5231e7b (diff) |
Add fixnum-aware macros LRETAIN, LRELEASE, LDESTROY, LAUTORELEASE, LASSIGN_COPY, and LASSIGN.
Diffstat (limited to 'MLKReadEvalPrintLoop.m')
-rw-r--r-- | MLKReadEvalPrintLoop.m | 8 |
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; } |