close file in loadFile

1 files changed, 3 insertions, 1 deletions

diff --git a/src/jvm/clojure/lang/Compiler.java b/src/jvm/clojure/lang/Compiler.java
index df477037..877c20a1 100644
--- a/src/jvm/clojure/lang/Compiler.java
+++ b/src/jvm/clojure/lang/Compiler.java
@@ -2617,15 +2617,17 @@ private static Symbol tagOf(Object o){
 }
 
 public static Object loadFile(String file) throws Exception{
+	FileInputStream f = new FileInputStream(file);
 	try
 		{
 		Var.pushThreadBindings(RT.map(SOURCE_PATH, file,
 		                              SOURCE, (new File(file)).getName()));
-		return load(new FileInputStream(file));
+		return load(f);
 		}
 	finally
 		{
 		Var.popThreadBindings();
+		f.close();
 		}
 }