diff options
| author | Kartik K. Agaram <vc@akkartik.com> | 2015-01-18 01:13:18 -0800 |
|---|---|---|
| committer | Kartik K. Agaram <vc@akkartik.com> | 2015-01-18 01:13:18 -0800 |
| commit | 273dc3e5cd02fdd2b23310c91a3aa698698ebe99 (patch) | |
| tree | f474cadb0acea6432be108e4c5b633a66f19a911 | |
| parent | 104328ed6e731fd37f3b709e3df9374f57f2635a (diff) | |
| download | mu-273dc3e5cd02fdd2b23310c91a3aa698698ebe99.tar.gz | |
585
| -rw-r--r-- | chessboard-cursor.arc.t | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/chessboard-cursor.arc.t b/chessboard-cursor.arc.t index 01b72e66..9c8c4ece 100644 --- a/chessboard-cursor.arc.t +++ b/chessboard-cursor.arc.t @@ -6,8 +6,8 @@ (add-code '((function! main [ (default-space:space-address <- new space:literal 30:literal/capacity) - (1:channel-address/raw <- init-channel 3:literal) - (r:integer/routine <- fork read-move:fn nil:literal/globals 200:literal/limit) + (1:channel-address/raw <- init-channel 1:literal) + (r:integer/routine <- fork read-move:fn nil:literal/globals 2000:literal/limit) (c:character <- copy ((#\a literal))) (x:tagged-value <- save-type c:character) (1:channel-address/raw/deref <- write 1:channel-address/raw x:tagged-value) @@ -42,8 +42,8 @@ (add-code '((function! main [ (default-space:space-address <- new space:literal 30:literal/capacity) - (1:channel-address/raw <- init-channel 3:literal) - (r:integer/routine <- fork-helper read-move:fn nil:literal/globals 200:literal/limit) + (1:channel-address/raw <- init-channel 1:literal) + (r:integer/routine <- fork-helper read-move:fn nil:literal/globals 2000:literal/limit) (c:character <- copy ((#\a literal))) (x:tagged-value <- save-type c:character) (1:channel-address/raw/deref <- write 1:channel-address/raw x:tagged-value) @@ -68,7 +68,7 @@ (add-code '((function! main [ (default-space:space-address <- new space:literal 30:literal/capacity) - (1:channel-address/raw <- init-channel 3:literal) + (1:channel-address/raw <- init-channel 1:literal) (r:integer/routine <- fork-helper read-move:fn nil:literal/globals nil:literal/limit) (c:character <- copy ((#\q literal))) (x:tagged-value <- save-type c:character) @@ -85,7 +85,7 @@ (add-code '((function! main [ (default-space:space-address <- new space:literal 30:literal/capacity) - (1:channel-address/raw <- init-channel 3:literal) + (1:channel-address/raw <- init-channel 1:literal) (r:integer/routine <- fork-helper read-file:fn nil:literal/globals nil:literal/limit) (c:character <- copy ((#\i literal))) (x:tagged-value <- save-type c:character) @@ -107,7 +107,7 @@ (add-code '((function! main [ (default-space:space-address <- new space:literal 30:literal/capacity) - (1:channel-address/raw <- init-channel 3:literal) + (1:channel-address/raw <- init-channel 1:literal) (r:integer/routine <- fork-helper read-rank:fn nil:literal/globals nil:literal/limit) (c:character <- copy ((#\9 literal))) (x:tagged-value <- save-type c:character) |