gh-29: Improve IMPORT and IMPORT_PATH tests.

Author: python-processing-unit

tests/mod.pre

@@ -0,0 +1,5 @@
+INT: sym = 101
+
+FUNC FUN():INT{
+    RETURN(0)
+}

tests/test2.pre

@@ -816,32 +816,33 @@ TRY{
     IMPORT(nonexistent_module)
     ASSERT(0)
 }CATCH{}
-WRITEFILE("INT: im_sym = 101 ; FUNC test():INT{ RETURN(0) }", "mod.pre")
 IMPORT(mod)
-ASSERT(EQ(mod.im_sym, 101))
-DEL(mod.im_sym)
-ASSERT(NOT(EXIST(mod.im_sym)))
-ASSERT(EQ(mod.test(), 0))
-DEL(mod.test)
-ASSERT(NOT(EXIST(mod.test)))
+ASSERT(EQ(mod.sym, 101))
+DEL(mod.sym)
+ASSERT(NOT(EXIST(mod.sym)))
+ASSERT(EQ(mod.FUN(), 0))
+DEL(mod.FUN)
+ASSERT(NOT(EXIST(mod.FUN)))
 PRINT("IMPORT: PASS\n")
 
 PRINT("Testing IMPORT_PATH...")
-WRITEFILE("INT: p_sym = 101", "mod_path.pre")
-ASSERT(EQ(IMPORT_PATH("mod_path.pre", modp), 0))
-ASSERT(EQ(modp.p_sym, 101))
-DEL(modp.p_sym)
-DELETEFILE("mod_path.pre")
+IMPORT(path)
+STR: mod_path = JOIN(path.interpreter_dir, "/tests/mod.pre")
+IMPORT_PATH(mod_path, mod2)
+ASSERT(EQ(mod2.sym, 101))
+DEL(mod2.sym)
+ASSERT(NOT(EXIST(mod2.sym)))
+ASSERT(EQ(mod2.FUN(), 0))
+DEL(mod2.FUN)
+ASSERT(NOT(EXIST(mod2.FUN)))
 PRINT("IMPORT_PATH: PASS\n")
 
 PRINT("Testing EXPORT...")
-WRITEFILE("", "mod.pre")
 INT: ex_sym = 101
 ASSERT(EQ(EXPORT(ex_sym, mod), 0))
 ASSERT(EQ(mod.ex_sym, 101))
 DEL(ex_sym)
 DEL(mod.ex_sym)
-DELETEFILE("mod.pre")
 PRINT("EXPORT: PASS\n")
 
 PRINT("Testing THR (thread-handle) semantics...")