summaryrefslogtreecommitdiff
path: root/MLKReadEvalPrintLoop.m
diff options
context:
space:
mode:
authorMatthias Benkard <mulk@Minimulk.local>2008-08-24 18:54:47 +0200
committerMatthias Benkard <mulk@Minimulk.local>2008-08-24 18:54:47 +0200
commita34b771cd9cc823260407b2905312b3be05390db (patch)
tree735f7e0023c39dcaffa000b8a16a910ed9ec8716 /MLKReadEvalPrintLoop.m
parentf403bb6e9b0c64e2ce05eaf382c95884e753644e (diff)
Add a couple of debugging statements.
Diffstat (limited to 'MLKReadEvalPrintLoop.m')
-rw-r--r--MLKReadEvalPrintLoop.m6
1 files changed, 6 insertions, 0 deletions
diff --git a/MLKReadEvalPrintLoop.m b/MLKReadEvalPrintLoop.m
index 53943bc..de2f4f1 100644
--- a/MLKReadEvalPrintLoop.m
+++ b/MLKReadEvalPrintLoop.m
@@ -98,8 +98,10 @@ static const char *prompt (EditLine *e) {
pool = [[NSAutoreleasePool alloc] init];
printf ("Loading init.lisp.\n");
+#if 1
NS_DURING
{
+#endif
input = [NSInputStream inputStreamWithFileAtPath:@"init.lisp"];
stream = LAUTORELEASE ([[MLKStream alloc] initWithInputStream:input]);
@@ -107,6 +109,7 @@ static const char *prompt (EditLine *e) {
[MLKInterpreter load:stream verbose:YES print:YES];
success = [MLKInterpreter load:stream verbose:YES print:YES];
[input close];
+#if 1
}
NS_HANDLER
{
@@ -115,6 +118,7 @@ static const char *prompt (EditLine *e) {
[[localException reason] UTF8String]);
}
NS_ENDHANDLER;
+#endif
printf ("Done.\n\n");
@@ -151,10 +155,12 @@ static const char *prompt (EditLine *e) {
#if 1
NS_DURING
#else
+#ifdef GNUSTEP
GSDebugAllocationActive (YES);
[NSObject enableDoubleReleaseCheck:YES];
NSZombieEnabled = YES;
#endif
+#endif
{
int i;