# HG changeset patch
# User William Morgan <bill@mrgn.org>
# Date 1342322098 25200
# Node ID d9f1a063a4666b6fecbed0d93d0453468f01d627
# Parent  7a274d6026c833a1eab26cc6fc4efe0238a44d35
interactive mode works

diff -r 7a274d6026c8 -r d9f1a063a466 src/sim.tp
--- a/src/sim.tp	Sat Jul 14 19:33:35 2012 -0700
+++ b/src/sim.tp	Sat Jul 14 20:14:58 2012 -0700
@@ -198,7 +198,11 @@
 	}
 	
 	getMove <- {
-		os read: 0 1
+		ret <- os read: 0 1
+		while: {ret = "\n"} do: {
+			ret <- os read: 0 1
+		}
+		ret
 	}
 
 	main <- :args {