Mercurial > repos > icfp2012
comparison src/sim.tp @ 29:d9f1a063a466
interactive mode works
| author | William Morgan <bill@mrgn.org> |
|---|---|
| date | Sat, 14 Jul 2012 20:14:58 -0700 |
| parents | 7a274d6026c8 |
| children | 031d46ff76a9 |
comparison
equal
deleted
inserted
replaced
| 28:7a274d6026c8 | 29:d9f1a063a466 |
|---|---|
| 196 os close: fd | 196 os close: fd |
| 197 out | 197 out |
| 198 } | 198 } |
| 199 | 199 |
| 200 getMove <- { | 200 getMove <- { |
| 201 os read: 0 1 | 201 ret <- os read: 0 1 |
| 202 while: {ret = "\n"} do: { | |
| 203 ret <- os read: 0 1 | |
| 204 } | |
| 205 ret | |
| 202 } | 206 } |
| 203 | 207 |
| 204 main <- :args { | 208 main <- :args { |
| 205 if: (args length) < 2 { | 209 if: (args length) < 2 { |
| 206 print: "usage: sim filename\n" | 210 print: "usage: sim filename\n" |