diff options
Diffstat (limited to 'html/068random.mu.html')
| -rw-r--r-- | html/068random.mu.html | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/html/068random.mu.html b/html/068random.mu.html index 192dcbab..84ca32c8 100644 --- a/html/068random.mu.html +++ b/html/068random.mu.html @@ -31,7 +31,7 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color </head> <body> <pre id='vimCodeElement'> -<span class="muRecipe">def</span> random generator:address:stream:number<span class="muRecipe"> -> </span>result:number, fail?:boolean, generator:address:stream:number [ +<span class="muRecipe">def</span> random generator:&:stream:num<span class="muRecipe"> -> </span>result:num, fail?:bool, generator:&:stream:num [ <span class="Constant">local-scope</span> <span class="Constant">load-ingredients</span> <span class="Delimiter">{</span> @@ -44,22 +44,22 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color ] <span class="Comment"># helper for tests</span> -<span class="muRecipe">def</span> assume-random-numbers<span class="muRecipe"> -> </span>result:address:stream:number [ +<span class="muRecipe">def</span> assume-random-numbers<span class="muRecipe"> -> </span>result:&:stream:num [ <span class="Constant">local-scope</span> <span class="Constant">load-ingredients</span> <span class="Comment"># compute result-len, space to allocate in result</span> - result-len:number<span class="Special"> <- </span>copy <span class="Constant">0</span> + result-len:num<span class="Special"> <- </span>copy <span class="Constant">0</span> <span class="Delimiter">{</span> - _, arg-received?:boolean<span class="Special"> <- </span><span class="Constant">next-ingredient</span> + _, arg-received?:bool<span class="Special"> <- </span><span class="Constant">next-ingredient</span> <span class="muControl">break-unless</span> arg-received? result-len<span class="Special"> <- </span>add result-len, <span class="Constant">1</span> <span class="muControl">loop</span> <span class="Delimiter">}</span> <span class="Constant">rewind-ingredients</span> - result-data:address:array:number<span class="Special"> <- </span>new <span class="Constant">number:type</span>, result-len - idx:number<span class="Special"> <- </span>copy <span class="Constant">0</span> + result-data:&:@:num<span class="Special"> <- </span>new <span class="Constant">number:type</span>, result-len + idx:num<span class="Special"> <- </span>copy <span class="Constant">0</span> <span class="Delimiter">{</span> - curr:number, arg-received?:boolean<span class="Special"> <- </span><span class="Constant">next-ingredient</span> + curr:num, arg-received?:bool<span class="Special"> <- </span><span class="Constant">next-ingredient</span> <span class="muControl">break-unless</span> arg-received? *result-data<span class="Special"> <- </span>put-index *result-data, idx, curr idx<span class="Special"> <- </span>add idx, <span class="Constant">1</span> @@ -70,11 +70,11 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color <span class="muScenario">scenario</span> random-numbers-in-scenario [ <span class="Constant">local-scope</span> - source:address:stream:number<span class="Special"> <- </span>assume-random-numbers <span class="Constant">34</span>, <span class="Constant">35</span>, <span class="Constant">37</span> - <span class="Constant">1</span>:number/<span class="Special">raw</span>, <span class="Constant">2</span>:boolean/<span class="Special">raw <- </span>random source - <span class="Constant">3</span>:number/<span class="Special">raw</span>, <span class="Constant">4</span>:boolean/<span class="Special">raw <- </span>random source - <span class="Constant">5</span>:number/<span class="Special">raw</span>, <span class="Constant">6</span>:boolean/<span class="Special">raw <- </span>random source - <span class="Constant">7</span>:number/<span class="Special">raw</span>, <span class="Constant">8</span>:boolean/<span class="Special">raw <- </span>random source + source:&:stream:num<span class="Special"> <- </span>assume-random-numbers <span class="Constant">34</span>, <span class="Constant">35</span>, <span class="Constant">37</span> + <span class="Constant">1</span>:num/<span class="Special">raw</span>, <span class="Constant">2</span>:bool/<span class="Special">raw <- </span>random source + <span class="Constant">3</span>:num/<span class="Special">raw</span>, <span class="Constant">4</span>:bool/<span class="Special">raw <- </span>random source + <span class="Constant">5</span>:num/<span class="Special">raw</span>, <span class="Constant">6</span>:bool/<span class="Special">raw <- </span>random source + <span class="Constant">7</span>:num/<span class="Special">raw</span>, <span class="Constant">8</span>:bool/<span class="Special">raw <- </span>random source memory-should-contain [ <span class="Constant">1</span><span class="Special"> <- </span><span class="Constant">34</span> <span class="Constant">2</span><span class="Special"> <- </span><span class="Constant">0</span> <span class="Comment"># everything went well</span> |