summaryrefslogtreecommitdiff
path: root/MLKReadEvalPrintLoop.m
diff options
context:
space:
mode:
Diffstat (limited to 'MLKReadEvalPrintLoop.m')
-rw-r--r--MLKReadEvalPrintLoop.m4
1 files changed, 2 insertions, 2 deletions
diff --git a/MLKReadEvalPrintLoop.m b/MLKReadEvalPrintLoop.m
index 092c6bd..f2a7803 100644
--- a/MLKReadEvalPrintLoop.m
+++ b/MLKReadEvalPrintLoop.m
@@ -99,8 +99,6 @@ static const char *prompt (EditLine *e) {
}
NS_ENDHANDLER;
- RELEASE (pool);
-
printf ("Done.\n\n");
printf ("This is Toilet Lisp, version 0.0.1.\n");
@@ -112,6 +110,8 @@ static const char *prompt (EditLine *e) {
forSymbol:[[MLKPackage findPackage:@"TOILET-SYSTEM"]
intern:@"*SYSTEM-INITIALISED-P*"]];
+ RELEASE (pool);
+
while (1)
{
const char *line;