diff lwbasic/input.c @ 25:87590f43e76d

Started lwbasic parser; checkpoint
author lost@l-w.ca
date Mon, 24 Jan 2011 20:08:09 -0700
parents 25a4aef9c5ed
children
line wrap: on
line diff
--- a/lwbasic/input.c	Mon Jan 24 18:31:07 2011 -0700
+++ b/lwbasic/input.c	Mon Jan 24 20:08:09 2011 -0700
@@ -28,6 +28,7 @@
 #include <string.h>
 
 #include <lw_alloc.h>
+#include <lw_error.h>
 
 #define __input_c_seen__
 #include "lwbasic.h"
@@ -54,8 +55,7 @@
 		sp -> fp = fopen(state -> input_file, "rb");
 		if (!(sp -> fp))
 		{
-			fprintf(stderr, "Cannot open input file\n");
-			exit(1);
+			lwb_error("Cannot open input file\n");
 		}
 	}