diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2016-09-17 12:55:10 -0700 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2016-09-17 12:55:10 -0700 |
commit | 760f683f2755038a1b0c16522f5001b889096aa5 (patch) | |
tree | e07afd384d45be93d81fb4c1788b332fe05799a0 /068random.mu | |
parent | 80df524b566a708551f752ce8b82e21738591651 (diff) | |
download | mu-760f683f2755038a1b0c16522f5001b889096aa5.tar.gz |
3389
Diffstat (limited to '068random.mu')
-rw-r--r-- | 068random.mu | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/068random.mu b/068random.mu index 22f186e1..168b32cb 100644 --- a/068random.mu +++ b/068random.mu @@ -1,4 +1,4 @@ -def random generator:address:stream:num -> result:num, fail?:bool, generator:address:stream:num [ +def random generator:&:stream:num -> result:num, fail?:bool, generator:&:stream:num [ local-scope load-ingredients { @@ -11,7 +11,7 @@ def random generator:address:stream:num -> result:num, fail?:bool, generator:add ] # helper for tests -def assume-random-numbers -> result:address:stream:num [ +def assume-random-numbers -> result:&:stream:num [ local-scope load-ingredients # compute result-len, space to allocate in result @@ -23,7 +23,7 @@ def assume-random-numbers -> result:address:stream:num [ loop } rewind-ingredients - result-data:address:array:num <- new number:type, result-len + result-data:&:array:num <- new number:type, result-len idx:num <- copy 0 { curr:num, arg-received?:bool <- next-ingredient @@ -37,7 +37,7 @@ def assume-random-numbers -> result:address:stream:num [ scenario random-numbers-in-scenario [ local-scope - source:address:stream:num <- assume-random-numbers 34, 35, 37 + source:&:stream:num <- assume-random-numbers 34, 35, 37 1:num/raw, 2:bool/raw <- random source 3:num/raw, 4:bool/raw <- random source 5:num/raw, 6:bool/raw <- random source |