# HG changeset patch
# User Mike Pavone <pavone@retrodev.com>
# Date 1342288530 25200
# Node ID c43a68f820fd1fd6330ae97e27987383d0fff6b4
# Parent  8d93102a48bd7969a81e4cfff5e00a85030ca00a# Parent  26cfb964fe81859bd2b8cf40ac92917160d1f1c0
Merge

diff -r 8d93102a48bd -r c43a68f820fd src/sim.tp
--- a/src/sim.tp	Sat Jul 14 10:54:36 2012 -0700
+++ b/src/sim.tp	Sat Jul 14 10:55:30 2012 -0700
@@ -93,7 +93,6 @@
 			foreach: in_grid :index el{
 				nextGrid append: el
 				if: (el isrobot) { 
-					print: "found robot\n"
 					robot <- el 
 				} else: { true }
 			}
@@ -166,7 +165,6 @@
 	testMoves <- {
 		myStep <- 0
 		{
-			print: (string: myStep)
 			myStep <- myStep + 1
 			if: myStep > 5 {"A"} else: {"W"}
 		}
@@ -174,13 +172,11 @@
 	
 	readFile <- :path {
 		fd <- os open: path (os O_RDONLY)
-		print: "fd: " . fd . "\n"
 		if: fd < 0 { "" } else: {
 			cur <- ""
 			part <- ""
 			while: { 
 				part <- os read: fd 128
-				print: "read: " . part . "\n"
 				part != ""
 			} do: {
 				cur <- cur . part
@@ -198,11 +194,10 @@
 		if: (args length) < 2 {
 			print: "usage: sim filename\n"
 		} else: {
-			print: (args get: 1) . "\n"
 			text <- readFile: (args get: 1)
+			print: text
 			simState <- state fromStr: text
 			while: { if: (simState ended) {false} else: {true} } do: {
-				print: "step...\n"
 				simState advance: (getMove: )
 			}
 		}