--- stack/stack.c	2002/03/30 02:31:24	1.124
+++ stack/stack.c	2002/03/31 02:19:54	1.125
@@ -1263,7 +1263,7 @@
   }
 
   if(myenv.interactive) {
-    printf("Stack version $Revision: 1.124 $\n\
+    printf("Stack version $Revision: 1.125 $\n\
 Copyright (C) 2002  Mats Alritzson and Teddy Hogeborn\n\
 Stack comes with ABSOLUTELY NO WARRANTY; for details type 'warranty;'.\n\
 This is free software, and you are welcome to redistribute it\n\
@@ -1284,16 +1284,17 @@
       myenv.err=0;
     }
     sx_72656164(&myenv);	/* "read" */
-    if (myenv.err==4) {		/* EOF */
+    if (myenv.err) {		/* EOF or other error */
       myenv.err=0;
       quit(&myenv);
     } else if(myenv.head->type!=empty
 	      && CAR(myenv.head)->type==symb
 	      && CAR(myenv.head)->content.sym->id[0] == ';') {
-      toss(&myenv); 		/* No error check in main */
+      toss(&myenv); if(myenv.err) continue;
       eval(&myenv);
+    } else {
+      gc_maybe(&myenv);
     }
-    gc_maybe(&myenv);
   }
   quit(&myenv);
   return EXIT_FAILURE;