diff options
| author | Kartik K. Agaram <vc@akkartik.com> | 2015-01-13 21:00:43 -0800 |
|---|---|---|
| committer | Kartik K. Agaram <vc@akkartik.com> | 2015-01-13 21:00:43 -0800 |
| commit | 32aa234de62cea36b8ab24de66b7088b7f3d23d1 (patch) | |
| tree | 3a706f095100229e5c5e449d388315e80b3c0d2d | |
| parent | 50b64bb9b08873cf19c0ef0ae6f36f0d7b9026f8 (diff) | |
| download | mu-32aa234de62cea36b8ab24de66b7088b7f3d23d1.tar.gz | |
553
| -rw-r--r-- | blocking.arc.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/blocking.arc.t b/blocking.arc.t index c20e38e8..51ca90fa 100644 --- a/blocking.arc.t +++ b/blocking.arc.t @@ -10,7 +10,7 @@ (function main [ (default-space:space-address <- new space:literal 30:literal/capacity) (1:channel-address <- init-channel 3:literal) - (2:integer/routine <- fork reader:fn default-space:space-address/globals 50:literal/limit) + (2:integer/routine <- fork-helper reader:fn default-space:space-address/globals 50:literal/limit) ; write nothing to the channel ;? (sleep until-routine-done:literal 2:integer/routine) ]))) |