From 172fe17e991e5cdff87a0d794bcb7272e4824c95 Mon Sep 17 00:00:00 2001
From: Matthias Andreas Benkard <matthias@benkard.de>
Date: Sun, 3 Aug 2008 18:58:42 +0200
Subject: Make MACROEXPAND-1 aware of symbol macros.

---
 MLKReadEvalPrintLoop.m | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'MLKReadEvalPrintLoop.m')

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;
-- 
cgit v1.2.3