Mercurial > botc / file diff

--- a/scriptreader.cxx	Fri Jul 13 17:20:51 2012 +0300
+++ b/scriptreader.cxx	Fri Jul 13 18:41:40 2012 +0300
@@ -55,13 +55,17 @@
 
 ScriptReader::ScriptReader (str path) {
 	fp = fopen (path, "r");
-	CHECK_FILE (path, "reading");
+	CHECK_FILE (fp, path, "reading");
 	
 	curline = 1;
 	pos = 0;
 	token = "";
 }
 
+ScriptReader::~ScriptReader () {
+	fclose (fp);
+}
+
 char ScriptReader::ReadChar () {
 	char* c = (char*)malloc (sizeof (char));
 	if (!fread (c, sizeof (char), 1, fp))