Mercurial > repos > icfp2012
diff src/sim.tp @ 17:998ef2173f28
colse stdout file descriptor
author | William Morgan <bill@mrgn.org> |
---|---|
date | Sat, 14 Jul 2012 11:08:17 -0700 |
parents | 26cfb964fe81 |
children | be6d1cf7b7d7 75a005b210c5 |
line wrap: on
line diff
--- a/src/sim.tp Sat Jul 14 10:52:28 2012 -0700 +++ b/src/sim.tp Sat Jul 14 11:08:17 2012 -0700 @@ -196,6 +196,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: )