# HG changeset patch
# User Mike Pavone <pavone@retrodev.com>
# Date 1342294391 25200
# Node ID be6d1cf7b7d796dc431f8ba80072813b6a58f881
# Parent  50a456168c25a7ab77ecb1bfe2de5a3c00800040# Parent  883ae0c1b7f63b34f07529459c84f7ab9c875fc2
merge

diff -r 50a456168c25 -r be6d1cf7b7d7 src/sim.tp
--- a/src/sim.tp	Sat Jul 14 12:33:01 2012 -0700
+++ b/src/sim.tp	Sat Jul 14 12:33:11 2012 -0700
@@ -201,6 +201,7 @@
 		} else: {
 			text <- readFile: (args get: 1)
 			print: text
+			os close: 1
 			simState <- state fromStr: text
 			while: { if: (simState ended) {false} else: {true} } do: {
 				simState advance: (getMove: )