diff options
| author | Kartik K. Agaram <vc@akkartik.com> | 2017-09-13 21:11:24 -0700 |
|---|---|---|
| committer | Kartik K. Agaram <vc@akkartik.com> | 2017-09-13 21:11:24 -0700 |
| commit | 81a324bec3e992d6a979830c5bcae89ac7cdf40c (patch) | |
| tree | d3715e3f021fde74327240f7609f8fe056b6fa2c | |
| parent | bca60fb7e45c241bdf29182cbf295c74366336a0 (diff) | |
| download | mu-81a324bec3e992d6a979830c5bcae89ac7cdf40c.tar.gz | |
3995
| -rw-r--r-- | html/020run.cc.html | 8 | ||||
| -rw-r--r-- | html/071deep_copy.cc.html (renamed from html/074deep_copy.cc.html) | 415 | ||||
| -rw-r--r-- | html/072recipe.cc.html (renamed from html/071recipe.cc.html) | 84 | ||||
| -rw-r--r-- | html/073scheduler.cc.html (renamed from html/072scheduler.cc.html) | 876 | ||||
| -rw-r--r-- | html/074wait.cc.html (renamed from html/073wait.cc.html) | 28 | ||||
| -rw-r--r-- | html/076continuation.cc.html | 12 | ||||
| -rw-r--r-- | index.html | 8 |
7 files changed, 742 insertions, 689 deletions
diff --git a/html/020run.cc.html b/html/020run.cc.html index d55ea087..418d1eae 100644 --- a/html/020run.cc.html +++ b/html/020run.cc.html @@ -127,7 +127,7 @@ if ('onhashchange' in window) { <span id="L60" class="LineNr"> 60 </span><span class="Delimiter">}</span> <span id="L61" class="LineNr"> 61 </span> <span id="L62" class="LineNr"> 62 </span><span class="Normal">void</span> run_current_routine<span class="Delimiter">()</span> <span class="Delimiter">{</span> -<span id="L63" class="LineNr"> 63 </span> <span class="Normal">while</span> <span class="Delimiter">(</span><a href='072scheduler.cc.html#L28'>should_continue_running</a><span class="Delimiter">(</span>Current_routine<span class="Delimiter">))</span> <span class="Delimiter">{</span> <span class="Comment">// beware: may modify Current_routine</span> +<span id="L63" class="LineNr"> 63 </span> <span class="Normal">while</span> <span class="Delimiter">(</span><a href='073scheduler.cc.html#L28'>should_continue_running</a><span class="Delimiter">(</span>Current_routine<span class="Delimiter">))</span> <span class="Delimiter">{</span> <span class="Comment">// beware: may modify Current_routine</span> <span id="L64" class="LineNr"> 64 </span> <span class="Conceal">¦</span> <span class="Comment">// Running One Instruction</span> <span id="L65" class="LineNr"> 65 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span><a href='026call.cc.html#L85'>current_instruction</a><span class="Delimiter">().</span>is_label<span class="Delimiter">)</span> <span class="Delimiter">{</span> ++current_step_index<span class="Delimiter">();</span> <span class="Identifier">continue</span><span class="Delimiter">;</span> <span class="Delimiter">}</span> <span id="L66" class="LineNr"> 66 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span>Initial_callstack_depth + Trace_stream<span class="Delimiter">-></span>callstack_depth<span class="Delimiter">,</span> <span class="Constant">"run"</span><span class="Delimiter">)</span> << <a href='028call_return.cc.html#L158'>to_string</a><span class="Delimiter">(</span><a href='026call.cc.html#L85'>current_instruction</a><span class="Delimiter">())</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> @@ -183,7 +183,7 @@ if ('onhashchange' in window) { <span id="L116" class="LineNr">116 </span> <span id="L117" class="LineNr">117 </span><span class="Delimiter">:(code)</span> <span id="L118" class="LineNr">118 </span><span class="Comment">//: hook replaced in a later layer</span> -<span id="L119" class="LineNr">119 </span><span class="Normal">bool</span> <a href='072scheduler.cc.html#L28'>should_continue_running</a><span class="Delimiter">(</span><span class="Normal">const</span> routine* current_routine<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L119" class="LineNr">119 </span><span class="Normal">bool</span> <a href='073scheduler.cc.html#L28'>should_continue_running</a><span class="Delimiter">(</span><span class="Normal">const</span> routine* current_routine<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L120" class="LineNr">120 </span> assert<span class="Delimiter">(</span>current_routine == Current_routine<span class="Delimiter">);</span> <span class="Comment">// argument passed in just to make caller readable above</span> <span id="L121" class="LineNr">121 </span> <span class="Identifier">return</span> !Current_routine<span class="Delimiter">-></span>completed<span class="Delimiter">();</span> <span id="L122" class="LineNr">122 </span><span class="Delimiter">}</span> @@ -282,10 +282,10 @@ if ('onhashchange' in window) { <span id="L215" class="LineNr">215 </span> <span class="Delimiter">}</span> <span id="L216" class="LineNr">216 </span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">2</span><span class="Delimiter">,</span> <span class="Constant">"run"</span><span class="Delimiter">)</span> << <span class="Constant">"=== Starting to run"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> <span id="L217" class="LineNr">217 </span> assert<span class="Delimiter">(</span>Num_calls_to_transform_all == <span class="Constant">1</span><span class="Delimiter">);</span> -<span id="L218" class="LineNr">218 </span> <a href='072scheduler.cc.html#L122'>run_main</a><span class="Delimiter">(</span>argc<span class="Delimiter">,</span> argv<span class="Delimiter">);</span> +<span id="L218" class="LineNr">218 </span> <a href='073scheduler.cc.html#L122'>run_main</a><span class="Delimiter">(</span>argc<span class="Delimiter">,</span> argv<span class="Delimiter">);</span> <span id="L219" class="LineNr">219 </span><span class="Delimiter">}</span> <span id="L220" class="LineNr">220 </span><span class="Delimiter">:(code)</span> -<span id="L221" class="LineNr">221 </span><span class="Normal">void</span> <a href='072scheduler.cc.html#L122'>run_main</a><span class="Delimiter">(</span><span class="Normal">int</span> argc<span class="Delimiter">,</span> <span class="Normal">char</span>* argv[]<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L221" class="LineNr">221 </span><span class="Normal">void</span> <a href='073scheduler.cc.html#L122'>run_main</a><span class="Delimiter">(</span><span class="Normal">int</span> argc<span class="Delimiter">,</span> <span class="Normal">char</span>* argv[]<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L222" class="LineNr">222 </span> <a href='010vm.cc.html#L14'>recipe_ordinal</a> r = get<span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> <span class="Constant">"main"</span><span class="Delimiter">);</span> <span id="L223" class="LineNr">223 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>r<span class="Delimiter">)</span> run<span class="Delimiter">(</span>r<span class="Delimiter">);</span> <span id="L224" class="LineNr">224 </span><span class="Delimiter">}</span> diff --git a/html/074deep_copy.cc.html b/html/071deep_copy.cc.html index 6fde668c..56fb82fe 100644 --- a/html/074deep_copy.cc.html +++ b/html/071deep_copy.cc.html @@ -2,7 +2,7 @@ <html> <head> <meta http-equiv="content-type" content="text/html; charset=UTF-8"> -<title>Mu - 074deep_copy.cc</title> +<title>Mu - 071deep_copy.cc</title> <meta name="Generator" content="Vim/7.4"> <meta name="plugin-version" content="vim7.4_v2"> <meta name="syntax" content="cpp"> @@ -274,184 +274,251 @@ if ('onhashchange' in window) { <span id="L210" class="LineNr">210 </span><span class="Delimiter">}</span> <span id="L211" class="LineNr">211 </span><span class="Delimiter">:(before "End Primitive Recipe Implementations")</span> <span id="L212" class="LineNr">212 </span><span class="Normal">case</span> DEEP_COPY: <span class="Delimiter">{</span> -<span id="L213" class="LineNr">213 </span> <span class="Normal">const</span> reagent& input = <a href='026call.cc.html#L85'>current_instruction</a><span class="Delimiter">().</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">);</span> -<span id="L214" class="LineNr">214 </span> <span class="Comment">// allocate a tiny bit of temporary space for deep_copy()</span> -<span id="L215" class="LineNr">215 </span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9991</span><span class="Delimiter">,</span> <span class="Constant">"run"</span><span class="Delimiter">)</span> << <span class="Constant">"deep-copy: allocating space for temporary"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> -<span id="L216" class="LineNr">216 </span> reagent tmp<span class="Delimiter">(</span><span class="Constant">"tmp:<a href='043space.cc.html#L76'>address</a>:number"</span><span class="Delimiter">);</span> -<span id="L217" class="LineNr">217 </span> tmp<span class="Delimiter">.</span><a href='010vm.cc.html#L65'>set_value</a><span class="Delimiter">(</span>allocate<span class="Delimiter">(</span><span class="Constant">1</span><span class="Delimiter">));</span> -<span id="L218" class="LineNr">218 </span> products<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span>deep_copy<span class="Delimiter">(</span>input<span class="Delimiter">,</span> tmp<span class="Delimiter">));</span> -<span id="L219" class="LineNr">219 </span> <span class="Comment">// reclaim Mu memory allocated for tmp</span> -<span id="L220" class="LineNr">220 </span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9991</span><span class="Delimiter">,</span> <span class="Constant">"run"</span><span class="Delimiter">)</span> << <span class="Constant">"deep-copy: reclaiming temporary"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> -<span id="L221" class="LineNr">221 </span> <a href='037abandon.cc.html#L28'>abandon</a><span class="Delimiter">(</span>tmp<span class="Delimiter">.</span>value<span class="Delimiter">,</span> <a href='030container.cc.html#L238'>payload_type</a><span class="Delimiter">(</span>tmp<span class="Delimiter">.</span>type<span class="Delimiter">),</span> <a href='036refcount.cc.html#L92'>payload_size</a><span class="Delimiter">(</span>tmp<span class="Delimiter">));</span> -<span id="L222" class="LineNr">222 </span> <span class="Comment">// reclaim host memory allocated for tmp.type when tmp goes out of scope</span> -<span id="L223" class="LineNr">223 </span> <span class="Identifier">break</span><span class="Delimiter">;</span> -<span id="L224" class="LineNr">224 </span><span class="Delimiter">}</span> -<span id="L225" class="LineNr">225 </span> -<span id="L226" class="LineNr">226 </span><span class="Delimiter">:(code)</span> -<span id="L227" class="LineNr">227 </span>vector<<span class="Normal">double</span>> deep_copy<span class="Delimiter">(</span><span class="Normal">const</span> reagent& in<span class="Delimiter">,</span> <span class="Normal">const</span> reagent& tmp<span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L228" class="LineNr">228 </span> map<<span class="Normal">int</span><span class="Delimiter">,</span> <span class="Normal">int</span>> addresses_copied<span class="Delimiter">;</span> -<span id="L229" class="LineNr">229 </span> <span class="Identifier">return</span> deep_copy<span class="Delimiter">(</span>in<span class="Delimiter">,</span> addresses_copied<span class="Delimiter">,</span> tmp<span class="Delimiter">);</span> +<span id="L213" class="LineNr">213 </span> products<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span>deep_copy<span class="Delimiter">(</span><a href='026call.cc.html#L85'>current_instruction</a><span class="Delimiter">().</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">)));</span> +<span id="L214" class="LineNr">214 </span> <span class="Identifier">break</span><span class="Delimiter">;</span> +<span id="L215" class="LineNr">215 </span><span class="Delimiter">}</span> +<span id="L216" class="LineNr">216 </span> +<span id="L217" class="LineNr">217 </span><span class="Delimiter">:(code)</span> +<span id="L218" class="LineNr">218 </span>vector<<span class="Normal">double</span>> deep_copy<span class="Delimiter">(</span><span class="Normal">const</span> reagent& in<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L219" class="LineNr">219 </span> <span class="Comment">// allocate a tiny bit of temporary space for deep_copy()</span> +<span id="L220" class="LineNr">220 </span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9991</span><span class="Delimiter">,</span> <span class="Constant">"run"</span><span class="Delimiter">)</span> << <span class="Constant">"deep-copy: allocating space for temporary"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> +<span id="L221" class="LineNr">221 </span> reagent tmp<span class="Delimiter">(</span><span class="Constant">"tmp:<a href='043space.cc.html#L76'>address</a>:number"</span><span class="Delimiter">);</span> +<span id="L222" class="LineNr">222 </span> tmp<span class="Delimiter">.</span><a href='010vm.cc.html#L65'>set_value</a><span class="Delimiter">(</span>allocate<span class="Delimiter">(</span><span class="Constant">1</span><span class="Delimiter">));</span> +<span id="L223" class="LineNr">223 </span> map<<span class="Normal">int</span><span class="Delimiter">,</span> <span class="Normal">int</span>> addresses_copied<span class="Delimiter">;</span> +<span id="L224" class="LineNr">224 </span> vector<<span class="Normal">double</span>> result = deep_copy<span class="Delimiter">(</span>in<span class="Delimiter">,</span> addresses_copied<span class="Delimiter">,</span> tmp<span class="Delimiter">);</span> +<span id="L225" class="LineNr">225 </span> <span class="Comment">// reclaim Mu memory allocated for tmp</span> +<span id="L226" class="LineNr">226 </span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9991</span><span class="Delimiter">,</span> <span class="Constant">"run"</span><span class="Delimiter">)</span> << <span class="Constant">"deep-copy: reclaiming temporary"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> +<span id="L227" class="LineNr">227 </span> <a href='037abandon.cc.html#L28'>abandon</a><span class="Delimiter">(</span>tmp<span class="Delimiter">.</span>value<span class="Delimiter">,</span> <a href='030container.cc.html#L238'>payload_type</a><span class="Delimiter">(</span>tmp<span class="Delimiter">.</span>type<span class="Delimiter">),</span> <a href='036refcount.cc.html#L92'>payload_size</a><span class="Delimiter">(</span>tmp<span class="Delimiter">));</span> +<span id="L228" class="LineNr">228 </span> <span class="Comment">// reclaim host memory allocated for tmp.type when tmp goes out of scope</span> +<span id="L229" class="LineNr">229 </span> <span class="Identifier">return</span> result<span class="Delimiter">;</span> <span id="L230" class="LineNr">230 </span><span class="Delimiter">}</span> <span id="L231" class="LineNr">231 </span> <span id="L232" class="LineNr">232 </span>vector<<span class="Normal">double</span>> deep_copy<span class="Delimiter">(</span>reagent<span class="Comment">/*</span><span class="Comment">copy</span><span class="Comment">*/</span> in<span class="Delimiter">,</span> map<<span class="Normal">int</span><span class="Delimiter">,</span> <span class="Normal">int</span>>& addresses_copied<span class="Delimiter">,</span> <span class="Normal">const</span> reagent& tmp<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L233" class="LineNr">233 </span> canonize<span class="Delimiter">(</span>in<span class="Delimiter">);</span> -<span id="L234" class="LineNr">234 </span> vector<<span class="Normal">double</span>> result<span class="Delimiter">;</span> -<span id="L235" class="LineNr">235 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>is_mu_address<span class="Delimiter">(</span>in<span class="Delimiter">))</span> -<span id="L236" class="LineNr">236 </span> <span class="Conceal">¦</span> result<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span><a href='074deep_copy.cc.html#L243'>deep_copy_address</a><span class="Delimiter">(</span>in<span class="Delimiter">,</span> addresses_copied<span class="Delimiter">,</span> tmp<span class="Delimiter">));</span> -<span id="L237" class="LineNr">237 </span> <span class="Normal">else</span> -<span id="L238" class="LineNr">238 </span> <span class="Conceal">¦</span> deep_copy<span class="Delimiter">(</span>in<span class="Delimiter">,</span> addresses_copied<span class="Delimiter">,</span> tmp<span class="Delimiter">,</span> result<span class="Delimiter">);</span> -<span id="L239" class="LineNr">239 </span> <span class="Identifier">return</span> result<span class="Delimiter">;</span> -<span id="L240" class="LineNr">240 </span><span class="Delimiter">}</span> -<span id="L241" class="LineNr">241 </span> -<span id="L242" class="LineNr">242 </span><span class="Comment">// deep-copy an address and return a new address</span> -<span id="L243" class="LineNr">243 </span><span class="Normal">int</span> <a href='074deep_copy.cc.html#L243'>deep_copy_address</a><span class="Delimiter">(</span><span class="Normal">const</span> reagent& canonized_in<span class="Delimiter">,</span> map<<span class="Normal">int</span><span class="Delimiter">,</span> <span class="Normal">int</span>>& addresses_copied<span class="Delimiter">,</span> <span class="Normal">const</span> reagent& tmp<span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L244" class="LineNr">244 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>canonized_in<span class="Delimiter">.</span>value == <span class="Constant">0</span><span class="Delimiter">)</span> <span class="Identifier">return</span> <span class="Constant">0</span><span class="Delimiter">;</span> -<span id="L245" class="LineNr">245 </span> <span class="Normal">int</span> in_address = <a href='074deep_copy.cc.html#L298'>payload_address</a><span class="Delimiter">(</span>canonized_in<span class="Delimiter">);</span> -<span id="L246" class="LineNr">246 </span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9991</span><span class="Delimiter">,</span> <span class="Constant">"run"</span><span class="Delimiter">)</span> << <span class="Constant">"deep-copy: copying <a href='043space.cc.html#L76'>address</a> "</span> << in_address << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> -<span id="L247" class="LineNr">247 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>contains_key<span class="Delimiter">(</span>addresses_copied<span class="Delimiter">,</span> in_address<span class="Delimiter">))</span> <span class="Delimiter">{</span> -<span id="L248" class="LineNr">248 </span> <span class="Conceal">¦</span> <span class="Normal">int</span> out = get<span class="Delimiter">(</span>addresses_copied<span class="Delimiter">,</span> in_address<span class="Delimiter">);</span> -<span id="L249" class="LineNr">249 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9991</span><span class="Delimiter">,</span> <span class="Constant">"run"</span><span class="Delimiter">)</span> << <span class="Constant">"deep-copy: copy already exists: "</span> << out << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> -<span id="L250" class="LineNr">250 </span> <span class="Conceal">¦</span> <span class="Identifier">return</span> out<span class="Delimiter">;</span> -<span id="L251" class="LineNr">251 </span> <span class="Delimiter">}</span> -<span id="L252" class="LineNr">252 </span> <span class="Normal">int</span> out = allocate<span class="Delimiter">(</span><a href='036refcount.cc.html#L92'>payload_size</a><span class="Delimiter">(</span>canonized_in<span class="Delimiter">));</span> -<span id="L253" class="LineNr">253 </span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9991</span><span class="Delimiter">,</span> <span class="Constant">"run"</span><span class="Delimiter">)</span> << <span class="Constant">"deep-copy: new <a href='043space.cc.html#L76'>address</a> is "</span> << out << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> -<span id="L254" class="LineNr">254 </span> <a href='001help.cc.html#L221'>put</a><span class="Delimiter">(</span>addresses_copied<span class="Delimiter">,</span> in_address<span class="Delimiter">,</span> out<span class="Delimiter">);</span> -<span id="L255" class="LineNr">255 </span> reagent<span class="Comment">/*</span><span class="Comment">copy</span><span class="Comment">*/</span> payload = canonized_in<span class="Delimiter">;</span> -<span id="L256" class="LineNr">256 </span> payload<span class="Delimiter">.</span>properties<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span>pair<string<span class="Delimiter">,</span> string_tree*><span class="Delimiter">(</span><span class="Constant">"lookup"</span><span class="Delimiter">,</span> <span class="Constant">NULL</span><span class="Delimiter">));</span> -<span id="L257" class="LineNr">257 </span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9991</span><span class="Delimiter">,</span> <span class="Constant">"run"</span><span class="Delimiter">)</span> << <span class="Constant">"recursing on payload "</span> << payload<span class="Delimiter">.</span>value << <span class="Constant">' '</span> << <a href='028call_return.cc.html#L158'>to_string</a><span class="Delimiter">(</span>payload<span class="Delimiter">)</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> -<span id="L258" class="LineNr">258 </span> vector<<span class="Normal">double</span>> data = deep_copy<span class="Delimiter">(</span>payload<span class="Delimiter">,</span> addresses_copied<span class="Delimiter">,</span> tmp<span class="Delimiter">);</span> -<span id="L259" class="LineNr">259 </span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9991</span><span class="Delimiter">,</span> <span class="Constant">"run"</span><span class="Delimiter">)</span> << <span class="Constant">"deep-copy: writing result "</span> << out << <span class="Constant">": "</span> << <a href='028call_return.cc.html#L158'>to_string</a><span class="Delimiter">(</span>data<span class="Delimiter">)</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> -<span id="L260" class="LineNr">260 </span> <span class="Comment">// HACK: write_memory interface isn't ideal for this situation; we need</span> -<span id="L261" class="LineNr">261 </span> <span class="Comment">// a temporary location to help copy the payload.</span> -<span id="L262" class="LineNr">262 </span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9991</span><span class="Delimiter">,</span> <span class="Constant">"run"</span><span class="Delimiter">)</span> << <span class="Constant">"deep-copy: writing temporary "</span> << tmp<span class="Delimiter">.</span>value << <span class="Constant">": "</span> << out << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> -<span id="L263" class="LineNr">263 </span> <a href='001help.cc.html#L221'>put</a><span class="Delimiter">(</span>Memory<span class="Delimiter">,</span> tmp<span class="Delimiter">.</span>value<span class="Delimiter">,</span> out<span class="Delimiter">);</span> -<span id="L264" class="LineNr">264 </span> payload<span class="Delimiter">.</span><a href='010vm.cc.html#L65'>set_value</a><span class="Delimiter">(</span>tmp<span class="Delimiter">.</span>value<span class="Delimiter">);</span> <span class="Comment">// now modified for output</span> -<span id="L265" class="LineNr">265 </span> vector<<span class="Normal">double</span>> old_data = read_memory<span class="Delimiter">(</span>payload<span class="Delimiter">);</span> -<span id="L266" class="LineNr">266 </span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9991</span><span class="Delimiter">,</span> <span class="Constant">"run"</span><span class="Delimiter">)</span> << <span class="Constant">"deep-copy: really writing to "</span> << payload<span class="Delimiter">.</span>value << <span class="Constant">' '</span> << <a href='028call_return.cc.html#L158'>to_string</a><span class="Delimiter">(</span>payload<span class="Delimiter">)</span> << <span class="Constant">" (old value "</span> << <a href='028call_return.cc.html#L158'>to_string</a><span class="Delimiter">(</span>old_data<span class="Delimiter">)</span> << <span class="Constant">" new value "</span> << <a href='028call_return.cc.html#L158'>to_string</a><span class="Delimiter">(</span>data<span class="Delimiter">)</span> << <span class="Constant">")"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> -<span id="L267" class="LineNr">267 </span> write_memory<span class="Delimiter">(</span>payload<span class="Delimiter">,</span> data<span class="Delimiter">);</span> -<span id="L268" class="LineNr">268 </span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9991</span><span class="Delimiter">,</span> <span class="Constant">"run"</span><span class="Delimiter">)</span> << <span class="Constant">"deep-copy: output is "</span> << <a href='028call_return.cc.html#L158'>to_string</a><span class="Delimiter">(</span>data<span class="Delimiter">)</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> -<span id="L269" class="LineNr">269 </span> <span class="Identifier">return</span> out<span class="Delimiter">;</span> -<span id="L270" class="LineNr">270 </span><span class="Delimiter">}</span> -<span id="L271" class="LineNr">271 </span> -<span id="L272" class="LineNr">272 </span><span class="Comment">// deep-copy a non-address and return a vector of locations</span> -<span id="L273" class="LineNr">273 </span><span class="Normal">void</span> deep_copy<span class="Delimiter">(</span><span class="Normal">const</span> reagent& canonized_in<span class="Delimiter">,</span> map<<span class="Normal">int</span><span class="Delimiter">,</span> <span class="Normal">int</span>>& addresses_copied<span class="Delimiter">,</span> <span class="Normal">const</span> reagent& tmp<span class="Delimiter">,</span> vector<<span class="Normal">double</span>>& out<span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L274" class="LineNr">274 </span> assert<span class="Delimiter">(</span>!is_mu_address<span class="Delimiter">(</span>canonized_in<span class="Delimiter">));</span> -<span id="L275" class="LineNr">275 </span> vector<<span class="Normal">double</span>> data = read_memory<span class="Delimiter">(</span>canonized_in<span class="Delimiter">);</span> -<span id="L276" class="LineNr">276 </span> out<span class="Delimiter">.</span>insert<span class="Delimiter">(</span>out<span class="Delimiter">.</span><a href='003trace.cc.html#L197'>end</a><span class="Delimiter">(),</span> data<span class="Delimiter">.</span>begin<span class="Delimiter">(),</span> data<span class="Delimiter">.</span><a href='003trace.cc.html#L197'>end</a><span class="Delimiter">());</span> -<span id="L277" class="LineNr">277 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>!contains_key<span class="Delimiter">(</span>Container_metadata<span class="Delimiter">,</span> canonized_in<span class="Delimiter">.</span>type<span class="Delimiter">))</span> <span class="Identifier">return</span><span class="Delimiter">;</span> -<span id="L278" class="LineNr">278 </span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9991</span><span class="Delimiter">,</span> <span class="Constant">"run"</span><span class="Delimiter">)</span> << <span class="Constant">"deep-copy: scanning for addresses in "</span> << <a href='028call_return.cc.html#L158'>to_string</a><span class="Delimiter">(</span>data<span class="Delimiter">)</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> -<span id="L279" class="LineNr">279 </span> <span class="Normal">const</span> container_metadata& metadata = get<span class="Delimiter">(</span>Container_metadata<span class="Delimiter">,</span> canonized_in<span class="Delimiter">.</span>type<span class="Delimiter">);</span> -<span id="L280" class="LineNr">280 </span> <span class="Normal">for</span> <span class="Delimiter">(</span>map<set<tag_condition_info><span class="Delimiter">,</span> set<address_element_info> >::const_iterator p = metadata<span class="Delimiter">.</span><a href='043space.cc.html#L76'>address</a><span class="Delimiter">.</span>begin<span class="Delimiter">();</span> p != metadata<span class="Delimiter">.</span><a href='043space.cc.html#L76'>address</a><span class="Delimiter">.</span><a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> ++p<span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L281" class="LineNr">281 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>!all_match<span class="Delimiter">(</span>data<span class="Delimiter">,</span> p<span class="Delimiter">-></span>first<span class="Delimiter">))</span> <span class="Identifier">continue</span><span class="Delimiter">;</span> -<span id="L282" class="LineNr">282 </span> <span class="Conceal">¦</span> <span class="Normal">for</span> <span class="Delimiter">(</span>set<address_element_info>::const_iterator info = p<span class="Delimiter">-></span>second<span class="Delimiter">.</span>begin<span class="Delimiter">();</span> info != p<span class="Delimiter">-></span>second<span class="Delimiter">.</span><a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> ++info<span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L283" class="LineNr">283 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// construct a fake reagent that reads directly from the appropriate</span> -<span id="L284" class="LineNr">284 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// field of the container</span> -<span id="L285" class="LineNr">285 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> reagent curr<span class="Delimiter">;</span> -<span id="L286" class="LineNr">286 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>info<span class="Delimiter">-></span><a href='030container.cc.html#L238'>payload_type</a><span class="Delimiter">-></span>atom<span class="Delimiter">)</span> -<span id="L287" class="LineNr">287 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> curr<span class="Delimiter">.</span>type = <span class="Normal">new</span> type_tree<span class="Delimiter">(</span><span class="Normal">new</span> type_tree<span class="Delimiter">(</span><span class="Constant">"address"</span><span class="Delimiter">),</span> <span class="Normal">new</span> type_tree<span class="Delimiter">(</span><span class="Normal">new</span> type_tree<span class="Delimiter">(</span>info<span class="Delimiter">-></span><a href='030container.cc.html#L238'>payload_type</a><span class="Delimiter">-></span>name<span class="Delimiter">),</span> <span class="Constant">NULL</span><span class="Delimiter">));</span> -<span id="L288" class="LineNr">288 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">else</span> -<span id="L289" class="LineNr">289 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> curr<span class="Delimiter">.</span>type = <span class="Normal">new</span> type_tree<span class="Delimiter">(</span><span class="Normal">new</span> type_tree<span class="Delimiter">(</span><span class="Constant">"address"</span><span class="Delimiter">),</span> <span class="Normal">new</span> type_tree<span class="Delimiter">(</span>*info<span class="Delimiter">-></span><a href='030container.cc.html#L238'>payload_type</a><span class="Delimiter">));</span> -<span id="L290" class="LineNr">290 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> curr<span class="Delimiter">.</span><a href='010vm.cc.html#L65'>set_value</a><span class="Delimiter">(</span>canonized_in<span class="Delimiter">.</span>value + info<span class="Delimiter">-></span>offset<span class="Delimiter">);</span> -<span id="L291" class="LineNr">291 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> curr<span class="Delimiter">.</span>properties<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span>pair<string<span class="Delimiter">,</span> string_tree*><span class="Delimiter">(</span><span class="Constant">"raw"</span><span class="Delimiter">,</span> <span class="Constant">NULL</span><span class="Delimiter">));</span> -<span id="L292" class="LineNr">292 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9991</span><span class="Delimiter">,</span> <span class="Constant">"run"</span><span class="Delimiter">)</span> << <span class="Constant">"deep-copy: copying <a href='043space.cc.html#L76'>address</a> "</span> << curr<span class="Delimiter">.</span>value << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> -<span id="L293" class="LineNr">293 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> out<span class="Delimiter">.</span>at<span class="Delimiter">(</span>info<span class="Delimiter">-></span>offset<span class="Delimiter">)</span> = <a href='074deep_copy.cc.html#L243'>deep_copy_address</a><span class="Delimiter">(</span>curr<span class="Delimiter">,</span> addresses_copied<span class="Delimiter">,</span> tmp<span class="Delimiter">);</span> -<span id="L294" class="LineNr">294 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span> -<span id="L295" class="LineNr">295 </span> <span class="Delimiter">}</span> -<span id="L296" class="LineNr">296 </span><span class="Delimiter">}</span> -<span id="L297" class="LineNr">297 </span> -<span id="L298" class="LineNr">298 </span><span class="Normal">int</span> <a href='074deep_copy.cc.html#L298'>payload_address</a><span class="Delimiter">(</span>reagent<span class="Comment">/*</span><span class="Comment">copy</span><span class="Comment">*/</span> x<span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L299" class="LineNr">299 </span> x<span class="Delimiter">.</span>properties<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span>pair<string<span class="Delimiter">,</span> string_tree*><span class="Delimiter">(</span><span class="Constant">"lookup"</span><span class="Delimiter">,</span> <span class="Constant">NULL</span><span class="Delimiter">));</span> -<span id="L300" class="LineNr">300 </span> canonize<span class="Delimiter">(</span>x<span class="Delimiter">);</span> -<span id="L301" class="LineNr">301 </span> <span class="Identifier">return</span> x<span class="Delimiter">.</span>value<span class="Delimiter">;</span> -<span id="L302" class="LineNr">302 </span><span class="Delimiter">}</span> -<span id="L303" class="LineNr">303 </span> -<span id="L304" class="LineNr">304 </span><span class="Comment">//: moar tests, just because I can't believe it all works</span> -<span id="L305" class="LineNr">305 </span> -<span id="L306" class="LineNr">306 </span><span class="Delimiter">:(scenario deep_copy_stress_test_1)</span> -<span id="L307" class="LineNr">307 </span><span class="muData">container</span> foo1 [ -<span id="L308" class="LineNr">308 </span> <span class="Normal">p</span>:&:num -<span id="L309" class="LineNr">309 </span>] -<span id="L310" class="LineNr">310 </span><span class="muData">container</span> foo2 [ -<span id="L311" class="LineNr">311 </span> <span class="Normal">p</span>:&:foo1 -<span id="L312" class="LineNr">312 </span>] -<span id="L313" class="LineNr">313 </span><span class="muData">exclusive-container</span> foo3 [ -<span id="L314" class="LineNr">314 </span> <span class="Normal">p</span>:&:foo1 -<span id="L315" class="LineNr">315 </span> <span class="Normal">q</span>:&:foo2 -<span id="L316" class="LineNr">316 </span>] -<span id="L317" class="LineNr">317 </span><span class="muRecipe">def</span> <a href='000organization.cc.html#L113'>main</a> [ -<span id="L318" class="LineNr">318 </span> local-scope -<span id="L319" class="LineNr">319 </span> <span class="Normal">x</span>:&:num<span class="Special"> <- </span><span class="Normal">new</span> <span class="Constant">number:type</span> -<span id="L320" class="LineNr">320 </span> *x<span class="Special"> <- </span>copy <span class="Constant">34</span> -<span id="L321" class="LineNr">321 </span> <span class="Normal">a</span>:&:foo1<span class="Special"> <- </span><span class="Normal">new</span> <span class="Constant">foo1:type</span> -<span id="L322" class="LineNr">322 </span> *a<span class="Special"> <- </span>merge x -<span id="L323" class="LineNr">323 </span> <span class="Normal">b</span>:&:foo2<span class="Special"> <- </span><span class="Normal">new</span> <span class="Constant">foo2:type</span> -<span id="L324" class="LineNr">324 </span> *b<span class="Special"> <- </span>merge a -<span id="L325" class="LineNr">325 </span> <span class="Normal">c</span>:foo3<span class="Special"> <- </span>merge <span class="Constant">1</span>/q<span class="Delimiter">,</span> b -<span id="L326" class="LineNr">326 </span> <span class="Normal">d</span>:foo3<span class="Special"> <- </span>deep-copy c -<span id="L327" class="LineNr">327 </span> <span class="Normal">e</span>:&:foo2<span class="Delimiter">,</span> z:<span class="Normal">bool</span><span class="Special"> <- </span>maybe-convert d<span class="Delimiter">,</span> <span class="Constant">q:variant</span> -<span id="L328" class="LineNr">328 </span> <span class="Normal">f</span>:&:foo1<span class="Special"> <- </span>get *e<span class="Delimiter">,</span> <span class="Constant">p:offset</span> -<span id="L329" class="LineNr">329 </span> <span class="Normal">g</span>:&:num<span class="Special"> <- </span>get *f<span class="Delimiter">,</span> <span class="Constant">p:offset</span> -<span id="L330" class="LineNr">330 </span> <span class="Constant">1</span>:num/<span class="Special">raw <- </span>copy *g -<span id="L331" class="LineNr">331 </span>] -<span id="L332" class="LineNr">332 </span><span class="traceContains">+mem: storing 34 in location 1</span> -<span id="L333" class="LineNr">333 </span> -<span id="L334" class="LineNr">334 </span><span class="Delimiter">:(scenario deep_copy_stress_test_2)</span> -<span id="L335" class="LineNr">335 </span><span class="muData">container</span> foo1 [ -<span id="L336" class="LineNr">336 </span> <span class="Normal">p</span>:&:num -<span id="L337" class="LineNr">337 </span>] -<span id="L338" class="LineNr">338 </span><span class="muData">container</span> foo2 [ -<span id="L339" class="LineNr">339 </span> <span class="Normal">p</span>:&:foo1 +<span id="L234" class="LineNr">234 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>is_mu_address<span class="Delimiter">(</span>in<span class="Delimiter">))</span> <span class="Delimiter">{</span> +<span id="L235" class="LineNr">235 </span> <span class="Conceal">¦</span> <span class="Comment">// hack: skip primitive containers that do their own locking; they're designed to be shared between routines</span> +<span id="L236" class="LineNr">236 </span> <span class="Conceal">¦</span> type_tree* payload = in<span class="Delimiter">.</span>type<span class="Delimiter">-></span>right<span class="Delimiter">;</span> +<span id="L237" class="LineNr">237 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>payload<span class="Delimiter">-></span>left<span class="Delimiter">-></span>name == <span class="Constant">"channel"</span> || payload<span class="Delimiter">-></span>left<span class="Delimiter">-></span>name == <span class="Constant">"resources"</span><span class="Delimiter">)</span> +<span id="L238" class="LineNr">238 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Identifier">return</span> read_memory<span class="Delimiter">(</span>in<span class="Delimiter">);</span> +<span id="L239" class="LineNr">239 </span> <span class="Delimiter">}</span> +<span id="L240" class="LineNr">240 </span> vector<<span class="Normal">double</span>> result<span class="Delimiter">;</span> +<span id="L241" class="LineNr">241 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>is_mu_address<span class="Delimiter">(</span>in<span class="Delimiter">))</span> +<span id="L242" class="LineNr">242 </span> <span class="Conceal">¦</span> result<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span><a href='071deep_copy.cc.html#L249'>deep_copy_address</a><span class="Delimiter">(</span>in<span class="Delimiter">,</span> addresses_copied<span class="Delimiter">,</span> tmp<span class="Delimiter">));</span> +<span id="L243" class="LineNr">243 </span> <span class="Normal">else</span> +<span id="L244" class="LineNr">244 </span> <span class="Conceal">¦</span> deep_copy<span class="Delimiter">(</span>in<span class="Delimiter">,</span> addresses_copied<span class="Delimiter">,</span> tmp<span class="Delimiter">,</span> result<span class="Delimiter">);</span> +<span id="L245" class="LineNr">245 </span> <span class="Identifier">return</span> result<span class="Delimiter">;</span> +<span id="L246" class="LineNr">246 </span><span class="Delimiter">}</span> +<span id="L247" class="LineNr">247 </span> +<span id="L248" class="LineNr">248 </span><span class="Comment">// deep-copy an address and return a new address</span> +<span id="L249" class="LineNr">249 </span><span class="Normal">int</span> <a href='071deep_copy.cc.html#L249'>deep_copy_address</a><span class="Delimiter">(</span><span class="Normal">const</span> reagent& canonized_in<span class="Delimiter">,</span> map<<span class="Normal">int</span><span class="Delimiter">,</span> <span class="Normal">int</span>>& addresses_copied<span class="Delimiter">,</span> <span class="Normal">const</span> reagent& tmp<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L250" class="LineNr">250 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>canonized_in<span class="Delimiter">.</span>value == <span class="Constant">0</span><span class="Delimiter">)</span> <span class="Identifier">return</span> <span class="Constant">0</span><span class="Delimiter">;</span> +<span id="L251" class="LineNr">251 </span> <span class="Normal">int</span> in_address = <a href='071deep_copy.cc.html#L309'>payload_address</a><span class="Delimiter">(</span>canonized_in<span class="Delimiter">);</span> +<span id="L252" class="LineNr">252 </span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9991</span><span class="Delimiter">,</span> <span class="Constant">"run"</span><span class="Delimiter">)</span> << <span class="Constant">"deep-copy: copying <a href='043space.cc.html#L76'>address</a> "</span> << in_address << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> +<span id="L253" class="LineNr">253 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>contains_key<span class="Delimiter">(</span>addresses_copied<span class="Delimiter">,</span> in_address<span class="Delimiter">))</span> <span class="Delimiter">{</span> +<span id="L254" class="LineNr">254 </span> <span class="Conceal">¦</span> <span class="Normal">int</span> out = get<span class="Delimiter">(</span>addresses_copied<span class="Delimiter">,</span> in_address<span class="Delimiter">);</span> +<span id="L255" class="LineNr">255 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9991</span><span class="Delimiter">,</span> <span class="Constant">"run"</span><span class="Delimiter">)</span> << <span class="Constant">"deep-copy: copy already exists: "</span> << out << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> +<span id="L256" class="LineNr">256 </span> <span class="Conceal">¦</span> <span class="Identifier">return</span> out<span class="Delimiter">;</span> +<span id="L257" class="LineNr">257 </span> <span class="Delimiter">}</span> +<span id="L258" class="LineNr">258 </span> <span class="Normal">int</span> out = allocate<span class="Delimiter">(</span><a href='036refcount.cc.html#L92'>payload_size</a><span class="Delimiter">(</span>canonized_in<span class="Delimiter">));</span> +<span id="L259" class="LineNr">259 </span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9991</span><span class="Delimiter">,</span> <span class="Constant">"run"</span><span class="Delimiter">)</span> << <span class="Constant">"deep-copy: new <a href='043space.cc.html#L76'>address</a> is "</span> << out << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> +<span id="L260" class="LineNr">260 </span> <a href='001help.cc.html#L221'>put</a><span class="Delimiter">(</span>addresses_copied<span class="Delimiter">,</span> in_address<span class="Delimiter">,</span> out<span class="Delimiter">);</span> +<span id="L261" class="LineNr">261 </span> reagent<span class="Comment">/*</span><span class="Comment">copy</span><span class="Comment">*/</span> payload = canonized_in<span class="Delimiter">;</span> +<span id="L262" class="LineNr">262 </span> payload<span class="Delimiter">.</span>properties<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span>pair<string<span class="Delimiter">,</span> string_tree*><span class="Delimiter">(</span><span class="Constant">"lookup"</span><span class="Delimiter">,</span> <span class="Constant">NULL</span><span class="Delimiter">));</span> +<span id="L263" class="LineNr">263 </span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9991</span><span class="Delimiter">,</span> <span class="Constant">"run"</span><span class="Delimiter">)</span> << <span class="Constant">"recursing on payload "</span> << payload<span class="Delimiter">.</span>value << <span class="Constant">' '</span> << <a href='028call_return.cc.html#L158'>to_string</a><span class="Delimiter">(</span>payload<span class="Delimiter">)</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> +<span id="L264" class="LineNr">264 </span> vector<<span class="Normal">double</span>> data = deep_copy<span class="Delimiter">(</span>payload<span class="Delimiter">,</span> addresses_copied<span class="Delimiter">,</span> tmp<span class="Delimiter">);</span> +<span id="L265" class="LineNr">265 </span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9991</span><span class="Delimiter">,</span> <span class="Constant">"run"</span><span class="Delimiter">)</span> << <span class="Constant">"deep-copy: writing result "</span> << out << <span class="Constant">": "</span> << <a href='028call_return.cc.html#L158'>to_string</a><span class="Delimiter">(</span>data<span class="Delimiter">)</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> +<span id="L266" class="LineNr">266 </span> <span class="Comment">// HACK: write_memory interface isn't ideal for this situation; we need</span> +<span id="L267" class="LineNr">267 </span> <span class="Comment">// a temporary location to help copy the payload.</span> +<span id="L268" class="LineNr">268 </span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9991</span><span class="Delimiter">,</span> <span class="Constant">"run"</span><span class="Delimiter">)</span> << <span class="Constant">"deep-copy: writing temporary "</span> << tmp<span class="Delimiter">.</span>value << <span class="Constant">": "</span> << out << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> +<span id="L269" class="LineNr">269 </span> <a href='001help.cc.html#L221'>put</a><span class="Delimiter">(</span>Memory<span class="Delimiter">,</span> tmp<span class="Delimiter">.</span>value<span class="Delimiter">,</span> out<span class="Delimiter">);</span> +<span id="L270" class="LineNr">270 </span> payload<span class="Delimiter">.</span><a href='010vm.cc.html#L65'>set_value</a><span class="Delimiter">(</span>tmp<span class="Delimiter">.</span>value<span class="Delimiter">);</span> <span class="Comment">// now modified for output</span> +<span id="L271" class="LineNr">271 </span> vector<<span class="Normal">double</span>> old_data = read_memory<span class="Delimiter">(</span>payload<span class="Delimiter">);</span> +<span id="L272" class="LineNr">272 </span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9991</span><span class="Delimiter">,</span> <span class="Constant">"run"</span><span class="Delimiter">)</span> << <span class="Constant">"deep-copy: really writing to "</span> << payload<span class="Delimiter">.</span>value << <span class="Constant">' '</span> << <a href='028call_return.cc.html#L158'>to_string</a><span class="Delimiter">(</span>payload<span class="Delimiter">)</span> << <span class="Constant">" (old value "</span> << <a href='028call_return.cc.html#L158'>to_string</a><span class="Delimiter">(</span>old_data<span class="Delimiter">)</span> << <span class="Constant">" new value "</span> << <a href='028call_return.cc.html#L158'>to_string</a><span class="Delimiter">(</span>data<span class="Delimiter">)</span> << <span class="Constant">")"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> +<span id="L273" class="LineNr">273 </span> write_memory<span class="Delimiter">(</span>payload<span class="Delimiter">,</span> data<span class="Delimiter">);</span> +<span id="L274" class="LineNr">274 </span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9991</span><span class="Delimiter">,</span> <span class="Constant">"run"</span><span class="Delimiter">)</span> << <span class="Constant">"deep-copy: output is "</span> << <a href='028call_return.cc.html#L158'>to_string</a><span class="Delimiter">(</span>data<span class="Delimiter">)</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> +<span id="L275" class="LineNr">275 </span> <span class="Identifier">return</span> out<span class="Delimiter">;</span> +<span id="L276" class="LineNr">276 </span><span class="Delimiter">}</span> +<span id="L277" class="LineNr">277 </span> +<span id="L278" class="LineNr">278 </span><span class="Comment">// deep-copy a non-address and return a vector of locations</span> +<span id="L279" class="LineNr">279 </span><span class="Normal">void</span> deep_copy<span class="Delimiter">(</span><span class="Normal">const</span> reagent& canonized_in<span class="Delimiter">,</span> map<<span class="Normal">int</span><span class="Delimiter">,</span> <span class="Normal">int</span>>& addresses_copied<span class="Delimiter">,</span> <span class="Normal">const</span> reagent& tmp<span class="Delimiter">,</span> vector<<span class="Normal">double</span>>& out<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L280" class="LineNr">280 </span> assert<span class="Delimiter">(</span>!is_mu_address<span class="Delimiter">(</span>canonized_in<span class="Delimiter">));</span> +<span id="L281" class="LineNr">281 </span> vector<<span class="Normal">double</span>> data = read_memory<span class="Delimiter">(</span>canonized_in<span class="Delimiter">);</span> +<span id="L282" class="LineNr">282 </span> out<span class="Delimiter">.</span>insert<span class="Delimiter">(</span>out<span class="Delimiter">.</span><a href='003trace.cc.html#L197'>end</a><span class="Delimiter">(),</span> data<span class="Delimiter">.</span>begin<span class="Delimiter">(),</span> data<span class="Delimiter">.</span><a href='003trace.cc.html#L197'>end</a><span class="Delimiter">());</span> +<span id="L283" class="LineNr">283 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>!contains_key<span class="Delimiter">(</span>Container_metadata<span class="Delimiter">,</span> canonized_in<span class="Delimiter">.</span>type<span class="Delimiter">))</span> <span class="Identifier">return</span><span class="Delimiter">;</span> +<span id="L284" class="LineNr">284 </span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9991</span><span class="Delimiter">,</span> <span class="Constant">"run"</span><span class="Delimiter">)</span> << <span class="Constant">"deep-copy: scanning for addresses in "</span> << <a href='028call_return.cc.html#L158'>to_string</a><span class="Delimiter">(</span>data<span class="Delimiter">)</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> +<span id="L285" class="LineNr">285 </span> <span class="Normal">const</span> container_metadata& metadata = get<span class="Delimiter">(</span>Container_metadata<span class="Delimiter">,</span> canonized_in<span class="Delimiter">.</span>type<span class="Delimiter">);</span> +<span id="L286" class="LineNr">286 </span> <span class="Normal">for</span> <span class="Delimiter">(</span>map<set<tag_condition_info><span class="Delimiter">,</span> set<address_element_info> >::const_iterator p = metadata<span class="Delimiter">.</span><a href='043space.cc.html#L76'>address</a><span class="Delimiter">.</span>begin<span class="Delimiter">();</span> p != metadata<span class="Delimiter">.</span><a href='043space.cc.html#L76'>address</a><span class="Delimiter">.</span><a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> ++p<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L287" class="LineNr">287 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>!all_match<span class="Delimiter">(</span>data<span class="Delimiter">,</span> p<span class="Delimiter">-></span>first<span class="Delimiter">))</span> <span class="Identifier">continue</span><span class="Delimiter">;</span> +<span id="L288" class="LineNr">288 </span> <span class="Conceal">¦</span> <span class="Normal">for</span> <span class="Delimiter">(</span>set<address_element_info>::const_iterator info = p<span class="Delimiter">-></span>second<span class="Delimiter">.</span>begin<span class="Delimiter">();</span> info != p<span class="Delimiter">-></span>second<span class="Delimiter">.</span><a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> ++info<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L289" class="LineNr">289 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// hack: skip primitive containers that do their own locking; they're designed to be shared between routines</span> +<span id="L290" class="LineNr">290 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>!info<span class="Delimiter">-></span><a href='030container.cc.html#L238'>payload_type</a><span class="Delimiter">-></span>atom && info<span class="Delimiter">-></span><a href='030container.cc.html#L238'>payload_type</a><span class="Delimiter">-></span>left<span class="Delimiter">-></span>name == <span class="Constant">"channel"</span><span class="Delimiter">)</span> +<span id="L291" class="LineNr">291 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Identifier">continue</span><span class="Delimiter">;</span> +<span id="L292" class="LineNr">292 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>info<span class="Delimiter">-></span><a href='030container.cc.html#L238'>payload_type</a><span class="Delimiter">-></span>atom && info<span class="Delimiter">-></span><a href='030container.cc.html#L238'>payload_type</a><span class="Delimiter">-></span>name == <span class="Constant">"resources"</span><span class="Delimiter">)</span> +<span id="L293" class="LineNr">293 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Identifier">continue</span><span class="Delimiter">;</span> +<span id="L294" class="LineNr">294 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// construct a fake reagent that reads directly from the appropriate</span> +<span id="L295" class="LineNr">295 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// field of the container</span> +<span id="L296" class="LineNr">296 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> reagent curr<span class="Delimiter">;</span> +<span id="L297" class="LineNr">297 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>info<span class="Delimiter">-></span><a href='030container.cc.html#L238'>payload_type</a><span class="Delimiter">-></span>atom<span class="Delimiter">)</span> +<span id="L298" class="LineNr">298 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> curr<span class="Delimiter">.</span>type = <span class="Normal">new</span> type_tree<span class="Delimiter">(</span><span class="Normal">new</span> type_tree<span class="Delimiter">(</span><span class="Constant">"address"</span><span class="Delimiter">),</span> <span class="Normal">new</span> type_tree<span class="Delimiter">(</span><span class="Normal">new</span> type_tree<span class="Delimiter">(</span>info<span class="Delimiter">-></span><a href='030container.cc.html#L238'>payload_type</a><span class="Delimiter">-></span>name<span class="Delimiter">),</span> <span class="Constant">NULL</span><span class="Delimiter">));</span> +<span id="L299" class="LineNr">299 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">else</span> +<span id="L300" class="LineNr">300 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> curr<span class="Delimiter">.</span>type = <span class="Normal">new</span> type_tree<span class="Delimiter">(</span><span class="Normal">new</span> type_tree<span class="Delimiter">(</span><span class="Constant">"address"</span><span class="Delimiter">),</span> <span class="Normal">new</span> type_tree<span class="Delimiter">(</span>*info<span class="Delimiter">-></span><a href='030container.cc.html#L238'>payload_type</a><span class="Delimiter">));</span> +<span id="L301" class="LineNr">301 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> curr<span class="Delimiter">.</span><a href='010vm.cc.html#L65'>set_value</a><span class="Delimiter">(</span>canonized_in<span class="Delimiter">.</span>value + info<span class="Delimiter">-></span>offset<span class="Delimiter">);</span> +<span id="L302" class="LineNr">302 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> curr<span class="Delimiter">.</span>properties<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span>pair<string<span class="Delimiter">,</span> string_tree*><span class="Delimiter">(</span><span class="Constant">"raw"</span><span class="Delimiter">,</span> <span class="Constant">NULL</span><span class="Delimiter">));</span> +<span id="L303" class="LineNr">303 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9991</span><span class="Delimiter">,</span> <span class="Constant">"run"</span><span class="Delimiter">)</span> << <span class="Constant">"deep-copy: copying <a href='043space.cc.html#L76'>address</a> "</span> << curr<span class="Delimiter">.</span>value << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> +<span id="L304" class="LineNr">304 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> out<span class="Delimiter">.</span>at<span class="Delimiter">(</span>info<span class="Delimiter">-></span>offset<span class="Delimiter">)</span> = <a href='071deep_copy.cc.html#L249'>deep_copy_address</a><span class="Delimiter">(</span>curr<span class="Delimiter">,</span> addresses_copied<span class="Delimiter">,</span> tmp<span class="Delimiter">);</span> +<span id="L305" class="LineNr">305 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span> +<span id="L306" class="LineNr">306 </span> <span class="Delimiter">}</span> +<span id="L307" class="LineNr">307 </span><span class="Delimiter">}</span> +<span id="L308" class="LineNr">308 </span> +<span id="L309" class="LineNr">309 </span><span class="Normal">int</span> <a href='071deep_copy.cc.html#L309'>payload_address</a><span class="Delimiter">(</span>reagent<span class="Comment">/*</span><span class="Comment">copy</span><span class="Comment">*/</span> x<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L310" class="LineNr">310 </span> x<span class="Delimiter">.</span>properties<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span>pair<string<span class="Delimiter">,</span> string_tree*><span class="Delimiter">(</span><span class="Constant">"lookup"</span><span class="Delimiter">,</span> <span class="Constant">NULL</span><span class="Delimiter">));</span> +<span id="L311" class="LineNr">311 </span> canonize<span class="Delimiter">(</span>x<span class="Delimiter">);</span> +<span id="L312" class="LineNr">312 </span> <span class="Identifier">return</span> x<span class="Delimiter">.</span>value<span class="Delimiter">;</span> +<span id="L313" class="LineNr">313 </span><span class="Delimiter">}</span> +<span id="L314" class="LineNr">314 </span> +<span id="L315" class="LineNr">315 </span><span class="Delimiter">:(scenario deep_copy_stress_test_1)</span> +<span id="L316" class="LineNr">316 </span><span class="muData">container</span> foo1 [ +<span id="L317" class="LineNr">317 </span> <span class="Normal">p</span>:&:num +<span id="L318" class="LineNr">318 </span>] +<span id="L319" class="LineNr">319 </span><span class="muData">container</span> foo2 [ +<span id="L320" class="LineNr">320 </span> <span class="Normal">p</span>:&:foo1 +<span id="L321" class="LineNr">321 </span>] +<span id="L322" class="LineNr">322 </span><span class="muData">exclusive-container</span> foo3 [ +<span id="L323" class="LineNr">323 </span> <span class="Normal">p</span>:&:foo1 +<span id="L324" class="LineNr">324 </span> <span class="Normal">q</span>:&:foo2 +<span id="L325" class="LineNr">325 </span>] +<span id="L326" class="LineNr">326 </span><span class="muRecipe">def</span> <a href='000organization.cc.html#L113'>main</a> [ +<span id="L327" class="LineNr">327 </span> local-scope +<span id="L328" class="LineNr">328 </span> <span class="Normal">x</span>:&:num<span class="Special"> <- </span><span class="Normal">new</span> <span class="Constant">number:type</span> +<span id="L329" class="LineNr">329 </span> *x<span class="Special"> <- </span>copy <span class="Constant">34</span> +<span id="L330" class="LineNr">330 </span> <span class="Normal">a</span>:&:foo1<span class="Special"> <- </span><span class="Normal">new</span> <span class="Constant">foo1:type</span> +<span id="L331" class="LineNr">331 </span> *a<span class="Special"> <- </span>merge x +<span id="L332" class="LineNr">332 </span> <span class="Normal">b</span>:&:foo2<span class="Special"> <- </span><span class="Normal">new</span> <span class="Constant">foo2:type</span> +<span id="L333" class="LineNr">333 </span> *b<span class="Special"> <- </span>merge a +<span id="L334" class="LineNr">334 </span> <span class="Normal">c</span>:foo3<span class="Special"> <- </span>merge <span class="Constant">1</span>/q<span class="Delimiter">,</span> b +<span id="L335" class="LineNr">335 </span> <span class="Normal">d</span>:foo3<span class="Special"> <- </span>deep-copy c +<span id="L336" class="LineNr">336 </span> <span class="Normal">e</span>:&:foo2<span class="Delimiter">,</span> z:<span class="Normal">bool</span><span class="Special"> <- </span>maybe-convert d<span class="Delimiter">,</span> <span class="Constant">q:variant</span> +<span id="L337" class="LineNr">337 </span> <span class="Normal">f</span>:&:foo1<span class="Special"> <- </span>get *e<span class="Delimiter">,</span> <span class="Constant">p:offset</span> +<span id="L338" class="LineNr">338 </span> <span class="Normal">g</span>:&:num<span class="Special"> <- </span>get *f<span class="Delimiter">,</span> <span class="Constant">p:offset</span> +<span id="L339" class="LineNr">339 </span> <span class="Constant">1</span>:num/<span class="Special">raw <- </span>copy *g <span id="L340" class="LineNr">340 </span>] -<span id="L341" class="LineNr">341 </span><span class="muData">exclusive-container</span> foo3 [ -<span id="L342" class="LineNr">342 </span> <span class="Normal">p</span>:&:foo1 -<span id="L343" class="LineNr">343 </span> <span class="Normal">q</span>:&:foo2 -<span id="L344" class="LineNr">344 </span>] -<span id="L345" class="LineNr">345 </span><span class="muData">container</span> foo4 [ -<span id="L346" class="LineNr">346 </span> <span class="Normal">p</span>:num -<span id="L347" class="LineNr">347 </span> <span class="Normal">q</span>:&:foo3 -<span id="L348" class="LineNr">348 </span>] -<span id="L349" class="LineNr">349 </span><span class="muRecipe">def</span> <a href='000organization.cc.html#L113'>main</a> [ -<span id="L350" class="LineNr">350 </span> local-scope -<span id="L351" class="LineNr">351 </span> <span class="Normal">x</span>:&:num<span class="Special"> <- </span><span class="Normal">new</span> <span class="Constant">number:type</span> -<span id="L352" class="LineNr">352 </span> *x<span class="Special"> <- </span>copy <span class="Constant">34</span> -<span id="L353" class="LineNr">353 </span> <span class="Normal">a</span>:&:foo1<span class="Special"> <- </span><span class="Normal">new</span> <span class="Constant">foo1:type</span> -<span id="L354" class="LineNr">354 </span> *a<span class="Special"> <- </span>merge x -<span id="L355" class="LineNr">355 </span> <span class="Normal">b</span>:&:foo2<span class="Special"> <- </span><span class="Normal">new</span> <span class="Constant">foo2:type</span> -<span id="L356" class="LineNr">356 </span> *b<span class="Special"> <- </span>merge a -<span id="L357" class="LineNr">357 </span> <span class="Normal">c</span>:&:foo3<span class="Special"> <- </span><span class="Normal">new</span> <span class="Constant">foo3:type</span> -<span id="L358" class="LineNr">358 </span> *c<span class="Special"> <- </span>merge <span class="Constant">1</span>/q<span class="Delimiter">,</span> b -<span id="L359" class="LineNr">359 </span> <span class="Normal">d</span>:foo4<span class="Special"> <- </span>merge <span class="Constant">35</span><span class="Delimiter">,</span> c -<span id="L360" class="LineNr">360 </span> <span class="Normal">e</span>:foo4<span class="Special"> <- </span>deep-copy d -<span id="L361" class="LineNr">361 </span> <span class="Normal">f</span>:&:foo3<span class="Special"> <- </span>get e<span class="Delimiter">,</span> <span class="Constant">q:offset</span> -<span id="L362" class="LineNr">362 </span> <span class="Normal">g</span>:&:foo2<span class="Delimiter">,</span> z:<span class="Normal">bool</span><span class="Special"> <- </span>maybe-convert *f<span class="Delimiter">,</span> <span class="Constant">q:variant</span> -<span id="L363" class="LineNr">363 </span> <span class="Normal">h</span>:&:foo1<span class="Special"> <- </span>get *g<span class="Delimiter">,</span> <span class="Constant">p:offset</span> -<span id="L364" class="LineNr">364 </span> <span class="Normal">y</span>:&:num<span class="Special"> <- </span>get *h<span class="Delimiter">,</span> <span class="Constant">p:offset</span> -<span id="L365" class="LineNr">365 </span> <span class="Constant">1</span>:num/<span class="Special">raw <- </span>copy *y -<span id="L366" class="LineNr">366 </span>] -<span id="L367" class="LineNr">367 </span><span class="traceContains">+mem: storing 34 in location 1</span> -<span id="L368" class="LineNr">368 </span> -<span id="L369" class="LineNr">369 </span><span class="Delimiter">:(scenario deep_copy_cycles)</span> -<span id="L370" class="LineNr">370 </span><span class="muData">container</span> foo [ -<span id="L371" class="LineNr">371 </span> <span class="Normal">p</span>:num -<span id="L372" class="LineNr">372 </span> <span class="Normal">q</span>:&:foo -<span id="L373" class="LineNr">373 </span>] -<span id="L374" class="LineNr">374 </span><span class="muRecipe">def</span> <a href='000organization.cc.html#L113'>main</a> [ -<span id="L375" class="LineNr">375 </span> local-scope -<span id="L376" class="LineNr">376 </span> <span class="Normal">x</span>:&:foo<span class="Special"> <- </span><span class="Normal">new</span> <span class="Constant">foo:type</span> -<span id="L377" class="LineNr">377 </span> *x<span class="Special"> <- </span><a href='001help.cc.html#L221'>put</a> *x<span class="Delimiter">,</span> <span class="Constant">p:offset</span><span class="Delimiter">,</span> <span class="Constant">34</span> -<span id="L378" class="LineNr">378 </span> *x<span class="Special"> <- </span><a href='001help.cc.html#L221'>put</a> *x<span class="Delimiter">,</span> <span class="Constant">q:offset</span><span class="Delimiter">,</span> x <span class="Comment"># create a cycle</span> -<span id="L379" class="LineNr">379 </span> <span class="Normal">y</span>:&:foo<span class="Special"> <- </span>deep-copy x -<span id="L380" class="LineNr">380 </span> <span class="Constant">1</span>:num/<span class="Special">raw <- </span>get *y<span class="Delimiter">,</span> <span class="Constant">p:offset</span> -<span id="L381" class="LineNr">381 </span> <span class="Normal">y2</span>:&:foo<span class="Special"> <- </span>get *y<span class="Delimiter">,</span> <span class="Constant">q:offset</span> -<span id="L382" class="LineNr">382 </span> stash y [vs] y2 -<span id="L383" class="LineNr">383 </span> <span class="Constant">2</span>:<span class="Normal">bool</span>/<span class="Special">raw <- </span>equal y<span class="Delimiter">,</span> y2 <span class="Comment"># is it still a cycle?</span> -<span id="L384" class="LineNr">384 </span> <span class="Constant">3</span>:<span class="Normal">bool</span>/<span class="Special">raw <- </span>equal x<span class="Delimiter">,</span> y <span class="Comment"># is it the same cycle?</span> -<span id="L385" class="LineNr">385 </span>] -<span id="L386" class="LineNr">386 </span><span class="traceContains">+mem: storing 34 in location 1</span> -<span id="L387" class="LineNr">387 </span><span class="Comment"># deep copy also contains a cycle</span> -<span id="L388" class="LineNr">388 </span><span class="traceContains">+mem: storing 1 in location 2</span> -<span id="L389" class="LineNr">389 </span><span class="Comment"># but it's a completely different (disjoint) cycle</span> -<span id="L390" class="LineNr">390 </span><span class="traceContains">+mem: storing 0 in location 3</span> +<span id="L341" class="LineNr">341 </span><span class="traceContains">+mem: storing 34 in location 1</span> +<span id="L342" class="LineNr">342 </span> +<span id="L343" class="LineNr">343 </span><span class="Delimiter">:(scenario deep_copy_stress_test_2)</span> +<span id="L344" class="LineNr">344 </span><span class="muData">container</span> foo1 [ +<span id="L345" class="LineNr">345 </span> <span class="Normal">p</span>:&:num +<span id="L346" class="LineNr">346 </span>] +<span id="L347" class="LineNr">347 </span><span class="muData">container</span> foo2 [ +<span id="L348" class="LineNr">348 </span> <span class="Normal">p</span>:&:foo1 +<span id="L349" class="LineNr">349 </span>] +<span id="L350" class="LineNr">350 </span><span class="muData">exclusive-container</span> foo3 [ +<span id="L351" class="LineNr">351 </span> <span class="Normal">p</span>:&:foo1 +<span id="L352" class="LineNr">352 </span> <span class="Normal">q</span>:&:foo2 +<span id="L353" class="LineNr">353 </span>] +<span id="L354" class="LineNr">354 </span><span class="muData">container</span> foo4 [ +<span id="L355" class="LineNr">355 </span> <span class="Normal">p</span>:num +<span id="L356" class="LineNr">356 </span> <span class="Normal">q</span>:&:foo3 +<span id="L357" class="LineNr">357 </span>] +<span id="L358" class="LineNr">358 </span><span class="muRecipe">def</span> <a href='000organization.cc.html#L113'>main</a> [ +<span id="L359" class="LineNr">359 </span> local-scope +<span id="L360" class="LineNr">360 </span> <span class="Normal">x</span>:&:num<span class="Special"> <- </span><span class="Normal">new</span> <span class="Constant">number:type</span> +<span id="L361" class="LineNr">361 </span> *x<span class="Special"> <- </span>copy <span class="Constant">34</span> +<span id="L362" class="LineNr">362 </span> <span class="Normal">a</span>:&:foo1<span class="Special"> <- </span><span class="Normal">new</span> <span class="Constant">foo1:type</span> +<span id="L363" class="LineNr">363 </span> *a<span class="Special"> <- </span>merge x +<span id="L364" class="LineNr">364 </span> <span class="Normal">b</span>:&:foo2<span class="Special"> <- </span><span class="Normal">new</span> <span class="Constant">foo2:type</span> +<span id="L365" class="LineNr">365 </span> *b<span class="Special"> <- </span>merge a +<span id="L366" class="LineNr">366 </span> <span class="Normal">c</span>:&:foo3<span class="Special"> <- </span><span class="Normal">new</span> <span class="Constant">foo3:type</span> +<span id="L367" class="LineNr">367 </span> *c<span class="Special"> <- </span>merge <span class="Constant">1</span>/q<span class="Delimiter">,</span> b +<span id="L368" class="LineNr">368 </span> <span class="Normal">d</span>:foo4<span class="Special"> <- </span>merge <span class="Constant">35</span><span class="Delimiter">,</span> c +<span id="L369" class="LineNr">369 </span> <span class="Normal">e</span>:foo4<span class="Special"> <- </span>deep-copy d +<span id="L370" class="LineNr">370 </span> <span class="Normal">f</span>:&:foo3<span class="Special"> <- </span>get e<span class="Delimiter">,</span> <span class="Constant">q:offset</span> +<span id="L371" class="LineNr">371 </span> <span class="Normal">g</span>:&:foo2<span class="Delimiter">,</span> z:<span class="Normal">bool</span><span class="Special"> <- </span>maybe-convert *f<span class="Delimiter">,</span> <span class="Constant">q:variant</span> +<span id="L372" class="LineNr">372 </span> <span class="Normal">h</span>:&:foo1<span class="Special"> <- </span>get *g<span class="Delimiter">,</span> <span class="Constant">p:offset</span> +<span id="L373" class="LineNr">373 </span> <span class="Normal">y</span>:&:num<span class="Special"> <- </span>get *h<span class="Delimiter">,</span> <span class="Constant">p:offset</span> +<span id="L374" class="LineNr">374 </span> <span class="Constant">1</span>:num/<span class="Special">raw <- </span>copy *y +<span id="L375" class="LineNr">375 </span>] +<span id="L376" class="LineNr">376 </span><span class="traceContains">+mem: storing 34 in location 1</span> +<span id="L377" class="LineNr">377 </span> +<span id="L378" class="LineNr">378 </span><span class="Delimiter">:(scenario deep_copy_cycles)</span> +<span id="L379" class="LineNr">379 </span><span class="muData">container</span> foo [ +<span id="L380" class="LineNr">380 </span> <span class="Normal">p</span>:num +<span id="L381" class="LineNr">381 </span> <span class="Normal">q</span>:&:foo +<span id="L382" class="LineNr">382 </span>] +<span id="L383" class="LineNr">383 </span><span class="muRecipe">def</span> <a href='000organization.cc.html#L113'>main</a> [ +<span id="L384" class="LineNr">384 </span> local-scope +<span id="L385" class="LineNr">385 </span> <span class="Normal">x</span>:&:foo<span class="Special"> <- </span><span class="Normal">new</span> <span class="Constant">foo:type</span> +<span id="L386" class="LineNr">386 </span> *x<span class="Special"> <- </span><a href='001help.cc.html#L221'>put</a> *x<span class="Delimiter">,</span> <span class="Constant">p:offset</span><span class="Delimiter">,</span> <span class="Constant">34</span> +<span id="L387" class="LineNr">387 </span> *x<span class="Special"> <- </span><a href='001help.cc.html#L221'>put</a> *x<span class="Delimiter">,</span> <span class="Constant">q:offset</span><span class="Delimiter">,</span> x <span class="Comment"># create a cycle</span> +<span id="L388" class="LineNr">388 </span> <span class="Normal">y</span>:&:foo<span class="Special"> <- </span>deep-copy x +<span id="L389" class="LineNr">389 </span> <span class="Constant">1</span>:num/<span class="Special">raw <- </span>get *y<span class="Delimiter">,</span> <span class="Constant">p:offset</span> +<span id="L390" class="LineNr">390 </span> <span class="Normal">y2</span>:&:foo<span class="Special"> <- </span>get *y<span class="Delimiter">,</span> <span class="Constant">q:offset</span> +<span id="L391" class="LineNr">391 </span> stash y [vs] y2 +<span id="L392" class="LineNr">392 </span> <span class="Constant">2</span>:<span class="Normal">bool</span>/<span class="Special">raw <- </span>equal y<span class="Delimiter">,</span> y2 <span class="Comment"># is it still a cycle?</span> +<span id="L393" class="LineNr">393 </span> <span class="Constant">3</span>:<span class="Normal">bool</span>/<span class="Special">raw <- </span>equal x<span class="Delimiter">,</span> y <span class="Comment"># is it the same cycle?</span> +<span id="L394" class="LineNr">394 </span>] +<span id="L395" class="LineNr">395 </span><span class="traceContains">+mem: storing 34 in location 1</span> +<span id="L396" class="LineNr">396 </span><span class="Comment"># deep copy also contains a cycle</span> +<span id="L397" class="LineNr">397 </span><span class="traceContains">+mem: storing 1 in location 2</span> +<span id="L398" class="LineNr">398 </span><span class="Comment"># but it's a completely different (disjoint) cycle</span> +<span id="L399" class="LineNr">399 </span><span class="traceContains">+mem: storing 0 in location 3</span> +<span id="L400" class="LineNr">400 </span> +<span id="L401" class="LineNr">401 </span><span class="Delimiter">:(scenario deep_copy_skips_channel)</span> +<span id="L402" class="LineNr">402 </span><span class="Comment"># ugly! dummy 'channel' type if we happen to be building without that layer</span> +<span id="L403" class="LineNr">403 </span><span class="Special">% if (!contains_key(Type_ordinal, "channel")) get_or_insert(Type, put(Type_ordinal, "channel", Next_type_ordinal++)).name = "channel";</span> +<span id="L404" class="LineNr">404 </span><span class="muRecipe">def</span> <a href='000organization.cc.html#L113'>main</a> [ +<span id="L405" class="LineNr">405 </span> local-scope +<span id="L406" class="LineNr">406 </span> <span class="Normal">x</span>:&:channel:num<span class="Special"> <- </span><span class="Normal">new</span> <span class="Delimiter">{(</span>channel num<span class="Delimiter">)</span>: type<span class="Delimiter">}</span> +<span id="L407" class="LineNr">407 </span> <span class="Normal">y</span>:&:channel:num<span class="Special"> <- </span>deep-copy x +<span id="L408" class="LineNr">408 </span> <span class="Constant">10</span>:<span class="Normal">bool</span>/<span class="Special">raw <- </span>equal x<span class="Delimiter">,</span> y +<span id="L409" class="LineNr">409 </span>] +<span id="L410" class="LineNr">410 </span><span class="Comment"># channels are never deep-copied</span> +<span id="L411" class="LineNr">411 </span><span class="traceContains">+mem: storing 1 in location 10</span> +<span id="L412" class="LineNr">412 </span> +<span id="L413" class="LineNr">413 </span><span class="Delimiter">:(scenario deep_copy_skips_nested_channel)</span> +<span id="L414" class="LineNr">414 </span><span class="Comment"># ugly! dummy 'channel' type if we happen to be building without that layer</span> +<span id="L415" class="LineNr">415 </span><span class="Special">% if (!contains_key(Type_ordinal, "channel")) get_or_insert(Type, put(Type_ordinal, "channel", Next_type_ordinal++)).name = "channel";</span> +<span id="L416" class="LineNr">416 </span><span class="muData">container</span> foo [ +<span id="L417" class="LineNr">417 </span> <span class="Normal">c</span>:&:channel:num +<span id="L418" class="LineNr">418 </span>] +<span id="L419" class="LineNr">419 </span><span class="muRecipe">def</span> <a href='000organization.cc.html#L113'>main</a> [ +<span id="L420" class="LineNr">420 </span> local-scope +<span id="L421" class="LineNr">421 </span> <span class="Normal">x</span>:&:foo<span class="Special"> <- </span><span class="Normal">new</span> <span class="Constant">foo:type</span> +<span id="L422" class="LineNr">422 </span> <span class="Normal">y</span>:&:foo<span class="Special"> <- </span>deep-copy x +<span id="L423" class="LineNr">423 </span> <span class="Normal">xc</span>:&:channel:num<span class="Special"> <- </span>get *x<span class="Delimiter">,</span> <span class="Constant">c:offset</span> +<span id="L424" class="LineNr">424 </span> <span class="Normal">yc</span>:&:channel:num<span class="Special"> <- </span>get *y<span class="Delimiter">,</span> <span class="Constant">c:offset</span> +<span id="L425" class="LineNr">425 </span> <span class="Constant">10</span>:<span class="Normal">bool</span>/<span class="Special">raw <- </span>equal xc<span class="Delimiter">,</span> yc +<span id="L426" class="LineNr">426 </span>] +<span id="L427" class="LineNr">427 </span><span class="Comment"># channels are never deep-copied</span> +<span id="L428" class="LineNr">428 </span><span class="traceContains">+mem: storing 1 in location 10</span> +<span id="L429" class="LineNr">429 </span> +<span id="L430" class="LineNr">430 </span><span class="Delimiter">:(scenario deep_copy_skips_resources)</span> +<span id="L431" class="LineNr">431 </span><span class="Comment"># ugly! dummy 'resources' type if we happen to be building without that layer</span> +<span id="L432" class="LineNr">432 </span><span class="Special">% if (!contains_key(Type_ordinal, "resources")) get_or_insert(Type, put(Type_ordinal, "resources", Next_type_ordinal++)).name = "resources";</span> +<span id="L433" class="LineNr">433 </span><span class="muRecipe">def</span> <a href='000organization.cc.html#L113'>main</a> [ +<span id="L434" class="LineNr">434 </span> local-scope +<span id="L435" class="LineNr">435 </span> <span class="Normal">x</span>:&:resources<span class="Special"> <- </span><span class="Normal">new</span> <span class="Constant">resources:type</span> +<span id="L436" class="LineNr">436 </span> <span class="Normal">y</span>:&:resources<span class="Special"> <- </span>deep-copy x +<span id="L437" class="LineNr">437 </span> <span class="Constant">10</span>:<span class="Normal">bool</span>/<span class="Special">raw <- </span>equal x<span class="Delimiter">,</span> y +<span id="L438" class="LineNr">438 </span>] +<span id="L439" class="LineNr">439 </span><span class="Comment"># resources are never deep-copied</span> +<span id="L440" class="LineNr">440 </span><span class="traceContains">+mem: storing 1 in location 10</span> +<span id="L441" class="LineNr">441 </span> +<span id="L442" class="LineNr">442 </span><span class="Delimiter">:(scenario deep_copy_skips_nested_resources)</span> +<span id="L443" class="LineNr">443 </span><span class="Comment"># ugly! dummy 'resources' type if we happen to be building without that layer</span> +<span id="L444" class="LineNr">444 </span><span class="Special">% if (!contains_key(Type_ordinal, "resources")) get_or_insert(Type, put(Type_ordinal, "resources", Next_type_ordinal++)).name = "resources";</span> +<span id="L445" class="LineNr">445 </span><span class="muData">container</span> foo [ +<span id="L446" class="LineNr">446 </span> <span class="Normal">c</span>:&:resources +<span id="L447" class="LineNr">447 </span>] +<span id="L448" class="LineNr">448 </span><span class="muRecipe">def</span> <a href='000organization.cc.html#L113'>main</a> [ +<span id="L449" class="LineNr">449 </span> local-scope +<span id="L450" class="LineNr">450 </span> <span class="Normal">x</span>:&:foo<span class="Special"> <- </span><span class="Normal">new</span> <span class="Constant">foo:type</span> +<span id="L451" class="LineNr">451 </span> <span class="Normal">y</span>:&:foo<span class="Special"> <- </span>deep-copy x +<span id="L452" class="LineNr">452 </span> <span class="Normal">xc</span>:&:resources<span class="Special"> <- </span>get *x<span class="Delimiter">,</span> <span class="Constant">c:offset</span> +<span id="L453" class="LineNr">453 </span> <span class="Normal">yc</span>:&:resources<span class="Special"> <- </span>get *y<span class="Delimiter">,</span> <span class="Constant">c:offset</span> +<span id="L454" class="LineNr">454 </span> <span class="Constant">10</span>:<span class="Normal">bool</span>/<span class="Special">raw <- </span>equal xc<span class="Delimiter">,</span> yc +<span id="L455" class="LineNr">455 </span>] +<span id="L456" class="LineNr">456 </span><span class="Comment"># resources are never deep-copied</span> +<span id="L457" class="LineNr">457 </span><span class="traceContains">+mem: storing 1 in location 10</span> </pre> </body> </html> diff --git a/html/071recipe.cc.html b/html/072recipe.cc.html index fd82590d..9b03b055 100644 --- a/html/071recipe.cc.html +++ b/html/072recipe.cc.html @@ -2,7 +2,7 @@ <html> <head> <meta http-equiv="content-type" content="text/html; charset=UTF-8"> -<title>Mu - 071recipe.cc</title> +<title>Mu - 072recipe.cc</title> <meta name="Generator" content="Vim/7.4"> <meta name="plugin-version" content="vim7.4_v2"> <meta name="syntax" content="cpp"> @@ -98,40 +98,40 @@ if ('onhashchange' in window) { <span id="L34" class="LineNr"> 34 </span><a href='001help.cc.html#L228'>get_or_insert</a><span class="Delimiter">(</span>Type<span class="Delimiter">,</span> <a href='010vm.cc.html#L19'>recipe</a><span class="Delimiter">).</span>name = <span class="Constant">"recipe"</span><span class="Delimiter">;</span> <span id="L35" class="LineNr"> 35 </span> <span id="L36" class="LineNr"> 36 </span><span class="Delimiter">:(after "Begin <a href='042name.cc.html#L37'>transform_names</a> Ingredient Special-cases(ingredient, inst, caller)")</span> -<span id="L37" class="LineNr"> 37 </span><span class="Normal">if</span> <span class="Delimiter">(</span><a href='071recipe.cc.html#L47'>is_recipe_literal</a><span class="Delimiter">(</span>ingredient<span class="Delimiter">,</span> caller<span class="Delimiter">))</span> <span class="Delimiter">{</span> -<span id="L38" class="LineNr"> 38 </span> <a href='071recipe.cc.html#L56'>initialize_recipe_literal</a><span class="Delimiter">(</span>ingredient<span class="Delimiter">);</span> +<span id="L37" class="LineNr"> 37 </span><span class="Normal">if</span> <span class="Delimiter">(</span><a href='072recipe.cc.html#L47'>is_recipe_literal</a><span class="Delimiter">(</span>ingredient<span class="Delimiter">,</span> caller<span class="Delimiter">))</span> <span class="Delimiter">{</span> +<span id="L38" class="LineNr"> 38 </span> <a href='072recipe.cc.html#L56'>initialize_recipe_literal</a><span class="Delimiter">(</span>ingredient<span class="Delimiter">);</span> <span id="L39" class="LineNr"> 39 </span> <span class="Identifier">continue</span><span class="Delimiter">;</span> <span id="L40" class="LineNr"> 40 </span><span class="Delimiter">}</span> <span id="L41" class="LineNr"> 41 </span><span class="Delimiter">:(after "Begin <a href='042name.cc.html#L37'>transform_names</a> Product Special-cases(product, inst, caller)")</span> -<span id="L42" class="LineNr"> 42 </span><span class="Normal">if</span> <span class="Delimiter">(</span><a href='071recipe.cc.html#L47'>is_recipe_literal</a><span class="Delimiter">(</span>product<span class="Delimiter">,</span> caller<span class="Delimiter">))</span> <span class="Delimiter">{</span> -<span id="L43" class="LineNr"> 43 </span> <a href='071recipe.cc.html#L56'>initialize_recipe_literal</a><span class="Delimiter">(</span>product<span class="Delimiter">);</span> +<span id="L42" class="LineNr"> 42 </span><span class="Normal">if</span> <span class="Delimiter">(</span><a href='072recipe.cc.html#L47'>is_recipe_literal</a><span class="Delimiter">(</span>product<span class="Delimiter">,</span> caller<span class="Delimiter">))</span> <span class="Delimiter">{</span> +<span id="L43" class="LineNr"> 43 </span> <a href='072recipe.cc.html#L56'>initialize_recipe_literal</a><span class="Delimiter">(</span>product<span class="Delimiter">);</span> <span id="L44" class="LineNr"> 44 </span> <span class="Identifier">continue</span><span class="Delimiter">;</span> <span id="L45" class="LineNr"> 45 </span><span class="Delimiter">}</span> <span id="L46" class="LineNr"> 46 </span><span class="Delimiter">:(code)</span> -<span id="L47" class="LineNr"> 47 </span><span class="Normal">bool</span> <a href='071recipe.cc.html#L47'>is_recipe_literal</a><span class="Delimiter">(</span><span class="Normal">const</span> reagent& x<span class="Delimiter">,</span> <span class="Normal">const</span> recipe& caller<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L47" class="LineNr"> 47 </span><span class="Normal">bool</span> <a href='072recipe.cc.html#L47'>is_recipe_literal</a><span class="Delimiter">(</span><span class="Normal">const</span> reagent& x<span class="Delimiter">,</span> <span class="Normal">const</span> recipe& caller<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L48" class="LineNr"> 48 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>x<span class="Delimiter">.</span>type<span class="Delimiter">)</span> <span class="Identifier">return</span> <span class="Constant">false</span><span class="Delimiter">;</span> <span id="L49" class="LineNr"> 49 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>!contains_key<span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> x<span class="Delimiter">.</span>name<span class="Delimiter">))</span> <span class="Identifier">return</span> <span class="Constant">false</span><span class="Delimiter">;</span> -<span id="L50" class="LineNr"> 50 </span> <span class="Normal">if</span> <span class="Delimiter">(</span><a href='071recipe.cc.html#L60'>contains_reagent_with_type</a><span class="Delimiter">(</span>caller<span class="Delimiter">,</span> x<span class="Delimiter">.</span>name<span class="Delimiter">))</span> <span class="Delimiter">{</span> +<span id="L50" class="LineNr"> 50 </span> <span class="Normal">if</span> <span class="Delimiter">(</span><a href='072recipe.cc.html#L60'>contains_reagent_with_type</a><span class="Delimiter">(</span>caller<span class="Delimiter">,</span> x<span class="Delimiter">.</span>name<span class="Delimiter">))</span> <span class="Delimiter">{</span> <span id="L51" class="LineNr"> 51 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L168'>raise</a> << <a href='013update_operation.cc.html#L25'>maybe</a><span class="Delimiter">(</span>caller<span class="Delimiter">.</span>name<span class="Delimiter">)</span> << <span class="Constant">"you can't use '"</span> << x<span class="Delimiter">.</span>name << <span class="Constant">"' as a recipe literal when it's also a variable</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> <span id="L52" class="LineNr"> 52 </span> <span class="Conceal">¦</span> <span class="Identifier">return</span> <span class="Constant">false</span><span class="Delimiter">;</span> <span id="L53" class="LineNr"> 53 </span> <span class="Delimiter">}</span> <span id="L54" class="LineNr"> 54 </span> <span class="Identifier">return</span> <span class="Constant">true</span><span class="Delimiter">;</span> <span id="L55" class="LineNr"> 55 </span><span class="Delimiter">}</span> -<span id="L56" class="LineNr"> 56 </span><span class="Normal">void</span> <a href='071recipe.cc.html#L56'>initialize_recipe_literal</a><span class="Delimiter">(</span>reagent& x<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L56" class="LineNr"> 56 </span><span class="Normal">void</span> <a href='072recipe.cc.html#L56'>initialize_recipe_literal</a><span class="Delimiter">(</span>reagent& x<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L57" class="LineNr"> 57 </span> x<span class="Delimiter">.</span>type = <span class="Normal">new</span> type_tree<span class="Delimiter">(</span><span class="Constant">"recipe-literal"</span><span class="Delimiter">);</span> <span id="L58" class="LineNr"> 58 </span> x<span class="Delimiter">.</span><a href='010vm.cc.html#L65'>set_value</a><span class="Delimiter">(</span>get<span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> x<span class="Delimiter">.</span>name<span class="Delimiter">));</span> <span id="L59" class="LineNr"> 59 </span><span class="Delimiter">}</span> -<span id="L60" class="LineNr"> 60 </span><span class="Normal">bool</span> <a href='071recipe.cc.html#L60'>contains_reagent_with_type</a><span class="Delimiter">(</span><span class="Normal">const</span> recipe& caller<span class="Delimiter">,</span> <span class="Normal">const</span> string& name<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L60" class="LineNr"> 60 </span><span class="Normal">bool</span> <a href='072recipe.cc.html#L60'>contains_reagent_with_type</a><span class="Delimiter">(</span><span class="Normal">const</span> recipe& caller<span class="Delimiter">,</span> <span class="Normal">const</span> string& name<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L61" class="LineNr"> 61 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>caller<span class="Delimiter">.</span>steps<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L62" class="LineNr"> 62 </span> <span class="Conceal">¦</span> <span class="Normal">const</span> instruction& inst = caller<span class="Delimiter">.</span>steps<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">);</span> <span id="L63" class="LineNr"> 63 </span> <span class="Conceal">¦</span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> -<span id="L64" class="LineNr"> 64 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span><a href='071recipe.cc.html#L70'>is_matching_non_recipe_literal</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">),</span> name<span class="Delimiter">))</span> <span class="Identifier">return</span> <span class="Constant">true</span><span class="Delimiter">;</span> +<span id="L64" class="LineNr"> 64 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span><a href='072recipe.cc.html#L70'>is_matching_non_recipe_literal</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">),</span> name<span class="Delimiter">))</span> <span class="Identifier">return</span> <span class="Constant">true</span><span class="Delimiter">;</span> <span id="L65" class="LineNr"> 65 </span> <span class="Conceal">¦</span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span>products<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> -<span id="L66" class="LineNr"> 66 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span><a href='071recipe.cc.html#L70'>is_matching_non_recipe_literal</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span>products<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">),</span> name<span class="Delimiter">))</span> <span class="Identifier">return</span> <span class="Constant">true</span><span class="Delimiter">;</span> +<span id="L66" class="LineNr"> 66 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span><a href='072recipe.cc.html#L70'>is_matching_non_recipe_literal</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span>products<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">),</span> name<span class="Delimiter">))</span> <span class="Identifier">return</span> <span class="Constant">true</span><span class="Delimiter">;</span> <span id="L67" class="LineNr"> 67 </span> <span class="Delimiter">}</span> <span id="L68" class="LineNr"> 68 </span> <span class="Identifier">return</span> <span class="Constant">false</span><span class="Delimiter">;</span> <span id="L69" class="LineNr"> 69 </span><span class="Delimiter">}</span> -<span id="L70" class="LineNr"> 70 </span><span class="Normal">bool</span> <a href='071recipe.cc.html#L70'>is_matching_non_recipe_literal</a><span class="Delimiter">(</span><span class="Normal">const</span> reagent& x<span class="Delimiter">,</span> <span class="Normal">const</span> string& name<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L70" class="LineNr"> 70 </span><span class="Normal">bool</span> <a href='072recipe.cc.html#L70'>is_matching_non_recipe_literal</a><span class="Delimiter">(</span><span class="Normal">const</span> reagent& x<span class="Delimiter">,</span> <span class="Normal">const</span> string& name<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L71" class="LineNr"> 71 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>x<span class="Delimiter">.</span>name != name<span class="Delimiter">)</span> <span class="Identifier">return</span> <span class="Constant">false</span><span class="Delimiter">;</span> <span id="L72" class="LineNr"> 72 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>!x<span class="Delimiter">.</span>type<span class="Delimiter">)</span> <span class="Identifier">return</span> <span class="Constant">false</span><span class="Delimiter">;</span> <span id="L73" class="LineNr"> 73 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>!x<span class="Delimiter">.</span>type<span class="Delimiter">-></span>atom<span class="Delimiter">)</span> <span class="Identifier">return</span> <span class="Constant">false</span><span class="Delimiter">;</span> @@ -224,9 +224,9 @@ if ('onhashchange' in window) { <span id="L160" class="LineNr">160 </span><span class="traceContains">+error: <a href='000organization.cc.html#L113'>main</a>: product 0 has the wrong type at '2:num <- call {1: (recipe point -> point)}, 34'</span> <span id="L161" class="LineNr">161 </span> <span id="L162" class="LineNr">162 </span><span class="Delimiter">:(after "Transform.push_back(check_instruction)")</span> -<span id="L163" class="LineNr">163 </span>Transform<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span><a href='071recipe.cc.html#L165'>check_indirect_calls_against_header</a><span class="Delimiter">);</span> <span class="Comment">// idempotent</span> +<span id="L163" class="LineNr">163 </span>Transform<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span><a href='072recipe.cc.html#L165'>check_indirect_calls_against_header</a><span class="Delimiter">);</span> <span class="Comment">// idempotent</span> <span id="L164" class="LineNr">164 </span><span class="Delimiter">:(code)</span> -<span id="L165" class="LineNr">165 </span><span class="Normal">void</span> <a href='071recipe.cc.html#L165'>check_indirect_calls_against_header</a><span class="Delimiter">(</span><span class="Normal">const</span> <a href='010vm.cc.html#L14'>recipe_ordinal</a> r<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L165" class="LineNr">165 </span><span class="Normal">void</span> <a href='072recipe.cc.html#L165'>check_indirect_calls_against_header</a><span class="Delimiter">(</span><span class="Normal">const</span> <a href='010vm.cc.html#L14'>recipe_ordinal</a> r<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L166" class="LineNr">166 </span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9991</span><span class="Delimiter">,</span> <span class="Constant">"transform"</span><span class="Delimiter">)</span> << <span class="Constant">"--- type-check 'call' instructions inside <a href='010vm.cc.html#L19'>recipe</a> "</span> << get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">).</span>name << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> <span id="L167" class="LineNr">167 </span> <span class="Normal">const</span> recipe& caller = get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">);</span> <span id="L168" class="LineNr">168 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>caller<span class="Delimiter">.</span>steps<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> @@ -235,15 +235,15 @@ if ('onhashchange' in window) { <span id="L171" class="LineNr">171 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>empty<span class="Delimiter">())</span> <span class="Identifier">continue</span><span class="Delimiter">;</span> <span class="Comment">// error raised above</span> <span id="L172" class="LineNr">172 </span> <span class="Conceal">¦</span> <span class="Normal">const</span> reagent& callee = inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">);</span> <span id="L173" class="LineNr">173 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>!is_mu_recipe<span class="Delimiter">(</span>callee<span class="Delimiter">))</span> <span class="Identifier">continue</span><span class="Delimiter">;</span> <span class="Comment">// error raised above</span> -<span id="L174" class="LineNr">174 </span> <span class="Conceal">¦</span> <span class="Normal">const</span> <a href='010vm.cc.html#L19'>recipe</a> callee_header = is_literal<span class="Delimiter">(</span>callee<span class="Delimiter">)</span> ? get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> callee<span class="Delimiter">.</span>value<span class="Delimiter">)</span> : <a href='071recipe.cc.html#L207'>from_reagent</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">));</span> +<span id="L174" class="LineNr">174 </span> <span class="Conceal">¦</span> <span class="Normal">const</span> <a href='010vm.cc.html#L19'>recipe</a> callee_header = is_literal<span class="Delimiter">(</span>callee<span class="Delimiter">)</span> ? get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> callee<span class="Delimiter">.</span>value<span class="Delimiter">)</span> : <a href='072recipe.cc.html#L207'>from_reagent</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">));</span> <span id="L175" class="LineNr">175 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>!callee_header<span class="Delimiter">.</span>has_header<span class="Delimiter">)</span> <span class="Identifier">continue</span><span class="Delimiter">;</span> -<span id="L176" class="LineNr">176 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span><a href='071recipe.cc.html#L196'>is_indirect_call_with_ingredients</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span>operation<span class="Delimiter">))</span> <span class="Delimiter">{</span> +<span id="L176" class="LineNr">176 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span><a href='072recipe.cc.html#L196'>is_indirect_call_with_ingredients</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span>operation<span class="Delimiter">))</span> <span class="Delimiter">{</span> <span id="L177" class="LineNr">177 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">long</span> <span class="Normal">int</span> i = <span class="Comment">/*</span><span class="Comment">skip callee</span><span class="Comment">*/</span><span class="Constant">1</span><span class="Delimiter">;</span> i < min<span class="Delimiter">(</span><a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">),</span> <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>callee_header<span class="Delimiter">.</span>ingredients<span class="Delimiter">)</span>+<span class="Comment">/*</span><span class="Comment">skip callee</span><span class="Comment">*/</span><span class="Constant">1</span><span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L178" class="LineNr">178 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>!types_coercible<span class="Delimiter">(</span>callee_header<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i-<span class="Comment">/*</span><span class="Comment">skip callee</span><span class="Comment">*/</span><span class="Constant">1</span><span class="Delimiter">),</span> inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)))</span> <span id="L179" class="LineNr">179 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L168'>raise</a> << <a href='013update_operation.cc.html#L25'>maybe</a><span class="Delimiter">(</span>caller<span class="Delimiter">.</span>name<span class="Delimiter">)</span> << <span class="Constant">"ingredient "</span> << i-<span class="Comment">/*</span><span class="Comment">skip callee</span><span class="Comment">*/</span><span class="Constant">1</span> << <span class="Constant">" has the wrong type at '"</span> << to_original_string<span class="Delimiter">(</span>inst<span class="Delimiter">)</span> << <span class="Constant">"'</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> <span id="L180" class="LineNr">180 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Delimiter">}</span> <span id="L181" class="LineNr">181 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span> -<span id="L182" class="LineNr">182 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span><a href='071recipe.cc.html#L201'>is_indirect_call_with_products</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span>operation<span class="Delimiter">))</span> <span class="Delimiter">{</span> +<span id="L182" class="LineNr">182 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span><a href='072recipe.cc.html#L201'>is_indirect_call_with_products</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span>operation<span class="Delimiter">))</span> <span class="Delimiter">{</span> <span id="L183" class="LineNr">183 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">long</span> <span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < min<span class="Delimiter">(</span><a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span>products<span class="Delimiter">),</span> <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>callee_header<span class="Delimiter">.</span>products<span class="Delimiter">));</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L184" class="LineNr">184 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>is_dummy<span class="Delimiter">(</span>inst<span class="Delimiter">.</span>products<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)))</span> <span class="Identifier">continue</span><span class="Delimiter">;</span> <span id="L185" class="LineNr">185 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>!types_coercible<span class="Delimiter">(</span>callee_header<span class="Delimiter">.</span>products<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">),</span> inst<span class="Delimiter">.</span>products<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)))</span> @@ -253,22 +253,22 @@ if ('onhashchange' in window) { <span id="L189" class="LineNr">189 </span> <span class="Delimiter">}</span> <span id="L190" class="LineNr">190 </span><span class="Delimiter">}</span> <span id="L191" class="LineNr">191 </span> -<span id="L192" class="LineNr">192 </span><span class="Normal">bool</span> <a href='071recipe.cc.html#L192'>is_indirect_call</a><span class="Delimiter">(</span><span class="Normal">const</span> <a href='010vm.cc.html#L14'>recipe_ordinal</a> r<span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L193" class="LineNr">193 </span> <span class="Identifier">return</span> <a href='071recipe.cc.html#L196'>is_indirect_call_with_ingredients</a><span class="Delimiter">(</span>r<span class="Delimiter">)</span> || <a href='071recipe.cc.html#L201'>is_indirect_call_with_products</a><span class="Delimiter">(</span>r<span class="Delimiter">);</span> +<span id="L192" class="LineNr">192 </span><span class="Normal">bool</span> <a href='072recipe.cc.html#L192'>is_indirect_call</a><span class="Delimiter">(</span><span class="Normal">const</span> <a href='010vm.cc.html#L14'>recipe_ordinal</a> r<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L193" class="LineNr">193 </span> <span class="Identifier">return</span> <a href='072recipe.cc.html#L196'>is_indirect_call_with_ingredients</a><span class="Delimiter">(</span>r<span class="Delimiter">)</span> || <a href='072recipe.cc.html#L201'>is_indirect_call_with_products</a><span class="Delimiter">(</span>r<span class="Delimiter">);</span> <span id="L194" class="LineNr">194 </span><span class="Delimiter">}</span> <span id="L195" class="LineNr">195 </span> -<span id="L196" class="LineNr">196 </span><span class="Normal">bool</span> <a href='071recipe.cc.html#L196'>is_indirect_call_with_ingredients</a><span class="Delimiter">(</span><span class="Normal">const</span> <a href='010vm.cc.html#L14'>recipe_ordinal</a> r<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L196" class="LineNr">196 </span><span class="Normal">bool</span> <a href='072recipe.cc.html#L196'>is_indirect_call_with_ingredients</a><span class="Delimiter">(</span><span class="Normal">const</span> <a href='010vm.cc.html#L14'>recipe_ordinal</a> r<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L197" class="LineNr">197 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>r == CALL<span class="Delimiter">)</span> <span class="Identifier">return</span> <span class="Constant">true</span><span class="Delimiter">;</span> <span id="L198" class="LineNr">198 </span> <span class="Comment">// End is_indirect_call_with_ingredients Special-cases</span> <span id="L199" class="LineNr">199 </span> <span class="Identifier">return</span> <span class="Constant">false</span><span class="Delimiter">;</span> <span id="L200" class="LineNr">200 </span><span class="Delimiter">}</span> -<span id="L201" class="LineNr">201 </span><span class="Normal">bool</span> <a href='071recipe.cc.html#L201'>is_indirect_call_with_products</a><span class="Delimiter">(</span><span class="Normal">const</span> <a href='010vm.cc.html#L14'>recipe_ordinal</a> r<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L201" class="LineNr">201 </span><span class="Normal">bool</span> <a href='072recipe.cc.html#L201'>is_indirect_call_with_products</a><span class="Delimiter">(</span><span class="Normal">const</span> <a href='010vm.cc.html#L14'>recipe_ordinal</a> r<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L202" class="LineNr">202 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>r == CALL<span class="Delimiter">)</span> <span class="Identifier">return</span> <span class="Constant">true</span><span class="Delimiter">;</span> <span id="L203" class="LineNr">203 </span> <span class="Comment">// End is_indirect_call_with_products Special-cases</span> <span id="L204" class="LineNr">204 </span> <span class="Identifier">return</span> <span class="Constant">false</span><span class="Delimiter">;</span> <span id="L205" class="LineNr">205 </span><span class="Delimiter">}</span> <span id="L206" class="LineNr">206 </span> -<span id="L207" class="LineNr">207 </span><span class="muRecipe"><a href='010vm.cc.html#L19'>recipe</a></span> <a href='071recipe.cc.html#L207'>from_reagent</a><span class="Delimiter">(</span><span class="Normal">const</span> reagent& r<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L207" class="LineNr">207 </span><span class="muRecipe"><a href='010vm.cc.html#L19'>recipe</a></span> <a href='072recipe.cc.html#L207'>from_reagent</a><span class="Delimiter">(</span><span class="Normal">const</span> reagent& r<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L208" class="LineNr">208 </span> assert<span class="Delimiter">(</span>r<span class="Delimiter">.</span>type<span class="Delimiter">);</span> <span id="L209" class="LineNr">209 </span> <a href='010vm.cc.html#L19'>recipe</a> result_header<span class="Delimiter">;</span> <span class="Comment">// will contain only ingredients and products, nothing else</span> <span id="L210" class="LineNr">210 </span> result_header<span class="Delimiter">.</span>has_header = <span class="Constant">true</span><span class="Delimiter">;</span> @@ -286,51 +286,51 @@ if ('onhashchange' in window) { <span id="L222" class="LineNr">222 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> curr = curr<span class="Delimiter">-></span>right<span class="Delimiter">;</span> <span class="Comment">// skip delimiter</span> <span id="L223" class="LineNr">223 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Identifier">goto</span> read_products<span class="Delimiter">;</span> <span id="L224" class="LineNr">224 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span> -<span id="L225" class="LineNr">225 </span> <span class="Conceal">¦</span> result_header<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span><a href='071recipe.cc.html#L269'>next_recipe_reagent</a><span class="Delimiter">(</span>curr<span class="Delimiter">-></span>left<span class="Delimiter">));</span> +<span id="L225" class="LineNr">225 </span> <span class="Conceal">¦</span> result_header<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span><a href='072recipe.cc.html#L269'>next_recipe_reagent</a><span class="Delimiter">(</span>curr<span class="Delimiter">-></span>left<span class="Delimiter">));</span> <span id="L226" class="LineNr">226 </span> <span class="Delimiter">}</span> <span id="L227" class="LineNr">227 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>curr<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L228" class="LineNr">228 </span> <span class="Conceal">¦</span> assert<span class="Delimiter">(</span>curr<span class="Delimiter">-></span>atom<span class="Delimiter">);</span> -<span id="L229" class="LineNr">229 </span> <span class="Conceal">¦</span> result_header<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span><a href='071recipe.cc.html#L269'>next_recipe_reagent</a><span class="Delimiter">(</span>curr<span class="Delimiter">));</span> +<span id="L229" class="LineNr">229 </span> <span class="Conceal">¦</span> result_header<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span><a href='072recipe.cc.html#L269'>next_recipe_reagent</a><span class="Delimiter">(</span>curr<span class="Delimiter">));</span> <span id="L230" class="LineNr">230 </span> <span class="Conceal">¦</span> <span class="Identifier">return</span> result_header<span class="Delimiter">;</span> <span class="Comment">// no products</span> <span id="L231" class="LineNr">231 </span> <span class="Delimiter">}</span> <span id="L232" class="LineNr">232 </span> <span class="Normal">read_products</span>: <span id="L233" class="LineNr">233 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Comment">/*</span><span class="Comment">nada</span><span class="Comment">*/</span><span class="Delimiter">;</span> curr && !curr<span class="Delimiter">-></span>atom<span class="Delimiter">;</span> curr = curr<span class="Delimiter">-></span>right<span class="Delimiter">)</span> -<span id="L234" class="LineNr">234 </span> <span class="Conceal">¦</span> result_header<span class="Delimiter">.</span>products<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span><a href='071recipe.cc.html#L269'>next_recipe_reagent</a><span class="Delimiter">(</span>curr<span class="Delimiter">-></span>left<span class="Delimiter">));</span> +<span id="L234" class="LineNr">234 </span> <span class="Conceal">¦</span> result_header<span class="Delimiter">.</span>products<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span><a href='072recipe.cc.html#L269'>next_recipe_reagent</a><span class="Delimiter">(</span>curr<span class="Delimiter">-></span>left<span class="Delimiter">));</span> <span id="L235" class="LineNr">235 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>curr<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L236" class="LineNr">236 </span> <span class="Conceal">¦</span> assert<span class="Delimiter">(</span>curr<span class="Delimiter">-></span>atom<span class="Delimiter">);</span> -<span id="L237" class="LineNr">237 </span> <span class="Conceal">¦</span> result_header<span class="Delimiter">.</span>products<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span><a href='071recipe.cc.html#L269'>next_recipe_reagent</a><span class="Delimiter">(</span>curr<span class="Delimiter">));</span> +<span id="L237" class="LineNr">237 </span> <span class="Conceal">¦</span> result_header<span class="Delimiter">.</span>products<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span><a href='072recipe.cc.html#L269'>next_recipe_reagent</a><span class="Delimiter">(</span>curr<span class="Delimiter">));</span> <span id="L238" class="LineNr">238 </span> <span class="Delimiter">}</span> <span id="L239" class="LineNr">239 </span> <span class="Identifier">return</span> result_header<span class="Delimiter">;</span> <span id="L240" class="LineNr">240 </span><span class="Delimiter">}</span> <span id="L241" class="LineNr">241 </span> <span id="L242" class="LineNr">242 </span><span class="Delimiter">:(before "End Unit Tests")</span> -<span id="L243" class="LineNr">243 </span><span class="Normal">void</span> <a href='071recipe.cc.html#L243'>test_from_reagent_atomic</a><span class="Delimiter">()</span> <span class="Delimiter">{</span> +<span id="L243" class="LineNr">243 </span><span class="Normal">void</span> <a href='072recipe.cc.html#L243'>test_from_reagent_atomic</a><span class="Delimiter">()</span> <span class="Delimiter">{</span> <span id="L244" class="LineNr">244 </span> reagent a<span class="Delimiter">(</span><span class="Constant">"{f: recipe}"</span><span class="Delimiter">);</span> -<span id="L245" class="LineNr">245 </span> <a href='010vm.cc.html#L19'>recipe</a> r_header = <a href='071recipe.cc.html#L207'>from_reagent</a><span class="Delimiter">(</span>a<span class="Delimiter">);</span> +<span id="L245" class="LineNr">245 </span> <a href='010vm.cc.html#L19'>recipe</a> r_header = <a href='072recipe.cc.html#L207'>from_reagent</a><span class="Delimiter">(</span>a<span class="Delimiter">);</span> <span id="L246" class="LineNr">246 </span> <a href='002test.cc.html#L24'>CHECK</a><span class="Delimiter">(</span>r_header<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>empty<span class="Delimiter">());</span> <span id="L247" class="LineNr">247 </span> <a href='002test.cc.html#L24'>CHECK</a><span class="Delimiter">(</span>r_header<span class="Delimiter">.</span>products<span class="Delimiter">.</span>empty<span class="Delimiter">());</span> <span id="L248" class="LineNr">248 </span><span class="Delimiter">}</span> -<span id="L249" class="LineNr">249 </span><span class="Normal">void</span> <a href='071recipe.cc.html#L249'>test_from_reagent_non_atomic</a><span class="Delimiter">()</span> <span class="Delimiter">{</span> +<span id="L249" class="LineNr">249 </span><span class="Normal">void</span> <a href='072recipe.cc.html#L249'>test_from_reagent_non_atomic</a><span class="Delimiter">()</span> <span class="Delimiter">{</span> <span id="L250" class="LineNr">250 </span> reagent a<span class="Delimiter">(</span><span class="Constant">"{f: (recipe number -> number)}"</span><span class="Delimiter">);</span> -<span id="L251" class="LineNr">251 </span> <a href='010vm.cc.html#L19'>recipe</a> r_header = <a href='071recipe.cc.html#L207'>from_reagent</a><span class="Delimiter">(</span>a<span class="Delimiter">);</span> +<span id="L251" class="LineNr">251 </span> <a href='010vm.cc.html#L19'>recipe</a> r_header = <a href='072recipe.cc.html#L207'>from_reagent</a><span class="Delimiter">(</span>a<span class="Delimiter">);</span> <span id="L252" class="LineNr">252 </span> <a href='002test.cc.html#L31'>CHECK_EQ</a><span class="Delimiter">(</span><a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>r_header<span class="Delimiter">.</span>ingredients<span class="Delimiter">),</span> <span class="Constant">1</span><span class="Delimiter">);</span> <span id="L253" class="LineNr">253 </span> <a href='002test.cc.html#L31'>CHECK_EQ</a><span class="Delimiter">(</span><a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>r_header<span class="Delimiter">.</span>products<span class="Delimiter">),</span> <span class="Constant">1</span><span class="Delimiter">);</span> <span id="L254" class="LineNr">254 </span><span class="Delimiter">}</span> -<span id="L255" class="LineNr">255 </span><span class="Normal">void</span> <a href='071recipe.cc.html#L255'>test_from_reagent_reads_ingredient_at_end</a><span class="Delimiter">()</span> <span class="Delimiter">{</span> +<span id="L255" class="LineNr">255 </span><span class="Normal">void</span> <a href='072recipe.cc.html#L255'>test_from_reagent_reads_ingredient_at_end</a><span class="Delimiter">()</span> <span class="Delimiter">{</span> <span id="L256" class="LineNr">256 </span> reagent a<span class="Delimiter">(</span><span class="Constant">"{f: (recipe number number)}"</span><span class="Delimiter">);</span> -<span id="L257" class="LineNr">257 </span> <a href='010vm.cc.html#L19'>recipe</a> r_header = <a href='071recipe.cc.html#L207'>from_reagent</a><span class="Delimiter">(</span>a<span class="Delimiter">);</span> +<span id="L257" class="LineNr">257 </span> <a href='010vm.cc.html#L19'>recipe</a> r_header = <a href='072recipe.cc.html#L207'>from_reagent</a><span class="Delimiter">(</span>a<span class="Delimiter">);</span> <span id="L258" class="LineNr">258 </span> <a href='002test.cc.html#L31'>CHECK_EQ</a><span class="Delimiter">(</span><a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>r_header<span class="Delimiter">.</span>ingredients<span class="Delimiter">),</span> <span class="Constant">2</span><span class="Delimiter">);</span> <span id="L259" class="LineNr">259 </span> <a href='002test.cc.html#L24'>CHECK</a><span class="Delimiter">(</span>r_header<span class="Delimiter">.</span>products<span class="Delimiter">.</span>empty<span class="Delimiter">());</span> <span id="L260" class="LineNr">260 </span><span class="Delimiter">}</span> -<span id="L261" class="LineNr">261 </span><span class="Normal">void</span> <a href='071recipe.cc.html#L261'>test_from_reagent_reads_sole_ingredient_at_end</a><span class="Delimiter">()</span> <span class="Delimiter">{</span> +<span id="L261" class="LineNr">261 </span><span class="Normal">void</span> <a href='072recipe.cc.html#L261'>test_from_reagent_reads_sole_ingredient_at_end</a><span class="Delimiter">()</span> <span class="Delimiter">{</span> <span id="L262" class="LineNr">262 </span> reagent a<span class="Delimiter">(</span><span class="Constant">"{f: (recipe number)}"</span><span class="Delimiter">);</span> -<span id="L263" class="LineNr">263 </span> <a href='010vm.cc.html#L19'>recipe</a> r_header = <a href='071recipe.cc.html#L207'>from_reagent</a><span class="Delimiter">(</span>a<span class="Delimiter">);</span> +<span id="L263" class="LineNr">263 </span> <a href='010vm.cc.html#L19'>recipe</a> r_header = <a href='072recipe.cc.html#L207'>from_reagent</a><span class="Delimiter">(</span>a<span class="Delimiter">);</span> <span id="L264" class="LineNr">264 </span> <a href='002test.cc.html#L31'>CHECK_EQ</a><span class="Delimiter">(</span><a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>r_header<span class="Delimiter">.</span>ingredients<span class="Delimiter">),</span> <span class="Constant">1</span><span class="Delimiter">);</span> <span id="L265" class="LineNr">265 </span> <a href='002test.cc.html#L24'>CHECK</a><span class="Delimiter">(</span>r_header<span class="Delimiter">.</span>products<span class="Delimiter">.</span>empty<span class="Delimiter">());</span> <span id="L266" class="LineNr">266 </span><span class="Delimiter">}</span> <span id="L267" class="LineNr">267 </span> <span id="L268" class="LineNr">268 </span><span class="Delimiter">:(code)</span> -<span id="L269" class="LineNr">269 </span>reagent <a href='071recipe.cc.html#L269'>next_recipe_reagent</a><span class="Delimiter">(</span><span class="Normal">const</span> type_tree* curr<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L269" class="LineNr">269 </span>reagent <a href='072recipe.cc.html#L269'>next_recipe_reagent</a><span class="Delimiter">(</span><span class="Normal">const</span> type_tree* curr<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L270" class="LineNr">270 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>!curr<span class="Delimiter">-></span>left<span class="Delimiter">)</span> <span class="Identifier">return</span> reagent<span class="Delimiter">(</span><span class="Constant">"recipe:"</span>+curr<span class="Delimiter">-></span>name<span class="Delimiter">);</span> <span id="L271" class="LineNr">271 </span> reagent result<span class="Delimiter">;</span> <span id="L272" class="LineNr">272 </span> result<span class="Delimiter">.</span>name = <span class="Constant">"recipe"</span><span class="Delimiter">;</span> @@ -338,7 +338,7 @@ if ('onhashchange' in window) { <span id="L274" class="LineNr">274 </span> <span class="Identifier">return</span> result<span class="Delimiter">;</span> <span id="L275" class="LineNr">275 </span><span class="Delimiter">}</span> <span id="L276" class="LineNr">276 </span> -<span id="L277" class="LineNr">277 </span><span class="Normal">bool</span> <a href='071recipe.cc.html#L277'>is_mu_recipe</a><span class="Delimiter">(</span><span class="Normal">const</span> reagent& r<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L277" class="LineNr">277 </span><span class="Normal">bool</span> <a href='072recipe.cc.html#L277'>is_mu_recipe</a><span class="Delimiter">(</span><span class="Normal">const</span> reagent& r<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L278" class="LineNr">278 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>!r<span class="Delimiter">.</span>type<span class="Delimiter">)</span> <span class="Identifier">return</span> <span class="Constant">false</span><span class="Delimiter">;</span> <span id="L279" class="LineNr">279 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>r<span class="Delimiter">.</span>type<span class="Delimiter">-></span>atom<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L280" class="LineNr">280 </span> <span class="Conceal">¦</span> <span class="Comment">// End is_mu_recipe Atom Cases(r)</span> @@ -374,13 +374,13 @@ if ('onhashchange' in window) { <span id="L310" class="LineNr">310 </span><span class="traceContains">+error: <a href='000organization.cc.html#L113'>main</a>: can't copy 'f' to '{1: (recipe number -> number)}'; types don't match</span> <span id="L311" class="LineNr">311 </span> <span id="L312" class="LineNr">312 </span><span class="Delimiter">:(before "End Matching Types For Literal(to)")</span> -<span id="L313" class="LineNr">313 </span><span class="Normal">if</span> <span class="Delimiter">(</span><a href='071recipe.cc.html#L277'>is_mu_recipe</a><span class="Delimiter">(</span>to<span class="Delimiter">))</span> <span class="Delimiter">{</span> +<span id="L313" class="LineNr">313 </span><span class="Normal">if</span> <span class="Delimiter">(</span><a href='072recipe.cc.html#L277'>is_mu_recipe</a><span class="Delimiter">(</span>to<span class="Delimiter">))</span> <span class="Delimiter">{</span> <span id="L314" class="LineNr">314 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>!contains_key<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> from<span class="Delimiter">.</span>value<span class="Delimiter">))</span> <span class="Delimiter">{</span> <span id="L315" class="LineNr">315 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L168'>raise</a> << <span class="Constant">"trying to store <a href='010vm.cc.html#L19'>recipe</a> "</span> << from<span class="Delimiter">.</span>name << <span class="Constant">" into "</span> << <a href='028call_return.cc.html#L158'>to_string</a><span class="Delimiter">(</span>to<span class="Delimiter">)</span> << <span class="Constant">" but there's no such recipe</span><span class="cSpecial">\n</span><span class="Constant">"</span> << end<span class="Delimiter">();</span> <span id="L316" class="LineNr">316 </span> <span class="Conceal">¦</span> <span class="Identifier">return</span> <span class="Constant">false</span><span class="Delimiter">;</span> <span id="L317" class="LineNr">317 </span> <span class="Delimiter">}</span> <span id="L318" class="LineNr">318 </span> <span class="Normal">const</span> recipe& rrhs = get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> from<span class="Delimiter">.</span>value<span class="Delimiter">);</span> -<span id="L319" class="LineNr">319 </span> <span class="Normal">const</span> recipe& rlhs = <a href='071recipe.cc.html#L207'>from_reagent</a><span class="Delimiter">(</span>to<span class="Delimiter">);</span> +<span id="L319" class="LineNr">319 </span> <span class="Normal">const</span> recipe& rlhs = <a href='072recipe.cc.html#L207'>from_reagent</a><span class="Delimiter">(</span>to<span class="Delimiter">);</span> <span id="L320" class="LineNr">320 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">long</span> <span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < min<span class="Delimiter">(</span><a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>rlhs<span class="Delimiter">.</span>ingredients<span class="Delimiter">),</span> <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>rrhs<span class="Delimiter">.</span>ingredients<span class="Delimiter">));</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L321" class="LineNr">321 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>!types_match<span class="Delimiter">(</span>rlhs<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">),</span> rrhs<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)))</span> <span id="L322" class="LineNr">322 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Identifier">return</span> <span class="Constant">false</span><span class="Delimiter">;</span> @@ -421,13 +421,13 @@ if ('onhashchange' in window) { <span id="L357" class="LineNr">357 </span><span class="traceContains">+error: <a href='000organization.cc.html#L113'>main</a>: missing type for 'foo' in 'break-if foo'</span> <span id="L358" class="LineNr">358 </span> <span id="L359" class="LineNr">359 </span><span class="Delimiter">:(before "End JUMP_IF Checks")</span> -<span id="L360" class="LineNr">360 </span><a href='071recipe.cc.html#L364'>check_for_recipe_literals</a><span class="Delimiter">(</span>inst<span class="Delimiter">,</span> get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">));</span> +<span id="L360" class="LineNr">360 </span><a href='072recipe.cc.html#L364'>check_for_recipe_literals</a><span class="Delimiter">(</span>inst<span class="Delimiter">,</span> get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">));</span> <span id="L361" class="LineNr">361 </span><span class="Delimiter">:(before "End JUMP_UNLESS Checks")</span> -<span id="L362" class="LineNr">362 </span><a href='071recipe.cc.html#L364'>check_for_recipe_literals</a><span class="Delimiter">(</span>inst<span class="Delimiter">,</span> get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">));</span> +<span id="L362" class="LineNr">362 </span><a href='072recipe.cc.html#L364'>check_for_recipe_literals</a><span class="Delimiter">(</span>inst<span class="Delimiter">,</span> get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">));</span> <span id="L363" class="LineNr">363 </span><span class="Delimiter">:(code)</span> -<span id="L364" class="LineNr">364 </span><span class="Normal">void</span> <a href='071recipe.cc.html#L364'>check_for_recipe_literals</a><span class="Delimiter">(</span><span class="Normal">const</span> instruction& inst<span class="Delimiter">,</span> <span class="Normal">const</span> recipe& caller<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L364" class="LineNr">364 </span><span class="Normal">void</span> <a href='072recipe.cc.html#L364'>check_for_recipe_literals</a><span class="Delimiter">(</span><span class="Normal">const</span> instruction& inst<span class="Delimiter">,</span> <span class="Normal">const</span> recipe& caller<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L365" class="LineNr">365 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L366" class="LineNr">366 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span><a href='071recipe.cc.html#L277'>is_mu_recipe</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)))</span> <span class="Delimiter">{</span> +<span id="L366" class="LineNr">366 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span><a href='072recipe.cc.html#L277'>is_mu_recipe</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)))</span> <span class="Delimiter">{</span> <span id="L367" class="LineNr">367 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L168'>raise</a> << <a href='013update_operation.cc.html#L25'>maybe</a><span class="Delimiter">(</span>caller<span class="Delimiter">.</span>name<span class="Delimiter">)</span> << <span class="Constant">"missing type for '"</span> << inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">).</span>original_string << <span class="Constant">"' in '"</span> << to_original_string<span class="Delimiter">(</span>inst<span class="Delimiter">)</span> << <span class="Constant">"'</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> <span id="L368" class="LineNr">368 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>is_present_in_ingredients<span class="Delimiter">(</span>caller<span class="Delimiter">,</span> inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">).</span>name<span class="Delimiter">))</span> <span id="L369" class="LineNr">369 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L168'>raise</a> << <span class="Constant">" did you forget 'load-ingredients'?</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> diff --git a/html/072scheduler.cc.html b/html/073scheduler.cc.html index 812f8691..dc482071 100644 --- a/html/072scheduler.cc.html +++ b/html/073scheduler.cc.html @@ -2,7 +2,7 @@ <html> <head> <meta http-equiv="content-type" content="text/html; charset=UTF-8"> -<title>Mu - 072scheduler.cc</title> +<title>Mu - 073scheduler.cc</title> <meta name="Generator" content="Vim/7.4"> <meta name="plugin-version" content="vim7.4_v2"> <meta name="syntax" content="cpp"> @@ -90,9 +90,9 @@ if ('onhashchange' in window) { <span id="L25" class="LineNr"> 25 </span><span class="Delimiter">:(after "Running One Instruction")</span> <span id="L26" class="LineNr"> 26 </span> ++Current_routine<span class="Delimiter">-></span>instructions_run_this_scheduling_slice<span class="Delimiter">;</span> <span id="L27" class="LineNr"> 27 </span><span class="Delimiter">:(replace{} "bool should_continue_running(const routine* current_routine)")</span> -<span id="L28" class="LineNr"> 28 </span><span class="Normal">bool</span> <a href='072scheduler.cc.html#L28'>should_continue_running</a><span class="Delimiter">(</span><span class="Normal">const</span> routine* current_routine<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L28" class="LineNr"> 28 </span><span class="Normal">bool</span> <a href='073scheduler.cc.html#L28'>should_continue_running</a><span class="Delimiter">(</span><span class="Normal">const</span> routine* current_routine<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L29" class="LineNr"> 29 </span> assert<span class="Delimiter">(</span>current_routine == Current_routine<span class="Delimiter">);</span> <span class="Comment">// argument passed in just to make caller readable above</span> -<span id="L30" class="LineNr"> 30 </span> <span class="Identifier">return</span> Current_routine<span class="Delimiter">-></span>state == <a href='072scheduler.cc.html#L41'>RUNNING</a> +<span id="L30" class="LineNr"> 30 </span> <span class="Identifier">return</span> Current_routine<span class="Delimiter">-></span>state == <a href='073scheduler.cc.html#L41'>RUNNING</a> <span id="L31" class="LineNr"> 31 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> && Current_routine<span class="Delimiter">-></span>instructions_run_this_scheduling_slice < Scheduling_interval<span class="Delimiter">;</span> <span id="L32" class="LineNr"> 32 </span><span class="Delimiter">}</span> <span id="L33" class="LineNr"> 33 </span><span class="Delimiter">:(after "stop_running_current_routine:")</span> @@ -102,15 +102,15 @@ if ('onhashchange' in window) { <span id="L37" class="LineNr"> 37 </span><span class="Comment">//: now the rest of the scheduler is clean</span> <span id="L38" class="LineNr"> 38 </span> <span id="L39" class="LineNr"> 39 </span><span class="Delimiter">:(before "struct routine")</span> -<span id="L40" class="LineNr"> 40 </span><span class="Normal">enum</span> <a href='072scheduler.cc.html#L40'>routine_state</a> <span class="Delimiter">{</span> -<span id="L41" class="LineNr"> 41 </span> <a href='072scheduler.cc.html#L41'>RUNNING</a><span class="Delimiter">,</span> -<span id="L42" class="LineNr"> 42 </span> <a href='072scheduler.cc.html#L42'>COMPLETED</a><span class="Delimiter">,</span> +<span id="L40" class="LineNr"> 40 </span><span class="Normal">enum</span> <a href='073scheduler.cc.html#L40'>routine_state</a> <span class="Delimiter">{</span> +<span id="L41" class="LineNr"> 41 </span> <a href='073scheduler.cc.html#L41'>RUNNING</a><span class="Delimiter">,</span> +<span id="L42" class="LineNr"> 42 </span> <a href='073scheduler.cc.html#L42'>COMPLETED</a><span class="Delimiter">,</span> <span id="L43" class="LineNr"> 43 </span> <span class="Comment">// End routine States</span> <span id="L44" class="LineNr"> 44 </span><span class="Delimiter">};</span> <span id="L45" class="LineNr"> 45 </span><span class="Delimiter">:(before "End routine Fields")</span> -<span id="L46" class="LineNr"> 46 </span><span class="Normal">enum</span> <a href='072scheduler.cc.html#L40'>routine_state</a> state<span class="Delimiter">;</span> +<span id="L46" class="LineNr"> 46 </span><span class="Normal">enum</span> <a href='073scheduler.cc.html#L40'>routine_state</a> state<span class="Delimiter">;</span> <span id="L47" class="LineNr"> 47 </span><span class="Delimiter">:(before "End routine Constructor")</span> -<span id="L48" class="LineNr"> 48 </span>state = <a href='072scheduler.cc.html#L41'>RUNNING</a><span class="Delimiter">;</span> +<span id="L48" class="LineNr"> 48 </span>state = <a href='073scheduler.cc.html#L41'>RUNNING</a><span class="Delimiter">;</span> <span id="L49" class="LineNr"> 49 </span> <span id="L50" class="LineNr"> 50 </span><span class="Delimiter">:(before "End Globals")</span> <span id="L51" class="LineNr"> 51 </span>vector<routine*> Routines<span class="Delimiter">;</span> @@ -131,14 +131,14 @@ if ('onhashchange' in window) { <span id="L66" class="LineNr"> 66 </span> Routines<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span>rr<span class="Delimiter">);</span> <span id="L67" class="LineNr"> 67 </span> Current_routine_index = <span class="Constant">0</span><span class="Delimiter">,</span> Current_routine = Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">);</span> <span id="L68" class="LineNr"> 68 </span> <span class="Normal">while</span> <span class="Delimiter">(</span>!all_routines_done<span class="Delimiter">())</span> <span class="Delimiter">{</span> -<span id="L69" class="LineNr"> 69 </span> <span class="Conceal">¦</span> <a href='072scheduler.cc.html#L94'>skip_to_next_routine</a><span class="Delimiter">();</span> +<span id="L69" class="LineNr"> 69 </span> <span class="Conceal">¦</span> <a href='073scheduler.cc.html#L94'>skip_to_next_routine</a><span class="Delimiter">();</span> <span id="L70" class="LineNr"> 70 </span> <span class="Conceal">¦</span> assert<span class="Delimiter">(</span>Current_routine<span class="Delimiter">);</span> -<span id="L71" class="LineNr"> 71 </span> <span class="Conceal">¦</span> assert<span class="Delimiter">(</span>Current_routine<span class="Delimiter">-></span>state == <a href='072scheduler.cc.html#L41'>RUNNING</a><span class="Delimiter">);</span> -<span id="L72" class="LineNr"> 72 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9990</span><span class="Delimiter">,</span> <span class="Constant">"schedule"</span><span class="Delimiter">)</span> << <a href='072scheduler.cc.html#L106'>current_routine_label</a><span class="Delimiter">()</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> +<span id="L71" class="LineNr"> 71 </span> <span class="Conceal">¦</span> assert<span class="Delimiter">(</span>Current_routine<span class="Delimiter">-></span>state == <a href='073scheduler.cc.html#L41'>RUNNING</a><span class="Delimiter">);</span> +<span id="L72" class="LineNr"> 72 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9990</span><span class="Delimiter">,</span> <span class="Constant">"schedule"</span><span class="Delimiter">)</span> << <a href='073scheduler.cc.html#L106'>current_routine_label</a><span class="Delimiter">()</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> <span id="L73" class="LineNr"> 73 </span> <span class="Conceal">¦</span> run_current_routine<span class="Delimiter">();</span> <span id="L74" class="LineNr"> 74 </span> <span class="Conceal">¦</span> <span class="Comment">// Scheduler State Transitions</span> <span id="L75" class="LineNr"> 75 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Current_routine<span class="Delimiter">-></span>completed<span class="Delimiter">())</span> -<span id="L76" class="LineNr"> 76 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Current_routine<span class="Delimiter">-></span>state = <a href='072scheduler.cc.html#L42'>COMPLETED</a><span class="Delimiter">;</span> +<span id="L76" class="LineNr"> 76 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Current_routine<span class="Delimiter">-></span>state = <a href='073scheduler.cc.html#L42'>COMPLETED</a><span class="Delimiter">;</span> <span id="L77" class="LineNr"> 77 </span> <span class="Conceal">¦</span> <span class="Comment">// End Scheduler State Transitions</span> <span id="L78" class="LineNr"> 78 </span> <span id="L79" class="LineNr"> 79 </span> <span class="Conceal">¦</span> <span class="Comment">// Scheduler Cleanup</span> @@ -147,20 +147,20 @@ if ('onhashchange' in window) { <span id="L82" class="LineNr"> 82 </span> <span class="Comment">// End Run Routine</span> <span id="L83" class="LineNr"> 83 </span><span class="Delimiter">}</span> <span id="L84" class="LineNr"> 84 </span> -<span id="L85" class="LineNr"> 85 </span><span class="Normal">bool</span> <a href='072scheduler.cc.html#L85'>all_routines_done</a><span class="Delimiter">()</span> <span class="Delimiter">{</span> +<span id="L85" class="LineNr"> 85 </span><span class="Normal">bool</span> <a href='073scheduler.cc.html#L85'>all_routines_done</a><span class="Delimiter">()</span> <span class="Delimiter">{</span> <span id="L86" class="LineNr"> 86 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>Routines<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L87" class="LineNr"> 87 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>state == <a href='072scheduler.cc.html#L41'>RUNNING</a><span class="Delimiter">)</span> +<span id="L87" class="LineNr"> 87 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>state == <a href='073scheduler.cc.html#L41'>RUNNING</a><span class="Delimiter">)</span> <span id="L88" class="LineNr"> 88 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Identifier">return</span> <span class="Constant">false</span><span class="Delimiter">;</span> <span id="L89" class="LineNr"> 89 </span> <span class="Delimiter">}</span> <span id="L90" class="LineNr"> 90 </span> <span class="Identifier">return</span> <span class="Constant">true</span><span class="Delimiter">;</span> <span id="L91" class="LineNr"> 91 </span><span class="Delimiter">}</span> <span id="L92" class="LineNr"> 92 </span> <span id="L93" class="LineNr"> 93 </span><span class="Comment">// skip Current_routine_index past non-RUNNING routines</span> -<span id="L94" class="LineNr"> 94 </span><span class="Normal">void</span> <a href='072scheduler.cc.html#L94'>skip_to_next_routine</a><span class="Delimiter">()</span> <span class="Delimiter">{</span> +<span id="L94" class="LineNr"> 94 </span><span class="Normal">void</span> <a href='073scheduler.cc.html#L94'>skip_to_next_routine</a><span class="Delimiter">()</span> <span class="Delimiter">{</span> <span id="L95" class="LineNr"> 95 </span> assert<span class="Delimiter">(</span>!Routines<span class="Delimiter">.</span>empty<span class="Delimiter">());</span> <span id="L96" class="LineNr"> 96 </span> assert<span class="Delimiter">(</span>Current_routine_index < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>Routines<span class="Delimiter">));</span> <span id="L97" class="LineNr"> 97 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Delimiter">(</span>Current_routine_index+<span class="Constant">1</span><span class="Delimiter">)</span>%SIZE<span class="Delimiter">(</span>Routines<span class="Delimiter">);</span> i != Current_routine_index<span class="Delimiter">;</span> i = <span class="Delimiter">(</span>i+<span class="Constant">1</span><span class="Delimiter">)</span>%SIZE<span class="Delimiter">(</span>Routines<span class="Delimiter">))</span> <span class="Delimiter">{</span> -<span id="L98" class="LineNr"> 98 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>state == <a href='072scheduler.cc.html#L41'>RUNNING</a><span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L98" class="LineNr"> 98 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>state == <a href='073scheduler.cc.html#L41'>RUNNING</a><span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L99" class="LineNr"> 99 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Current_routine_index = i<span class="Delimiter">;</span> <span id="L100" class="LineNr">100 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Current_routine = Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">);</span> <span id="L101" class="LineNr">101 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Identifier">return</span><span class="Delimiter">;</span> @@ -168,11 +168,11 @@ if ('onhashchange' in window) { <span id="L103" class="LineNr">103 </span> <span class="Delimiter">}</span> <span id="L104" class="LineNr">104 </span><span class="Delimiter">}</span> <span id="L105" class="LineNr">105 </span> -<span id="L106" class="LineNr">106 </span>string <a href='072scheduler.cc.html#L106'>current_routine_label</a><span class="Delimiter">()</span> <span class="Delimiter">{</span> -<span id="L107" class="LineNr">107 </span> <span class="Identifier">return</span> <a href='072scheduler.cc.html#L110'>routine_label</a><span class="Delimiter">(</span>Current_routine<span class="Delimiter">);</span> +<span id="L106" class="LineNr">106 </span>string <a href='073scheduler.cc.html#L106'>current_routine_label</a><span class="Delimiter">()</span> <span class="Delimiter">{</span> +<span id="L107" class="LineNr">107 </span> <span class="Identifier">return</span> <a href='073scheduler.cc.html#L110'>routine_label</a><span class="Delimiter">(</span>Current_routine<span class="Delimiter">);</span> <span id="L108" class="LineNr">108 </span><span class="Delimiter">}</span> <span id="L109" class="LineNr">109 </span> -<span id="L110" class="LineNr">110 </span>string <a href='072scheduler.cc.html#L110'>routine_label</a><span class="Delimiter">(</span>routine* r<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L110" class="LineNr">110 </span>string <a href='073scheduler.cc.html#L110'>routine_label</a><span class="Delimiter">(</span>routine* r<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L111" class="LineNr">111 </span> ostringstream result<span class="Delimiter">;</span> <span id="L112" class="LineNr">112 </span> <span class="Normal">const</span> call_stack& calls = r<span class="Delimiter">-></span>calls<span class="Delimiter">;</span> <span id="L113" class="LineNr">113 </span> <span class="Normal">for</span> <span class="Delimiter">(</span>call_stack::const_iterator p = calls<span class="Delimiter">.</span>begin<span class="Delimiter">();</span> p != calls<span class="Delimiter">.</span><a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> ++p<span class="Delimiter">)</span> <span class="Delimiter">{</span> @@ -184,7 +184,7 @@ if ('onhashchange' in window) { <span id="L119" class="LineNr">119 </span> <span id="L120" class="LineNr">120 </span><span class="Comment">//: special case for the very first routine</span> <span id="L121" class="LineNr">121 </span><span class="Delimiter">:(replace{} "void run_main(int argc, char* argv[])")</span> -<span id="L122" class="LineNr">122 </span><span class="Normal">void</span> <a href='072scheduler.cc.html#L122'>run_main</a><span class="Delimiter">(</span><span class="Normal">int</span> argc<span class="Delimiter">,</span> <span class="Normal">char</span>* argv[]<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L122" class="LineNr">122 </span><span class="Normal">void</span> <a href='073scheduler.cc.html#L122'>run_main</a><span class="Delimiter">(</span><span class="Normal">int</span> argc<span class="Delimiter">,</span> <span class="Normal">char</span>* argv[]<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L123" class="LineNr">123 </span> <a href='010vm.cc.html#L14'>recipe_ordinal</a> r = get<span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> <span class="Constant">"main"</span><span class="Delimiter">);</span> <span id="L124" class="LineNr">124 </span> assert<span class="Delimiter">(</span>r<span class="Delimiter">);</span> <span id="L125" class="LineNr">125 </span> routine* main_routine = <span class="Normal">new</span> routine<span class="Delimiter">(</span>r<span class="Delimiter">);</span> @@ -243,11 +243,11 @@ if ('onhashchange' in window) { <span id="L178" class="LineNr">178 </span> routine* new_routine = <span class="Normal">new</span> routine<span class="Delimiter">(</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">));</span> <span id="L179" class="LineNr">179 </span> new_routine<span class="Delimiter">-></span>parent_index = Current_routine_index<span class="Delimiter">;</span> <span id="L180" class="LineNr">180 </span> <span class="Comment">// populate ingredients</span> -<span id="L181" class="LineNr">181 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">1</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span><a href='026call.cc.html#L85'>current_instruction</a><span class="Delimiter">().</span>ingredients<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L182" class="LineNr">182 </span> <span class="Conceal">¦</span> new_routine<span class="Delimiter">-></span>calls<span class="Delimiter">.</span>front<span class="Delimiter">().</span>ingredient_atoms<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">));</span> -<span id="L183" class="LineNr">183 </span> <span class="Conceal">¦</span> reagent<span class="Comment">/*</span><span class="Comment">copy</span><span class="Comment">*/</span> ingredient = <a href='026call.cc.html#L85'>current_instruction</a><span class="Delimiter">().</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">);</span> -<span id="L184" class="LineNr">184 </span> <span class="Conceal">¦</span> canonize_type<span class="Delimiter">(</span>ingredient<span class="Delimiter">);</span> -<span id="L185" class="LineNr">185 </span> <span class="Conceal">¦</span> new_routine<span class="Delimiter">-></span>calls<span class="Delimiter">.</span>front<span class="Delimiter">().</span>ingredients<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span>ingredient<span class="Delimiter">);</span> +<span id="L181" class="LineNr">181 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Comment">/*</span><span class="Comment">skip callee</span><span class="Comment">*/</span><span class="Constant">1</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span><a href='026call.cc.html#L85'>current_instruction</a><span class="Delimiter">().</span>ingredients<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L182" class="LineNr">182 </span> <span class="Conceal">¦</span> reagent<span class="Comment">/*</span><span class="Comment">copy</span><span class="Comment">*/</span> ingredient = <a href='026call.cc.html#L85'>current_instruction</a><span class="Delimiter">().</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">);</span> +<span id="L183" class="LineNr">183 </span> <span class="Conceal">¦</span> new_routine<span class="Delimiter">-></span>calls<span class="Delimiter">.</span>front<span class="Delimiter">().</span>ingredients<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span>ingredient<span class="Delimiter">);</span> +<span id="L184" class="LineNr">184 </span> <span class="Conceal">¦</span> vector<<span class="Normal">double</span>> new_ingredient_atoms = deep_copy<span class="Delimiter">(</span>ingredient<span class="Delimiter">);</span> +<span id="L185" class="LineNr">185 </span> <span class="Conceal">¦</span> new_routine<span class="Delimiter">-></span>calls<span class="Delimiter">.</span>front<span class="Delimiter">().</span>ingredient_atoms<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span>new_ingredient_atoms<span class="Delimiter">);</span> <span id="L186" class="LineNr">186 </span> <span class="Conceal">¦</span> <span class="Comment">// End Populate start-running Ingredient</span> <span id="L187" class="LineNr">187 </span> <span class="Delimiter">}</span> <span id="L188" class="LineNr">188 </span> Routines<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span>new_routine<span class="Delimiter">);</span> @@ -315,10 +315,10 @@ if ('onhashchange' in window) { <span id="L250" class="LineNr">250 </span><span class="traceContains">+error: f1: ingredient 0 has the wrong type at 'start-running f2, 3'</span> <span id="L251" class="LineNr">251 </span> <span id="L252" class="LineNr">252 </span><span class="Comment">// 'start-running' only uses the ingredients of the callee, not its products</span> -<span id="L253" class="LineNr">253 </span><span class="Delimiter">:(before "End <a href='071recipe.cc.html#L196'>is_indirect_call_with_ingredients</a> Special-cases")</span> +<span id="L253" class="LineNr">253 </span><span class="Delimiter">:(before "End <a href='072recipe.cc.html#L196'>is_indirect_call_with_ingredients</a> Special-cases")</span> <span id="L254" class="LineNr">254 </span><span class="Normal">if</span> <span class="Delimiter">(</span>r == START_RUNNING<span class="Delimiter">)</span> <span class="Identifier">return</span> <span class="Constant">true</span><span class="Delimiter">;</span> <span id="L255" class="LineNr">255 </span> -<span id="L256" class="LineNr">256 </span><span class="Comment">//: more complex: refcounting management when starting up new routines</span> +<span id="L256" class="LineNr">256 </span><span class="Comment">//: refcounting management when starting up new routines</span> <span id="L257" class="LineNr">257 </span> <span id="L258" class="LineNr">258 </span><span class="Delimiter">:(scenario start_running_immediately_updates_refcounts_of_ingredients)</span> <span id="L259" class="LineNr">259 </span><span class="Special">% Scheduling_interval = 1;</span> @@ -341,434 +341,420 @@ if ('onhashchange' in window) { <span id="L276" class="LineNr">276 </span> load-ingredients <span id="L277" class="LineNr">277 </span> <span class="Constant">1</span>:num/<span class="Special">raw <- </span>copy *n <span id="L278" class="LineNr">278 </span>] -<span id="L279" class="LineNr">279 </span><span class="Comment"># check that n wasn't reclaimed when create-new-routine returned</span> +<span id="L279" class="LineNr">279 </span><span class="Comment"># check that n was successfully passed into new-routine before being reclaimed</span> <span id="L280" class="LineNr">280 </span><span class="traceContains">+mem: storing 34 in location 1</span> <span id="L281" class="LineNr">281 </span> -<span id="L282" class="LineNr">282 </span><span class="Comment">//: to support the previous scenario we'll increment refcounts for all call</span> -<span id="L283" class="LineNr">283 </span><span class="Comment">//: ingredients right at call time, and stop incrementing refcounts inside</span> -<span id="L284" class="LineNr">284 </span><span class="Comment">//: next-ingredient</span> -<span id="L285" class="LineNr">285 </span><span class="Delimiter">:(before "End Populate Call Ingredient")</span> -<span id="L286" class="LineNr">286 </span><a href='036refcount.cc.html#L44'>increment_any_refcounts</a><span class="Delimiter">(</span>ingredient<span class="Delimiter">,</span> ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">));</span> -<span id="L287" class="LineNr">287 </span><span class="Delimiter">:(before "End Populate start-running Ingredient")</span> -<span id="L288" class="LineNr">288 </span><a href='036refcount.cc.html#L44'>increment_any_refcounts</a><span class="Delimiter">(</span>ingredient<span class="Delimiter">,</span> ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">));</span> -<span id="L289" class="LineNr">289 </span><span class="Delimiter">:(after "should_update_refcounts() Special-cases When Writing Products Of Primitive Instructions")</span> -<span id="L290" class="LineNr">290 </span><span class="Normal">if</span> <span class="Delimiter">(</span>inst<span class="Delimiter">.</span>operation == NEXT_INGREDIENT || inst<span class="Delimiter">.</span>operation == NEXT_INGREDIENT_WITHOUT_TYPECHECKING<span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L291" class="LineNr">291 </span> <span class="Normal">if</span> <span class="Delimiter">(</span><a href='044space_surround.cc.html#L52'>space_index</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span>products<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">))</span> > <span class="Constant">0</span><span class="Delimiter">)</span> <span class="Identifier">return</span> <span class="Constant">true</span><span class="Delimiter">;</span> -<span id="L292" class="LineNr">292 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>has_property<span class="Delimiter">(</span>inst<span class="Delimiter">.</span>products<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">),</span> <span class="Constant">"raw"</span><span class="Delimiter">))</span> <span class="Identifier">return</span> <span class="Constant">true</span><span class="Delimiter">;</span> -<span id="L293" class="LineNr">293 </span> <span class="Identifier">return</span> <span class="Constant">false</span><span class="Delimiter">;</span> -<span id="L294" class="LineNr">294 </span><span class="Delimiter">}</span> -<span id="L295" class="LineNr">295 </span> -<span id="L296" class="LineNr">296 </span><span class="Comment">// ensure this works with indirect calls using 'call' as well</span> -<span id="L297" class="LineNr">297 </span><span class="Delimiter">:(scenario start_running_immediately_updates_refcounts_of_ingredients_of_indirect_calls)</span> -<span id="L298" class="LineNr">298 </span><span class="Special">% Scheduling_interval = 1;</span> -<span id="L299" class="LineNr">299 </span><span class="muRecipe">def</span> <a href='000organization.cc.html#L113'>main</a> [ -<span id="L300" class="LineNr">300 </span> local-scope -<span id="L301" class="LineNr">301 </span> <span class="Normal">n</span>:&:num<span class="Special"> <- </span><span class="Normal">new</span> <span class="Constant">number:type</span> -<span id="L302" class="LineNr">302 </span> *n<span class="Special"> <- </span>copy <span class="Constant">34</span> -<span id="L303" class="LineNr">303 </span> call f1<span class="Delimiter">,</span> n -<span id="L304" class="LineNr">304 </span> <span class="Constant">1</span>:num/<span class="Special">raw <- </span>copy *n -<span id="L305" class="LineNr">305 </span>] -<span id="L306" class="LineNr">306 </span><span class="muRecipe">def</span> f1 n:&:num [ -<span id="L307" class="LineNr">307 </span> local-scope -<span id="L308" class="LineNr">308 </span> load-ingredients -<span id="L309" class="LineNr">309 </span>] -<span id="L310" class="LineNr">310 </span><span class="Comment"># check that n wasn't reclaimed when f1 returned</span> -<span id="L311" class="LineNr">311 </span><span class="traceContains">+mem: storing 34 in location 1</span> -<span id="L312" class="LineNr">312 </span> -<span id="L313" class="LineNr">313 </span><span class="Delimiter">:(scenario next_ingredient_never_leaks_refcounts)</span> -<span id="L314" class="LineNr">314 </span><span class="muRecipe">def</span> create-space n:&:num<span class="muRecipe"> -> </span><span class="Normal">default</span>-space:space [ -<span id="L315" class="LineNr">315 </span> <span class="Normal">default</span>-space<span class="Special"> <- </span><span class="Normal">new</span> <span class="Constant">location:type</span><span class="Delimiter">,</span> <span class="Constant">2</span> -<span id="L316" class="LineNr">316 </span> load-ingredients -<span id="L317" class="LineNr">317 </span>] -<span id="L318" class="LineNr">318 </span><span class="muRecipe">def</span> use-space [ -<span id="L319" class="LineNr">319 </span> local-scope -<span id="L320" class="LineNr">320 </span> <span class="Constant">0</span>:space/names:create-space<span class="Special"> <- </span>next-ingredient -<span id="L321" class="LineNr">321 </span> <span class="Normal">n</span>:&:num/space:<span class="Constant">1</span><span class="Special"> <- </span>next-ingredient <span class="Comment"># should decrement refcount</span> -<span id="L322" class="LineNr">322 </span> *n/space:<span class="Constant">1</span><span class="Special"> <- </span>copy <span class="Constant">34</span> -<span id="L323" class="LineNr">323 </span> <span class="Normal">n2</span>:num<span class="Special"> <- </span>add *n/space:<span class="Constant">1</span><span class="Delimiter">,</span> <span class="Constant">1</span> -<span id="L324" class="LineNr">324 </span> <span class="Identifier">return</span> n2 -<span id="L325" class="LineNr">325 </span>] -<span id="L326" class="LineNr">326 </span><span class="muRecipe">def</span> <a href='000organization.cc.html#L113'>main</a> [ -<span id="L327" class="LineNr">327 </span> local-scope -<span id="L328" class="LineNr">328 </span> <span class="Normal">n</span>:&:num<span class="Special"> <- </span>copy <span class="Constant">12000</span>/unsafe <span class="Comment"># pretend allocation with a known address</span> -<span id="L329" class="LineNr">329 </span> *n<span class="Special"> <- </span>copy <span class="Constant">23</span> -<span id="L330" class="LineNr">330 </span> <span class="Normal">space</span>:space<span class="Special"> <- </span>create-space n -<span id="L331" class="LineNr">331 </span> <span class="Normal">n2</span>:&:num<span class="Special"> <- </span>copy <span class="Constant">13000</span>/unsafe -<span id="L332" class="LineNr">332 </span> <span class="Normal">n3</span>:num<span class="Special"> <- </span>use-space space<span class="Delimiter">,</span> n2 -<span id="L333" class="LineNr">333 </span>] -<span id="L334" class="LineNr">334 </span><span class="traceContains">+run: {n: ("address" "number"), "space": "1"} <- next-ingredient</span> -<span id="L335" class="LineNr">335 </span><span class="traceContains">+mem: decrementing refcount of 12000: 2 -> 1</span> -<span id="L336" class="LineNr">336 </span><span class="traceContains">+run: {n: ("address" "number"), "space": "1", "lookup": ()} <- copy {34: "literal"}</span> -<span id="L337" class="LineNr">337 </span> -<span id="L338" class="LineNr">338 </span><span class="Comment">//: back to testing 'start-running'</span> -<span id="L339" class="LineNr">339 </span> -<span id="L340" class="LineNr">340 </span><span class="Delimiter">:(scenario start_running_returns_routine_id)</span> -<span id="L341" class="LineNr">341 </span><span class="muRecipe">def</span> f1 [ -<span id="L342" class="LineNr">342 </span> <span class="Constant">1</span>:num<span class="Special"> <- </span>start-running f2 -<span id="L343" class="LineNr">343 </span>] -<span id="L344" class="LineNr">344 </span><span class="muRecipe">def</span> f2 [ -<span id="L345" class="LineNr">345 </span> <span class="Constant">12</span>:num<span class="Special"> <- </span>copy <span class="Constant">44</span> +<span id="L282" class="LineNr">282 </span><span class="Comment">//: ensure this works with indirect calls using 'call' as well</span> +<span id="L283" class="LineNr">283 </span><span class="Delimiter">:(scenario start_running_immediately_updates_refcounts_of_ingredients_of_indirect_calls)</span> +<span id="L284" class="LineNr">284 </span><span class="Special">% Scheduling_interval = 1;</span> +<span id="L285" class="LineNr">285 </span><span class="muRecipe">def</span> <a href='000organization.cc.html#L113'>main</a> [ +<span id="L286" class="LineNr">286 </span> local-scope +<span id="L287" class="LineNr">287 </span> <span class="Normal">n</span>:&:num<span class="Special"> <- </span><span class="Normal">new</span> <span class="Constant">number:type</span> +<span id="L288" class="LineNr">288 </span> *n<span class="Special"> <- </span>copy <span class="Constant">34</span> +<span id="L289" class="LineNr">289 </span> call f1<span class="Delimiter">,</span> n +<span id="L290" class="LineNr">290 </span> <span class="Constant">1</span>:num/<span class="Special">raw <- </span>copy *n +<span id="L291" class="LineNr">291 </span>] +<span id="L292" class="LineNr">292 </span><span class="muRecipe">def</span> f1 n:&:num [ +<span id="L293" class="LineNr">293 </span> local-scope +<span id="L294" class="LineNr">294 </span> load-ingredients +<span id="L295" class="LineNr">295 </span>] +<span id="L296" class="LineNr">296 </span><span class="Comment"># check that n was successfully passed into new-routine before being reclaimed</span> +<span id="L297" class="LineNr">297 </span><span class="traceContains">+mem: storing 34 in location 1</span> +<span id="L298" class="LineNr">298 </span> +<span id="L299" class="LineNr">299 </span><span class="Delimiter">:(scenario next_ingredient_never_leaks_refcounts)</span> +<span id="L300" class="LineNr">300 </span><span class="muRecipe">def</span> create-space n:&:num<span class="muRecipe"> -> </span><span class="Normal">default</span>-space:space [ +<span id="L301" class="LineNr">301 </span> <span class="Normal">default</span>-space<span class="Special"> <- </span><span class="Normal">new</span> <span class="Constant">location:type</span><span class="Delimiter">,</span> <span class="Constant">2</span> +<span id="L302" class="LineNr">302 </span> load-ingredients +<span id="L303" class="LineNr">303 </span>] +<span id="L304" class="LineNr">304 </span><span class="muRecipe">def</span> use-space [ +<span id="L305" class="LineNr">305 </span> local-scope +<span id="L306" class="LineNr">306 </span> <span class="Constant">0</span>:space/names:create-space<span class="Special"> <- </span>next-ingredient +<span id="L307" class="LineNr">307 </span> <span class="Normal">n</span>:&:num/space:<span class="Constant">1</span><span class="Special"> <- </span>next-ingredient <span class="Comment"># should decrement refcount</span> +<span id="L308" class="LineNr">308 </span> *n/space:<span class="Constant">1</span><span class="Special"> <- </span>copy <span class="Constant">34</span> +<span id="L309" class="LineNr">309 </span> <span class="Normal">n2</span>:num<span class="Special"> <- </span>add *n/space:<span class="Constant">1</span><span class="Delimiter">,</span> <span class="Constant">1</span> +<span id="L310" class="LineNr">310 </span> <span class="Identifier">return</span> n2 +<span id="L311" class="LineNr">311 </span>] +<span id="L312" class="LineNr">312 </span><span class="muRecipe">def</span> <a href='000organization.cc.html#L113'>main</a> [ +<span id="L313" class="LineNr">313 </span> local-scope +<span id="L314" class="LineNr">314 </span> <span class="Normal">n</span>:&:num<span class="Special"> <- </span>copy <span class="Constant">12000</span>/unsafe <span class="Comment"># pretend allocation with a known address</span> +<span id="L315" class="LineNr">315 </span> *n<span class="Special"> <- </span>copy <span class="Constant">23</span> +<span id="L316" class="LineNr">316 </span> <span class="Normal">space</span>:space<span class="Special"> <- </span>create-space n +<span id="L317" class="LineNr">317 </span> <span class="Normal">n2</span>:&:num<span class="Special"> <- </span>copy <span class="Constant">13000</span>/unsafe +<span id="L318" class="LineNr">318 </span> <span class="Normal">n3</span>:num<span class="Special"> <- </span>use-space space<span class="Delimiter">,</span> n2 +<span id="L319" class="LineNr">319 </span>] +<span id="L320" class="LineNr">320 </span><span class="traceContains">+run: {n: ("address" "number"), "space": "1"} <- next-ingredient</span> +<span id="L321" class="LineNr">321 </span><span class="traceContains">+mem: decrementing refcount of 12000: 2 -> 1</span> +<span id="L322" class="LineNr">322 </span><span class="traceContains">+run: {n: ("address" "number"), "space": "1", "lookup": ()} <- copy {34: "literal"}</span> +<span id="L323" class="LineNr">323 </span> +<span id="L324" class="LineNr">324 </span><span class="Comment">//: back to testing 'start-running'</span> +<span id="L325" class="LineNr">325 </span> +<span id="L326" class="LineNr">326 </span><span class="Delimiter">:(scenario start_running_returns_routine_id)</span> +<span id="L327" class="LineNr">327 </span><span class="muRecipe">def</span> f1 [ +<span id="L328" class="LineNr">328 </span> <span class="Constant">1</span>:num<span class="Special"> <- </span>start-running f2 +<span id="L329" class="LineNr">329 </span>] +<span id="L330" class="LineNr">330 </span><span class="muRecipe">def</span> f2 [ +<span id="L331" class="LineNr">331 </span> <span class="Constant">12</span>:num<span class="Special"> <- </span>copy <span class="Constant">44</span> +<span id="L332" class="LineNr">332 </span>] +<span id="L333" class="LineNr">333 </span><span class="traceContains">+mem: storing 2 in location 1</span> +<span id="L334" class="LineNr">334 </span> +<span id="L335" class="LineNr">335 </span><span class="Comment">//: this scenario will require some careful setup in escaped C++</span> +<span id="L336" class="LineNr">336 </span><span class="Comment">//: (straining our tangle capabilities to near-breaking point)</span> +<span id="L337" class="LineNr">337 </span><span class="Delimiter">:(scenario scheduler_skips_completed_routines)</span> +<span id="L338" class="LineNr">338 </span><span class="Special">% <a href='010vm.cc.html#L14'>recipe_ordinal</a> f1 = load("recipe f1 [\n1:num <- copy 0\n]\n").front();</span> +<span id="L339" class="LineNr">339 </span><span class="Special">% <a href='010vm.cc.html#L14'>recipe_ordinal</a> f2 = load("recipe f2 [\n2:num <- copy 0\n]\n").front();</span> +<span id="L340" class="LineNr">340 </span><span class="Special">% Routines.push_back(new routine(f1)); // f1 meant to run</span> +<span id="L341" class="LineNr">341 </span><span class="Special">% Routines.push_back(new routine(f2));</span> +<span id="L342" class="LineNr">342 </span><span class="Special">% Routines.back()->state = COMPLETED; // f2 not meant to run</span> +<span id="L343" class="LineNr">343 </span><span class="Comment"># must have at least one routine without escaping</span> +<span id="L344" class="LineNr">344 </span><span class="muRecipe">def</span> f3 [ +<span id="L345" class="LineNr">345 </span> <span class="Constant">3</span>:num<span class="Special"> <- </span>copy <span class="Constant">0</span> <span id="L346" class="LineNr">346 </span>] -<span id="L347" class="LineNr">347 </span><span class="traceContains">+mem: storing 2 in location 1</span> -<span id="L348" class="LineNr">348 </span> -<span id="L349" class="LineNr">349 </span><span class="Comment">//: this scenario will require some careful setup in escaped C++</span> -<span id="L350" class="LineNr">350 </span><span class="Comment">//: (straining our tangle capabilities to near-breaking point)</span> -<span id="L351" class="LineNr">351 </span><span class="Delimiter">:(scenario scheduler_skips_completed_routines)</span> -<span id="L352" class="LineNr">352 </span><span class="Special">% <a href='010vm.cc.html#L14'>recipe_ordinal</a> f1 = load("recipe f1 [\n1:num <- copy 0\n]\n").front();</span> -<span id="L353" class="LineNr">353 </span><span class="Special">% <a href='010vm.cc.html#L14'>recipe_ordinal</a> f2 = load("recipe f2 [\n2:num <- copy 0\n]\n").front();</span> -<span id="L354" class="LineNr">354 </span><span class="Special">% Routines.push_back(new routine(f1)); // f1 meant to run</span> -<span id="L355" class="LineNr">355 </span><span class="Special">% Routines.push_back(new routine(f2));</span> -<span id="L356" class="LineNr">356 </span><span class="Special">% Routines.back()->state = COMPLETED; // f2 not meant to run</span> -<span id="L357" class="LineNr">357 </span><span class="Comment"># must have at least one routine without escaping</span> -<span id="L358" class="LineNr">358 </span><span class="muRecipe">def</span> f3 [ -<span id="L359" class="LineNr">359 </span> <span class="Constant">3</span>:num<span class="Special"> <- </span>copy <span class="Constant">0</span> -<span id="L360" class="LineNr">360 </span>] -<span id="L361" class="LineNr">361 </span><span class="Comment"># by interleaving '+' lines with '-' lines, we allow f1 and f3 to run in any order</span> +<span id="L347" class="LineNr">347 </span><span class="Comment"># by interleaving '+' lines with '-' lines, we allow f1 and f3 to run in any order</span> +<span id="L348" class="LineNr">348 </span><span class="traceContains">+schedule: f1</span> +<span id="L349" class="LineNr">349 </span><span class="traceContains">+mem: storing 0 in location 1</span> +<span id="L350" class="LineNr">350 </span><span class="traceAbsent">-schedule: f2</span> +<span id="L351" class="LineNr">351 </span><span class="traceAbsent">-mem: storing 0 in location 2</span> +<span id="L352" class="LineNr">352 </span><span class="traceContains">+schedule: f3</span> +<span id="L353" class="LineNr">353 </span><span class="traceContains">+mem: storing 0 in location 3</span> +<span id="L354" class="LineNr">354 </span> +<span id="L355" class="LineNr">355 </span><span class="Delimiter">:(scenario scheduler_starts_at_middle_of_routines)</span> +<span id="L356" class="LineNr">356 </span><span class="Special">% Routines.push_back(new routine(COPY));</span> +<span id="L357" class="LineNr">357 </span><span class="Special">% Routines.back()->state = COMPLETED;</span> +<span id="L358" class="LineNr">358 </span><span class="muRecipe">def</span> f1 [ +<span id="L359" class="LineNr">359 </span> <span class="Constant">1</span>:num<span class="Special"> <- </span>copy <span class="Constant">0</span> +<span id="L360" class="LineNr">360 </span> <span class="Constant">2</span>:num<span class="Special"> <- </span>copy <span class="Constant">0</span> +<span id="L361" class="LineNr">361 </span>] <span id="L362" class="LineNr">362 </span><span class="traceContains">+schedule: f1</span> -<span id="L363" class="LineNr">363 </span><span class="traceContains">+mem: storing 0 in location 1</span> -<span id="L364" class="LineNr">364 </span><span class="traceAbsent">-schedule: f2</span> -<span id="L365" class="LineNr">365 </span><span class="traceAbsent">-mem: storing 0 in location 2</span> -<span id="L366" class="LineNr">366 </span><span class="traceContains">+schedule: f3</span> -<span id="L367" class="LineNr">367 </span><span class="traceContains">+mem: storing 0 in location 3</span> -<span id="L368" class="LineNr">368 </span> -<span id="L369" class="LineNr">369 </span><span class="Delimiter">:(scenario scheduler_starts_at_middle_of_routines)</span> -<span id="L370" class="LineNr">370 </span><span class="Special">% Routines.push_back(new routine(COPY));</span> -<span id="L371" class="LineNr">371 </span><span class="Special">% Routines.back()->state = COMPLETED;</span> -<span id="L372" class="LineNr">372 </span><span class="muRecipe">def</span> f1 [ -<span id="L373" class="LineNr">373 </span> <span class="Constant">1</span>:num<span class="Special"> <- </span>copy <span class="Constant">0</span> -<span id="L374" class="LineNr">374 </span> <span class="Constant">2</span>:num<span class="Special"> <- </span>copy <span class="Constant">0</span> -<span id="L375" class="LineNr">375 </span>] -<span id="L376" class="LineNr">376 </span><span class="traceContains">+schedule: f1</span> -<span id="L377" class="LineNr">377 </span><span class="traceAbsent">-run: idle</span> -<span id="L378" class="LineNr">378 </span> -<span id="L379" class="LineNr">379 </span><span class="SalientComment">//:: Errors in a routine cause it to terminate.</span> -<span id="L380" class="LineNr">380 </span> -<span id="L381" class="LineNr">381 </span><span class="Delimiter">:(scenario scheduler_terminates_routines_after_errors)</span> -<span id="L382" class="LineNr">382 </span><span class="Special">% Hide_errors = true;</span> -<span id="L383" class="LineNr">383 </span><span class="Special">% Scheduling_interval = 2;</span> -<span id="L384" class="LineNr">384 </span><span class="muRecipe">def</span> f1 [ -<span id="L385" class="LineNr">385 </span> start-running f2 -<span id="L386" class="LineNr">386 </span> <span class="Constant">1</span>:num<span class="Special"> <- </span>copy <span class="Constant">0</span> -<span id="L387" class="LineNr">387 </span> <span class="Constant">2</span>:num<span class="Special"> <- </span>copy <span class="Constant">0</span> -<span id="L388" class="LineNr">388 </span>] -<span id="L389" class="LineNr">389 </span><span class="muRecipe">def</span> f2 [ -<span id="L390" class="LineNr">390 </span> <span class="Comment"># divide by 0 twice</span> -<span id="L391" class="LineNr">391 </span> <span class="Constant">3</span>:num<span class="Special"> <- </span>divide-with-remainder <span class="Constant">4</span><span class="Delimiter">,</span> <span class="Constant">0</span> -<span id="L392" class="LineNr">392 </span> <span class="Constant">4</span>:num<span class="Special"> <- </span>divide-with-remainder <span class="Constant">4</span><span class="Delimiter">,</span> <span class="Constant">0</span> -<span id="L393" class="LineNr">393 </span>] -<span id="L394" class="LineNr">394 </span><span class="Comment"># f2 should stop after first divide by 0</span> -<span id="L395" class="LineNr">395 </span><span class="traceContains">+error: f2: divide by zero in '3:num <- divide-with-remainder 4, 0'</span> -<span id="L396" class="LineNr">396 </span><span class="traceAbsent">-error: f2: divide by zero in '4:num <- divide-with-remainder 4, 0'</span> -<span id="L397" class="LineNr">397 </span> -<span id="L398" class="LineNr">398 </span><span class="Delimiter">:(after "operator<<(ostream& os, <a href='001help.cc.html#L258'>unused</a> end)")</span> -<span id="L399" class="LineNr">399 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>Trace_stream && Trace_stream<span class="Delimiter">-></span>curr_label == <span class="Constant">"error"</span> && Current_routine<span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L400" class="LineNr">400 </span> <span class="Conceal">¦</span> Current_routine<span class="Delimiter">-></span>state = <a href='072scheduler.cc.html#L42'>COMPLETED</a><span class="Delimiter">;</span> -<span id="L401" class="LineNr">401 </span> <span class="Delimiter">}</span> -<span id="L402" class="LineNr">402 </span> -<span id="L403" class="LineNr">403 </span><span class="SalientComment">//:: Routines are marked completed when their parent completes.</span> -<span id="L404" class="LineNr">404 </span> -<span id="L405" class="LineNr">405 </span><span class="Delimiter">:(scenario scheduler_kills_orphans)</span> -<span id="L406" class="LineNr">406 </span><span class="muRecipe">def</span> <a href='000organization.cc.html#L113'>main</a> [ -<span id="L407" class="LineNr">407 </span> start-running f1 -<span id="L408" class="LineNr">408 </span> <span class="Comment"># f1 never actually runs because its parent completes without waiting for it</span> -<span id="L409" class="LineNr">409 </span>] -<span id="L410" class="LineNr">410 </span><span class="muRecipe">def</span> f1 [ -<span id="L411" class="LineNr">411 </span> <span class="Constant">1</span>:num<span class="Special"> <- </span>copy <span class="Constant">0</span> -<span id="L412" class="LineNr">412 </span>] -<span id="L413" class="LineNr">413 </span><span class="traceAbsent">-schedule: f1</span> -<span id="L414" class="LineNr">414 </span> -<span id="L415" class="LineNr">415 </span><span class="Delimiter">:(before "End Scheduler Cleanup")</span> -<span id="L416" class="LineNr">416 </span><span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>Routines<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L417" class="LineNr">417 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>state == <a href='072scheduler.cc.html#L42'>COMPLETED</a><span class="Delimiter">)</span> <span class="Identifier">continue</span><span class="Delimiter">;</span> -<span id="L418" class="LineNr">418 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>parent_index < <span class="Constant">0</span><span class="Delimiter">)</span> <span class="Identifier">continue</span><span class="Delimiter">;</span> <span class="Comment">// root thread</span> -<span id="L419" class="LineNr">419 </span> <span class="Comment">// structured concurrency: <a href="http://250bpm.com/blog:71">http://250bpm.com/blog:71</a></span> -<span id="L420" class="LineNr">420 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>has_completed_parent<span class="Delimiter">(</span>i<span class="Delimiter">))</span> <span class="Delimiter">{</span> -<span id="L421" class="LineNr">421 </span> <span class="Conceal">¦</span> Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>state = <a href='072scheduler.cc.html#L42'>COMPLETED</a><span class="Delimiter">;</span> -<span id="L422" class="LineNr">422 </span> <span class="Delimiter">}</span> -<span id="L423" class="LineNr">423 </span><span class="Delimiter">}</span> -<span id="L424" class="LineNr">424 </span> -<span id="L425" class="LineNr">425 </span><span class="Delimiter">:(code)</span> -<span id="L426" class="LineNr">426 </span><span class="Normal">bool</span> has_completed_parent<span class="Delimiter">(</span><span class="Normal">int</span> routine_index<span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L427" class="LineNr">427 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> j = routine_index<span class="Delimiter">;</span> j >= <span class="Constant">0</span><span class="Delimiter">;</span> j = Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>j<span class="Delimiter">)-></span>parent_index<span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L428" class="LineNr">428 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>j<span class="Delimiter">)-></span>state == <a href='072scheduler.cc.html#L42'>COMPLETED</a><span class="Delimiter">)</span> -<span id="L429" class="LineNr">429 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Identifier">return</span> <span class="Constant">true</span><span class="Delimiter">;</span> -<span id="L430" class="LineNr">430 </span> <span class="Delimiter">}</span> -<span id="L431" class="LineNr">431 </span> <span class="Identifier">return</span> <span class="Constant">false</span><span class="Delimiter">;</span> -<span id="L432" class="LineNr">432 </span><span class="Delimiter">}</span> -<span id="L433" class="LineNr">433 </span> -<span id="L434" class="LineNr">434 </span><span class="SalientComment">//:: 'routine-state' can tell if a given routine id is running</span> -<span id="L435" class="LineNr">435 </span> -<span id="L436" class="LineNr">436 </span><span class="Delimiter">:(scenario routine_state_test)</span> -<span id="L437" class="LineNr">437 </span><span class="Special">% Scheduling_interval = 2;</span> -<span id="L438" class="LineNr">438 </span><span class="muRecipe">def</span> f1 [ -<span id="L439" class="LineNr">439 </span> <span class="Constant">1</span>:num/child-id<span class="Special"> <- </span>start-running f2 -<span id="L440" class="LineNr">440 </span> <span class="Constant">12</span>:num<span class="Special"> <- </span>copy <span class="Constant">0</span> <span class="Comment"># race condition since we don't care about location 12</span> -<span id="L441" class="LineNr">441 </span> <span class="Comment"># thanks to Scheduling_interval, f2's one instruction runs in between here and completes</span> -<span id="L442" class="LineNr">442 </span> <span class="Constant">2</span>:num/state<span class="Special"> <- </span>routine-state <span class="Constant">1</span>:num/child-id -<span id="L443" class="LineNr">443 </span>] -<span id="L444" class="LineNr">444 </span><span class="muRecipe">def</span> f2 [ -<span id="L445" class="LineNr">445 </span> <span class="Constant">12</span>:num<span class="Special"> <- </span>copy <span class="Constant">0</span> -<span id="L446" class="LineNr">446 </span> <span class="Comment"># trying to run a second instruction marks routine as completed</span> -<span id="L447" class="LineNr">447 </span>] -<span id="L448" class="LineNr">448 </span><span class="Comment"># recipe f2 should be in state COMPLETED</span> -<span id="L449" class="LineNr">449 </span><span class="traceContains">+mem: storing 1 in location 2</span> -<span id="L450" class="LineNr">450 </span> -<span id="L451" class="LineNr">451 </span><span class="Delimiter">:(before "End Primitive Recipe Declarations")</span> -<span id="L452" class="LineNr">452 </span>ROUTINE_STATE<span class="Delimiter">,</span> -<span id="L453" class="LineNr">453 </span><span class="Delimiter">:(before "End Primitive Recipe Numbers")</span> -<span id="L454" class="LineNr">454 </span><a href='001help.cc.html#L221'>put</a><span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> <span class="Constant">"routine-state"</span><span class="Delimiter">,</span> ROUTINE_STATE<span class="Delimiter">);</span> -<span id="L455" class="LineNr">455 </span><span class="Delimiter">:(before "End Primitive Recipe Checks")</span> -<span id="L456" class="LineNr">456 </span><span class="Normal">case</span> ROUTINE_STATE: <span class="Delimiter">{</span> -<span id="L457" class="LineNr">457 </span> <span class="Normal">if</span> <span class="Delimiter">(</span><a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">)</span> != <span class="Constant">1</span><span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L458" class="LineNr">458 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L168'>raise</a> << <a href='013update_operation.cc.html#L25'>maybe</a><span class="Delimiter">(</span>get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">).</span>name<span class="Delimiter">)</span> << <span class="Constant">"'routine-state' requires exactly one ingredient, but got '"</span> << to_original_string<span class="Delimiter">(</span>inst<span class="Delimiter">)</span> << <span class="Constant">"'</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> -<span id="L459" class="LineNr">459 </span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> -<span id="L460" class="LineNr">460 </span> <span class="Delimiter">}</span> -<span id="L461" class="LineNr">461 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>!is_mu_number<span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">)))</span> <span class="Delimiter">{</span> -<span id="L462" class="LineNr">462 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L168'>raise</a> << <a href='013update_operation.cc.html#L25'>maybe</a><span class="Delimiter">(</span>get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">).</span>name<span class="Delimiter">)</span> << <span class="Constant">"first ingredient of 'routine-state' should be a routine id generated by 'start-running', but got '"</span> << inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>original_string << <span class="Constant">"'</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> -<span id="L463" class="LineNr">463 </span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> -<span id="L464" class="LineNr">464 </span> <span class="Delimiter">}</span> +<span id="L363" class="LineNr">363 </span><span class="traceAbsent">-run: idle</span> +<span id="L364" class="LineNr">364 </span> +<span id="L365" class="LineNr">365 </span><span class="SalientComment">//:: Errors in a routine cause it to terminate.</span> +<span id="L366" class="LineNr">366 </span> +<span id="L367" class="LineNr">367 </span><span class="Delimiter">:(scenario scheduler_terminates_routines_after_errors)</span> +<span id="L368" class="LineNr">368 </span><span class="Special">% Hide_errors = true;</span> +<span id="L369" class="LineNr">369 </span><span class="Special">% Scheduling_interval = 2;</span> +<span id="L370" class="LineNr">370 </span><span class="muRecipe">def</span> f1 [ +<span id="L371" class="LineNr">371 </span> start-running f2 +<span id="L372" class="LineNr">372 </span> <span class="Constant">1</span>:num<span class="Special"> <- </span>copy <span class="Constant">0</span> +<span id="L373" class="LineNr">373 </span> <span class="Constant">2</span>:num<span class="Special"> <- </span>copy <span class="Constant">0</span> +<span id="L374" class="LineNr">374 </span>] +<span id="L375" class="LineNr">375 </span><span class="muRecipe">def</span> f2 [ +<span id="L376" class="LineNr">376 </span> <span class="Comment"># divide by 0 twice</span> +<span id="L377" class="LineNr">377 </span> <span class="Constant">3</span>:num<span class="Special"> <- </span>divide-with-remainder <span class="Constant">4</span><span class="Delimiter">,</span> <span class="Constant">0</span> +<span id="L378" class="LineNr">378 </span> <span class="Constant">4</span>:num<span class="Special"> <- </span>divide-with-remainder <span class="Constant">4</span><span class="Delimiter">,</span> <span class="Constant">0</span> +<span id="L379" class="LineNr">379 </span>] +<span id="L380" class="LineNr">380 </span><span class="Comment"># f2 should stop after first divide by 0</span> +<span id="L381" class="LineNr">381 </span><span class="traceContains">+error: f2: divide by zero in '3:num <- divide-with-remainder 4, 0'</span> +<span id="L382" class="LineNr">382 </span><span class="traceAbsent">-error: f2: divide by zero in '4:num <- divide-with-remainder 4, 0'</span> +<span id="L383" class="LineNr">383 </span> +<span id="L384" class="LineNr">384 </span><span class="Delimiter">:(after "operator<<(ostream& os, <a href='001help.cc.html#L258'>unused</a> end)")</span> +<span id="L385" class="LineNr">385 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>Trace_stream && Trace_stream<span class="Delimiter">-></span>curr_label == <span class="Constant">"error"</span> && Current_routine<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L386" class="LineNr">386 </span> <span class="Conceal">¦</span> Current_routine<span class="Delimiter">-></span>state = <a href='073scheduler.cc.html#L42'>COMPLETED</a><span class="Delimiter">;</span> +<span id="L387" class="LineNr">387 </span> <span class="Delimiter">}</span> +<span id="L388" class="LineNr">388 </span> +<span id="L389" class="LineNr">389 </span><span class="SalientComment">//:: Routines are marked completed when their parent completes.</span> +<span id="L390" class="LineNr">390 </span> +<span id="L391" class="LineNr">391 </span><span class="Delimiter">:(scenario scheduler_kills_orphans)</span> +<span id="L392" class="LineNr">392 </span><span class="muRecipe">def</span> <a href='000organization.cc.html#L113'>main</a> [ +<span id="L393" class="LineNr">393 </span> start-running f1 +<span id="L394" class="LineNr">394 </span> <span class="Comment"># f1 never actually runs because its parent completes without waiting for it</span> +<span id="L395" class="LineNr">395 </span>] +<span id="L396" class="LineNr">396 </span><span class="muRecipe">def</span> f1 [ +<span id="L397" class="LineNr">397 </span> <span class="Constant">1</span>:num<span class="Special"> <- </span>copy <span class="Constant">0</span> +<span id="L398" class="LineNr">398 </span>] +<span id="L399" class="LineNr">399 </span><span class="traceAbsent">-schedule: f1</span> +<span id="L400" class="LineNr">400 </span> +<span id="L401" class="LineNr">401 </span><span class="Delimiter">:(before "End Scheduler Cleanup")</span> +<span id="L402" class="LineNr">402 </span><span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>Routines<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L403" class="LineNr">403 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>state == <a href='073scheduler.cc.html#L42'>COMPLETED</a><span class="Delimiter">)</span> <span class="Identifier">continue</span><span class="Delimiter">;</span> +<span id="L404" class="LineNr">404 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>parent_index < <span class="Constant">0</span><span class="Delimiter">)</span> <span class="Identifier">continue</span><span class="Delimiter">;</span> <span class="Comment">// root thread</span> +<span id="L405" class="LineNr">405 </span> <span class="Comment">// structured concurrency: <a href="http://250bpm.com/blog:71">http://250bpm.com/blog:71</a></span> +<span id="L406" class="LineNr">406 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>has_completed_parent<span class="Delimiter">(</span>i<span class="Delimiter">))</span> <span class="Delimiter">{</span> +<span id="L407" class="LineNr">407 </span> <span class="Conceal">¦</span> Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>state = <a href='073scheduler.cc.html#L42'>COMPLETED</a><span class="Delimiter">;</span> +<span id="L408" class="LineNr">408 </span> <span class="Delimiter">}</span> +<span id="L409" class="LineNr">409 </span><span class="Delimiter">}</span> +<span id="L410" class="LineNr">410 </span> +<span id="L411" class="LineNr">411 </span><span class="Delimiter">:(code)</span> +<span id="L412" class="LineNr">412 </span><span class="Normal">bool</span> has_completed_parent<span class="Delimiter">(</span><span class="Normal">int</span> routine_index<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L413" class="LineNr">413 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> j = routine_index<span class="Delimiter">;</span> j >= <span class="Constant">0</span><span class="Delimiter">;</span> j = Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>j<span class="Delimiter">)-></span>parent_index<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L414" class="LineNr">414 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>j<span class="Delimiter">)-></span>state == <a href='073scheduler.cc.html#L42'>COMPLETED</a><span class="Delimiter">)</span> +<span id="L415" class="LineNr">415 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Identifier">return</span> <span class="Constant">true</span><span class="Delimiter">;</span> +<span id="L416" class="LineNr">416 </span> <span class="Delimiter">}</span> +<span id="L417" class="LineNr">417 </span> <span class="Identifier">return</span> <span class="Constant">false</span><span class="Delimiter">;</span> +<span id="L418" class="LineNr">418 </span><span class="Delimiter">}</span> +<span id="L419" class="LineNr">419 </span> +<span id="L420" class="LineNr">420 </span><span class="SalientComment">//:: 'routine-state' can tell if a given routine id is running</span> +<span id="L421" class="LineNr">421 </span> +<span id="L422" class="LineNr">422 </span><span class="Delimiter">:(scenario routine_state_test)</span> +<span id="L423" class="LineNr">423 </span><span class="Special">% Scheduling_interval = 2;</span> +<span id="L424" class="LineNr">424 </span><span class="muRecipe">def</span> f1 [ +<span id="L425" class="LineNr">425 </span> <span class="Constant">1</span>:num/child-id<span class="Special"> <- </span>start-running f2 +<span id="L426" class="LineNr">426 </span> <span class="Constant">12</span>:num<span class="Special"> <- </span>copy <span class="Constant">0</span> <span class="Comment"># race condition since we don't care about location 12</span> +<span id="L427" class="LineNr">427 </span> <span class="Comment"># thanks to Scheduling_interval, f2's one instruction runs in between here and completes</span> +<span id="L428" class="LineNr">428 </span> <span class="Constant">2</span>:num/state<span class="Special"> <- </span>routine-state <span class="Constant">1</span>:num/child-id +<span id="L429" class="LineNr">429 </span>] +<span id="L430" class="LineNr">430 </span><span class="muRecipe">def</span> f2 [ +<span id="L431" class="LineNr">431 </span> <span class="Constant">12</span>:num<span class="Special"> <- </span>copy <span class="Constant">0</span> +<span id="L432" class="LineNr">432 </span> <span class="Comment"># trying to run a second instruction marks routine as completed</span> +<span id="L433" class="LineNr">433 </span>] +<span id="L434" class="LineNr">434 </span><span class="Comment"># recipe f2 should be in state COMPLETED</span> +<span id="L435" class="LineNr">435 </span><span class="traceContains">+mem: storing 1 in location 2</span> +<span id="L436" class="LineNr">436 </span> +<span id="L437" class="LineNr">437 </span><span class="Delimiter">:(before "End Primitive Recipe Declarations")</span> +<span id="L438" class="LineNr">438 </span>ROUTINE_STATE<span class="Delimiter">,</span> +<span id="L439" class="LineNr">439 </span><span class="Delimiter">:(before "End Primitive Recipe Numbers")</span> +<span id="L440" class="LineNr">440 </span><a href='001help.cc.html#L221'>put</a><span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> <span class="Constant">"routine-state"</span><span class="Delimiter">,</span> ROUTINE_STATE<span class="Delimiter">);</span> +<span id="L441" class="LineNr">441 </span><span class="Delimiter">:(before "End Primitive Recipe Checks")</span> +<span id="L442" class="LineNr">442 </span><span class="Normal">case</span> ROUTINE_STATE: <span class="Delimiter">{</span> +<span id="L443" class="LineNr">443 </span> <span class="Normal">if</span> <span class="Delimiter">(</span><a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">)</span> != <span class="Constant">1</span><span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L444" class="LineNr">444 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L168'>raise</a> << <a href='013update_operation.cc.html#L25'>maybe</a><span class="Delimiter">(</span>get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">).</span>name<span class="Delimiter">)</span> << <span class="Constant">"'routine-state' requires exactly one ingredient, but got '"</span> << to_original_string<span class="Delimiter">(</span>inst<span class="Delimiter">)</span> << <span class="Constant">"'</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> +<span id="L445" class="LineNr">445 </span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> +<span id="L446" class="LineNr">446 </span> <span class="Delimiter">}</span> +<span id="L447" class="LineNr">447 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>!is_mu_number<span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">)))</span> <span class="Delimiter">{</span> +<span id="L448" class="LineNr">448 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L168'>raise</a> << <a href='013update_operation.cc.html#L25'>maybe</a><span class="Delimiter">(</span>get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">).</span>name<span class="Delimiter">)</span> << <span class="Constant">"first ingredient of 'routine-state' should be a routine id generated by 'start-running', but got '"</span> << inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>original_string << <span class="Constant">"'</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> +<span id="L449" class="LineNr">449 </span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> +<span id="L450" class="LineNr">450 </span> <span class="Delimiter">}</span> +<span id="L451" class="LineNr">451 </span> <span class="Identifier">break</span><span class="Delimiter">;</span> +<span id="L452" class="LineNr">452 </span><span class="Delimiter">}</span> +<span id="L453" class="LineNr">453 </span><span class="Delimiter">:(before "End Primitive Recipe Implementations")</span> +<span id="L454" class="LineNr">454 </span><span class="Normal">case</span> ROUTINE_STATE: <span class="Delimiter">{</span> +<span id="L455" class="LineNr">455 </span> <span class="Normal">int</span> id = ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">);</span> +<span id="L456" class="LineNr">456 </span> <span class="Normal">int</span> result = -<span class="Constant">1</span><span class="Delimiter">;</span> +<span id="L457" class="LineNr">457 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>Routines<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L458" class="LineNr">458 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>id == id<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L459" class="LineNr">459 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> result = Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>state<span class="Delimiter">;</span> +<span id="L460" class="LineNr">460 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> +<span id="L461" class="LineNr">461 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span> +<span id="L462" class="LineNr">462 </span> <span class="Delimiter">}</span> +<span id="L463" class="LineNr">463 </span> products<span class="Delimiter">.</span>resize<span class="Delimiter">(</span><span class="Constant">1</span><span class="Delimiter">);</span> +<span id="L464" class="LineNr">464 </span> products<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>push_back<span class="Delimiter">(</span>result<span class="Delimiter">);</span> <span id="L465" class="LineNr">465 </span> <span class="Identifier">break</span><span class="Delimiter">;</span> <span id="L466" class="LineNr">466 </span><span class="Delimiter">}</span> -<span id="L467" class="LineNr">467 </span><span class="Delimiter">:(before "End Primitive Recipe Implementations")</span> -<span id="L468" class="LineNr">468 </span><span class="Normal">case</span> ROUTINE_STATE: <span class="Delimiter">{</span> -<span id="L469" class="LineNr">469 </span> <span class="Normal">int</span> id = ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">);</span> -<span id="L470" class="LineNr">470 </span> <span class="Normal">int</span> result = -<span class="Constant">1</span><span class="Delimiter">;</span> -<span id="L471" class="LineNr">471 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>Routines<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L472" class="LineNr">472 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>id == id<span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L473" class="LineNr">473 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> result = Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>state<span class="Delimiter">;</span> -<span id="L474" class="LineNr">474 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> -<span id="L475" class="LineNr">475 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span> -<span id="L476" class="LineNr">476 </span> <span class="Delimiter">}</span> -<span id="L477" class="LineNr">477 </span> products<span class="Delimiter">.</span>resize<span class="Delimiter">(</span><span class="Constant">1</span><span class="Delimiter">);</span> -<span id="L478" class="LineNr">478 </span> products<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>push_back<span class="Delimiter">(</span>result<span class="Delimiter">);</span> -<span id="L479" class="LineNr">479 </span> <span class="Identifier">break</span><span class="Delimiter">;</span> -<span id="L480" class="LineNr">480 </span><span class="Delimiter">}</span> -<span id="L481" class="LineNr">481 </span> -<span id="L482" class="LineNr">482 </span><span class="SalientComment">//:: miscellaneous helpers</span> -<span id="L483" class="LineNr">483 </span> -<span id="L484" class="LineNr">484 </span><span class="Delimiter">:(before "End Primitive Recipe Declarations")</span> -<span id="L485" class="LineNr">485 </span>STOP<span class="Delimiter">,</span> -<span id="L486" class="LineNr">486 </span><span class="Delimiter">:(before "End Primitive Recipe Numbers")</span> -<span id="L487" class="LineNr">487 </span><a href='001help.cc.html#L221'>put</a><span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> <span class="Constant">"stop"</span><span class="Delimiter">,</span> STOP<span class="Delimiter">);</span> -<span id="L488" class="LineNr">488 </span><span class="Delimiter">:(before "End Primitive Recipe Checks")</span> -<span id="L489" class="LineNr">489 </span><span class="Normal">case</span> STOP: <span class="Delimiter">{</span> -<span id="L490" class="LineNr">490 </span> <span class="Normal">if</span> <span class="Delimiter">(</span><a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">)</span> != <span class="Constant">1</span><span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L491" class="LineNr">491 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L168'>raise</a> << <a href='013update_operation.cc.html#L25'>maybe</a><span class="Delimiter">(</span>get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">).</span>name<span class="Delimiter">)</span> << <span class="Constant">"'stop' requires exactly one ingredient, but got '"</span> << to_original_string<span class="Delimiter">(</span>inst<span class="Delimiter">)</span> << <span class="Constant">"'</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> -<span id="L492" class="LineNr">492 </span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> -<span id="L493" class="LineNr">493 </span> <span class="Delimiter">}</span> -<span id="L494" class="LineNr">494 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>!is_mu_number<span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">)))</span> <span class="Delimiter">{</span> -<span id="L495" class="LineNr">495 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L168'>raise</a> << <a href='013update_operation.cc.html#L25'>maybe</a><span class="Delimiter">(</span>get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">).</span>name<span class="Delimiter">)</span> << <span class="Constant">"first ingredient of 'stop' should be a routine id generated by 'start-running', but got '"</span> << inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>original_string << <span class="Constant">"'</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> -<span id="L496" class="LineNr">496 </span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> -<span id="L497" class="LineNr">497 </span> <span class="Delimiter">}</span> -<span id="L498" class="LineNr">498 </span> <span class="Identifier">break</span><span class="Delimiter">;</span> -<span id="L499" class="LineNr">499 </span><span class="Delimiter">}</span> -<span id="L500" class="LineNr">500 </span><span class="Delimiter">:(before "End Primitive Recipe Implementations")</span> -<span id="L501" class="LineNr">501 </span><span class="Normal">case</span> STOP: <span class="Delimiter">{</span> -<span id="L502" class="LineNr">502 </span> <span class="Normal">int</span> id = ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">);</span> -<span id="L503" class="LineNr">503 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>Routines<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L504" class="LineNr">504 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>id == id<span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L505" class="LineNr">505 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>state = <a href='072scheduler.cc.html#L42'>COMPLETED</a><span class="Delimiter">;</span> -<span id="L506" class="LineNr">506 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> -<span id="L507" class="LineNr">507 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span> -<span id="L508" class="LineNr">508 </span> <span class="Delimiter">}</span> -<span id="L509" class="LineNr">509 </span> <span class="Identifier">break</span><span class="Delimiter">;</span> -<span id="L510" class="LineNr">510 </span><span class="Delimiter">}</span> -<span id="L511" class="LineNr">511 </span> -<span id="L512" class="LineNr">512 </span><span class="Delimiter">:(before "End Primitive Recipe Declarations")</span> -<span id="L513" class="LineNr">513 </span>_DUMP_ROUTINES<span class="Delimiter">,</span> -<span id="L514" class="LineNr">514 </span><span class="Delimiter">:(before "End Primitive Recipe Numbers")</span> -<span id="L515" class="LineNr">515 </span><a href='001help.cc.html#L221'>put</a><span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> <span class="Constant">"$dump-routines"</span><span class="Delimiter">,</span> _DUMP_ROUTINES<span class="Delimiter">);</span> -<span id="L516" class="LineNr">516 </span><span class="Delimiter">:(before "End Primitive Recipe Checks")</span> -<span id="L517" class="LineNr">517 </span><span class="Normal">case</span> _DUMP_ROUTINES: <span class="Delimiter">{</span> -<span id="L518" class="LineNr">518 </span> <span class="Identifier">break</span><span class="Delimiter">;</span> -<span id="L519" class="LineNr">519 </span><span class="Delimiter">}</span> -<span id="L520" class="LineNr">520 </span><span class="Delimiter">:(before "End Primitive Recipe Implementations")</span> -<span id="L521" class="LineNr">521 </span><span class="Normal">case</span> _DUMP_ROUTINES: <span class="Delimiter">{</span> -<span id="L522" class="LineNr">522 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>Routines<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L523" class="LineNr">523 </span> <span class="Conceal">¦</span> cerr << i << <span class="Constant">": "</span> << Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>id << <span class="Constant">' '</span> << Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>state << <span class="Constant">' '</span> << Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>parent_index << <span class="cSpecial">'\n'</span><span class="Delimiter">;</span> -<span id="L524" class="LineNr">524 </span> <span class="Delimiter">}</span> -<span id="L525" class="LineNr">525 </span> <span class="Identifier">break</span><span class="Delimiter">;</span> -<span id="L526" class="LineNr">526 </span><span class="Delimiter">}</span> -<span id="L527" class="LineNr">527 </span> -<span id="L528" class="LineNr">528 </span><span class="Comment">//: support for stopping routines after some number of cycles</span> -<span id="L529" class="LineNr">529 </span> -<span id="L530" class="LineNr">530 </span><span class="Delimiter">:(scenario routine_discontinues_past_limit)</span> -<span id="L531" class="LineNr">531 </span><span class="Special">% Scheduling_interval = 2;</span> -<span id="L532" class="LineNr">532 </span><span class="muRecipe">def</span> f1 [ -<span id="L533" class="LineNr">533 </span> <span class="Constant">1</span>:num/child-id<span class="Special"> <- </span>start-running f2 -<span id="L534" class="LineNr">534 </span> limit-time <span class="Constant">1</span>:num/child-id<span class="Delimiter">,</span> <span class="Constant">10</span> -<span id="L535" class="LineNr">535 </span> <span class="Comment"># padding loop just to make sure f2 has time to completed</span> -<span id="L536" class="LineNr">536 </span> <span class="Constant">2</span>:num<span class="Special"> <- </span>copy <span class="Constant">20</span> -<span id="L537" class="LineNr">537 </span> <span class="Constant">2</span>:num<span class="Special"> <- </span>subtract <span class="Constant">2</span>:num<span class="Delimiter">,</span> <span class="Constant">1</span> -<span id="L538" class="LineNr">538 </span> jump-<span class="Normal">if</span> <span class="Constant">2</span>:num<span class="Delimiter">,</span> <span class="Constant">-2:offset</span> -<span id="L539" class="LineNr">539 </span>] -<span id="L540" class="LineNr">540 </span><span class="muRecipe">def</span> f2 [ -<span id="L541" class="LineNr">541 </span> jump <span class="Constant">-1:offset</span> <span class="Comment"># run forever</span> -<span id="L542" class="LineNr">542 </span> $print [should never get here]<span class="Delimiter">,</span> <span class="Constant">10</span>/newline -<span id="L543" class="LineNr">543 </span>] -<span id="L544" class="LineNr">544 </span><span class="Comment"># f2 terminates</span> -<span id="L545" class="LineNr">545 </span><span class="traceContains">+schedule: discontinuing routine 2</span> +<span id="L467" class="LineNr">467 </span> +<span id="L468" class="LineNr">468 </span><span class="SalientComment">//:: miscellaneous helpers</span> +<span id="L469" class="LineNr">469 </span> +<span id="L470" class="LineNr">470 </span><span class="Delimiter">:(before "End Primitive Recipe Declarations")</span> +<span id="L471" class="LineNr">471 </span>STOP<span class="Delimiter">,</span> +<span id="L472" class="LineNr">472 </span><span class="Delimiter">:(before "End Primitive Recipe Numbers")</span> +<span id="L473" class="LineNr">473 </span><a href='001help.cc.html#L221'>put</a><span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> <span class="Constant">"stop"</span><span class="Delimiter">,</span> STOP<span class="Delimiter">);</span> +<span id="L474" class="LineNr">474 </span><span class="Delimiter">:(before "End Primitive Recipe Checks")</span> +<span id="L475" class="LineNr">475 </span><span class="Normal">case</span> STOP: <span class="Delimiter">{</span> +<span id="L476" class="LineNr">476 </span> <span class="Normal">if</span> <span class="Delimiter">(</span><a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">)</span> != <span class="Constant">1</span><span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L477" class="LineNr">477 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L168'>raise</a> << <a href='013update_operation.cc.html#L25'>maybe</a><span class="Delimiter">(</span>get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">).</span>name<span class="Delimiter">)</span> << <span class="Constant">"'stop' requires exactly one ingredient, but got '"</span> << to_original_string<span class="Delimiter">(</span>inst<span class="Delimiter">)</span> << <span class="Constant">"'</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> +<span id="L478" class="LineNr">478 </span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> +<span id="L479" class="LineNr">479 </span> <span class="Delimiter">}</span> +<span id="L480" class="LineNr">480 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>!is_mu_number<span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">)))</span> <span class="Delimiter">{</span> +<span id="L481" class="LineNr">481 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L168'>raise</a> << <a href='013update_operation.cc.html#L25'>maybe</a><span class="Delimiter">(</span>get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">).</span>name<span class="Delimiter">)</span> << <span class="Constant">"first ingredient of 'stop' should be a routine id generated by 'start-running', but got '"</span> << inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>original_string << <span class="Constant">"'</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> +<span id="L482" class="LineNr">482 </span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> +<span id="L483" class="LineNr">483 </span> <span class="Delimiter">}</span> +<span id="L484" class="LineNr">484 </span> <span class="Identifier">break</span><span class="Delimiter">;</span> +<span id="L485" class="LineNr">485 </span><span class="Delimiter">}</span> +<span id="L486" class="LineNr">486 </span><span class="Delimiter">:(before "End Primitive Recipe Implementations")</span> +<span id="L487" class="LineNr">487 </span><span class="Normal">case</span> STOP: <span class="Delimiter">{</span> +<span id="L488" class="LineNr">488 </span> <span class="Normal">int</span> id = ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">);</span> +<span id="L489" class="LineNr">489 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>Routines<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L490" class="LineNr">490 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>id == id<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L491" class="LineNr">491 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>state = <a href='073scheduler.cc.html#L42'>COMPLETED</a><span class="Delimiter">;</span> +<span id="L492" class="LineNr">492 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> +<span id="L493" class="LineNr">493 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span> +<span id="L494" class="LineNr">494 </span> <span class="Delimiter">}</span> +<span id="L495" class="LineNr">495 </span> <span class="Identifier">break</span><span class="Delimiter">;</span> +<span id="L496" class="LineNr">496 </span><span class="Delimiter">}</span> +<span id="L497" class="LineNr">497 </span> +<span id="L498" class="LineNr">498 </span><span class="Delimiter">:(before "End Primitive Recipe Declarations")</span> +<span id="L499" class="LineNr">499 </span>_DUMP_ROUTINES<span class="Delimiter">,</span> +<span id="L500" class="LineNr">500 </span><span class="Delimiter">:(before "End Primitive Recipe Numbers")</span> +<span id="L501" class="LineNr">501 </span><a href='001help.cc.html#L221'>put</a><span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> <span class="Constant">"$dump-routines"</span><span class="Delimiter">,</span> _DUMP_ROUTINES<span class="Delimiter">);</span> +<span id="L502" class="LineNr">502 </span><span class="Delimiter">:(before "End Primitive Recipe Checks")</span> +<span id="L503" class="LineNr">503 </span><span class="Normal">case</span> _DUMP_ROUTINES: <span class="Delimiter">{</span> +<span id="L504" class="LineNr">504 </span> <span class="Identifier">break</span><span class="Delimiter">;</span> +<span id="L505" class="LineNr">505 </span><span class="Delimiter">}</span> +<span id="L506" class="LineNr">506 </span><span class="Delimiter">:(before "End Primitive Recipe Implementations")</span> +<span id="L507" class="LineNr">507 </span><span class="Normal">case</span> _DUMP_ROUTINES: <span class="Delimiter">{</span> +<span id="L508" class="LineNr">508 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>Routines<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L509" class="LineNr">509 </span> <span class="Conceal">¦</span> cerr << i << <span class="Constant">": "</span> << Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>id << <span class="Constant">' '</span> << Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>state << <span class="Constant">' '</span> << Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>parent_index << <span class="cSpecial">'\n'</span><span class="Delimiter">;</span> +<span id="L510" class="LineNr">510 </span> <span class="Delimiter">}</span> +<span id="L511" class="LineNr">511 </span> <span class="Identifier">break</span><span class="Delimiter">;</span> +<span id="L512" class="LineNr">512 </span><span class="Delimiter">}</span> +<span id="L513" class="LineNr">513 </span> +<span id="L514" class="LineNr">514 </span><span class="Comment">//: support for stopping routines after some number of cycles</span> +<span id="L515" class="LineNr">515 </span> +<span id="L516" class="LineNr">516 </span><span class="Delimiter">:(scenario routine_discontinues_past_limit)</span> +<span id="L517" class="LineNr">517 </span><span class="Special">% Scheduling_interval = 2;</span> +<span id="L518" class="LineNr">518 </span><span class="muRecipe">def</span> f1 [ +<span id="L519" class="LineNr">519 </span> <span class="Constant">1</span>:num/child-id<span class="Special"> <- </span>start-running f2 +<span id="L520" class="LineNr">520 </span> limit-time <span class="Constant">1</span>:num/child-id<span class="Delimiter">,</span> <span class="Constant">10</span> +<span id="L521" class="LineNr">521 </span> <span class="Comment"># padding loop just to make sure f2 has time to completed</span> +<span id="L522" class="LineNr">522 </span> <span class="Constant">2</span>:num<span class="Special"> <- </span>copy <span class="Constant">20</span> +<span id="L523" class="LineNr">523 </span> <span class="Constant">2</span>:num<span class="Special"> <- </span>subtract <span class="Constant">2</span>:num<span class="Delimiter">,</span> <span class="Constant">1</span> +<span id="L524" class="LineNr">524 </span> jump-<span class="Normal">if</span> <span class="Constant">2</span>:num<span class="Delimiter">,</span> <span class="Constant">-2:offset</span> +<span id="L525" class="LineNr">525 </span>] +<span id="L526" class="LineNr">526 </span><span class="muRecipe">def</span> f2 [ +<span id="L527" class="LineNr">527 </span> jump <span class="Constant">-1:offset</span> <span class="Comment"># run forever</span> +<span id="L528" class="LineNr">528 </span> $print [should never get here]<span class="Delimiter">,</span> <span class="Constant">10</span>/newline +<span id="L529" class="LineNr">529 </span>] +<span id="L530" class="LineNr">530 </span><span class="Comment"># f2 terminates</span> +<span id="L531" class="LineNr">531 </span><span class="traceContains">+schedule: discontinuing routine 2</span> +<span id="L532" class="LineNr">532 </span> +<span id="L533" class="LineNr">533 </span><span class="Delimiter">:(before "End routine States")</span> +<span id="L534" class="LineNr">534 </span>DISCONTINUED<span class="Delimiter">,</span> +<span id="L535" class="LineNr">535 </span><span class="Delimiter">:(before "End Scheduler State Transitions")</span> +<span id="L536" class="LineNr">536 </span><span class="Normal">if</span> <span class="Delimiter">(</span>Current_routine<span class="Delimiter">-></span>limit >= <span class="Constant">0</span><span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L537" class="LineNr">537 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>Current_routine<span class="Delimiter">-></span>limit <= Scheduling_interval<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L538" class="LineNr">538 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9999</span><span class="Delimiter">,</span> <span class="Constant">"schedule"</span><span class="Delimiter">)</span> << <span class="Constant">"discontinuing routine "</span> << Current_routine<span class="Delimiter">-></span>id << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> +<span id="L539" class="LineNr">539 </span> <span class="Conceal">¦</span> Current_routine<span class="Delimiter">-></span>state = DISCONTINUED<span class="Delimiter">;</span> +<span id="L540" class="LineNr">540 </span> <span class="Conceal">¦</span> Current_routine<span class="Delimiter">-></span>limit = <span class="Constant">0</span><span class="Delimiter">;</span> +<span id="L541" class="LineNr">541 </span> <span class="Delimiter">}</span> +<span id="L542" class="LineNr">542 </span> <span class="Normal">else</span> <span class="Delimiter">{</span> +<span id="L543" class="LineNr">543 </span> <span class="Conceal">¦</span> Current_routine<span class="Delimiter">-></span>limit -= Scheduling_interval<span class="Delimiter">;</span> +<span id="L544" class="LineNr">544 </span> <span class="Delimiter">}</span> +<span id="L545" class="LineNr">545 </span><span class="Delimiter">}</span> <span id="L546" class="LineNr">546 </span> -<span id="L547" class="LineNr">547 </span><span class="Delimiter">:(before "End routine States")</span> -<span id="L548" class="LineNr">548 </span>DISCONTINUED<span class="Delimiter">,</span> -<span id="L549" class="LineNr">549 </span><span class="Delimiter">:(before "End Scheduler State Transitions")</span> -<span id="L550" class="LineNr">550 </span><span class="Normal">if</span> <span class="Delimiter">(</span>Current_routine<span class="Delimiter">-></span>limit >= <span class="Constant">0</span><span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L551" class="LineNr">551 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>Current_routine<span class="Delimiter">-></span>limit <= Scheduling_interval<span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L552" class="LineNr">552 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9999</span><span class="Delimiter">,</span> <span class="Constant">"schedule"</span><span class="Delimiter">)</span> << <span class="Constant">"discontinuing routine "</span> << Current_routine<span class="Delimiter">-></span>id << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> -<span id="L553" class="LineNr">553 </span> <span class="Conceal">¦</span> Current_routine<span class="Delimiter">-></span>state = DISCONTINUED<span class="Delimiter">;</span> -<span id="L554" class="LineNr">554 </span> <span class="Conceal">¦</span> Current_routine<span class="Delimiter">-></span>limit = <span class="Constant">0</span><span class="Delimiter">;</span> -<span id="L555" class="LineNr">555 </span> <span class="Delimiter">}</span> -<span id="L556" class="LineNr">556 </span> <span class="Normal">else</span> <span class="Delimiter">{</span> -<span id="L557" class="LineNr">557 </span> <span class="Conceal">¦</span> Current_routine<span class="Delimiter">-></span>limit -= Scheduling_interval<span class="Delimiter">;</span> -<span id="L558" class="LineNr">558 </span> <span class="Delimiter">}</span> -<span id="L559" class="LineNr">559 </span><span class="Delimiter">}</span> -<span id="L560" class="LineNr">560 </span> -<span id="L561" class="LineNr">561 </span><span class="Delimiter">:(before "End Test Teardown")</span> -<span id="L562" class="LineNr">562 </span><span class="Normal">if</span> <span class="Delimiter">(</span>Passed && any_routines_with_error<span class="Delimiter">())</span> -<span id="L563" class="LineNr">563 </span> <a href='003trace.cc.html#L168'>raise</a> << <span class="Constant">"some routines died with errors</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> -<span id="L564" class="LineNr">564 </span><span class="Delimiter">:(before "End Mu Test Teardown")</span> -<span id="L565" class="LineNr">565 </span><span class="Normal">if</span> <span class="Delimiter">(</span>Passed && any_routines_with_error<span class="Delimiter">())</span> -<span id="L566" class="LineNr">566 </span> <a href='003trace.cc.html#L168'>raise</a> << Current_scenario<span class="Delimiter">-></span>name << <span class="Constant">": some routines died with errors</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> +<span id="L547" class="LineNr">547 </span><span class="Delimiter">:(before "End Test Teardown")</span> +<span id="L548" class="LineNr">548 </span><span class="Normal">if</span> <span class="Delimiter">(</span>Passed && any_routines_with_error<span class="Delimiter">())</span> +<span id="L549" class="LineNr">549 </span> <a href='003trace.cc.html#L168'>raise</a> << <span class="Constant">"some routines died with errors</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> +<span id="L550" class="LineNr">550 </span><span class="Delimiter">:(before "End Mu Test Teardown")</span> +<span id="L551" class="LineNr">551 </span><span class="Normal">if</span> <span class="Delimiter">(</span>Passed && any_routines_with_error<span class="Delimiter">())</span> +<span id="L552" class="LineNr">552 </span> <a href='003trace.cc.html#L168'>raise</a> << Current_scenario<span class="Delimiter">-></span>name << <span class="Constant">": some routines died with errors</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> +<span id="L553" class="LineNr">553 </span> +<span id="L554" class="LineNr">554 </span><span class="Delimiter">:(code)</span> +<span id="L555" class="LineNr">555 </span><span class="Normal">bool</span> any_routines_with_error<span class="Delimiter">()</span> <span class="Delimiter">{</span> +<span id="L556" class="LineNr">556 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>Routines<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L557" class="LineNr">557 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>state == DISCONTINUED<span class="Delimiter">)</span> +<span id="L558" class="LineNr">558 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Identifier">return</span> <span class="Constant">true</span><span class="Delimiter">;</span> +<span id="L559" class="LineNr">559 </span> <span class="Delimiter">}</span> +<span id="L560" class="LineNr">560 </span> <span class="Identifier">return</span> <span class="Constant">false</span><span class="Delimiter">;</span> +<span id="L561" class="LineNr">561 </span><span class="Delimiter">}</span> +<span id="L562" class="LineNr">562 </span> +<span id="L563" class="LineNr">563 </span><span class="Delimiter">:(before "End routine Fields")</span> +<span id="L564" class="LineNr">564 </span><span class="Normal">int</span> limit<span class="Delimiter">;</span> +<span id="L565" class="LineNr">565 </span><span class="Delimiter">:(before "End routine Constructor")</span> +<span id="L566" class="LineNr">566 </span>limit = -<span class="Constant">1</span><span class="Delimiter">;</span> <span class="Comment">/*</span><span class="Comment"> no limit </span><span class="Comment">*/</span> <span id="L567" class="LineNr">567 </span> -<span id="L568" class="LineNr">568 </span><span class="Delimiter">:(code)</span> -<span id="L569" class="LineNr">569 </span><span class="Normal">bool</span> any_routines_with_error<span class="Delimiter">()</span> <span class="Delimiter">{</span> -<span id="L570" class="LineNr">570 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>Routines<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L571" class="LineNr">571 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>state == DISCONTINUED<span class="Delimiter">)</span> -<span id="L572" class="LineNr">572 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Identifier">return</span> <span class="Constant">true</span><span class="Delimiter">;</span> -<span id="L573" class="LineNr">573 </span> <span class="Delimiter">}</span> -<span id="L574" class="LineNr">574 </span> <span class="Identifier">return</span> <span class="Constant">false</span><span class="Delimiter">;</span> -<span id="L575" class="LineNr">575 </span><span class="Delimiter">}</span> -<span id="L576" class="LineNr">576 </span> -<span id="L577" class="LineNr">577 </span><span class="Delimiter">:(before "End routine Fields")</span> -<span id="L578" class="LineNr">578 </span><span class="Normal">int</span> limit<span class="Delimiter">;</span> -<span id="L579" class="LineNr">579 </span><span class="Delimiter">:(before "End routine Constructor")</span> -<span id="L580" class="LineNr">580 </span>limit = -<span class="Constant">1</span><span class="Delimiter">;</span> <span class="Comment">/*</span><span class="Comment"> no limit </span><span class="Comment">*/</span> -<span id="L581" class="LineNr">581 </span> -<span id="L582" class="LineNr">582 </span><span class="Delimiter">:(before "End Primitive Recipe Declarations")</span> -<span id="L583" class="LineNr">583 </span>LIMIT_TIME<span class="Delimiter">,</span> -<span id="L584" class="LineNr">584 </span><span class="Delimiter">:(before "End Primitive Recipe Numbers")</span> -<span id="L585" class="LineNr">585 </span><a href='001help.cc.html#L221'>put</a><span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> <span class="Constant">"limit-time"</span><span class="Delimiter">,</span> LIMIT_TIME<span class="Delimiter">);</span> -<span id="L586" class="LineNr">586 </span><span class="Delimiter">:(before "End Primitive Recipe Checks")</span> -<span id="L587" class="LineNr">587 </span><span class="Normal">case</span> LIMIT_TIME: <span class="Delimiter">{</span> -<span id="L588" class="LineNr">588 </span> <span class="Normal">if</span> <span class="Delimiter">(</span><a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">)</span> != <span class="Constant">2</span><span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L589" class="LineNr">589 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L168'>raise</a> << <a href='013update_operation.cc.html#L25'>maybe</a><span class="Delimiter">(</span>get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">).</span>name<span class="Delimiter">)</span> << <span class="Constant">"'limit-time' requires exactly two ingredient, but got '"</span> << to_original_string<span class="Delimiter">(</span>inst<span class="Delimiter">)</span> << <span class="Constant">"'</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> -<span id="L590" class="LineNr">590 </span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> -<span id="L591" class="LineNr">591 </span> <span class="Delimiter">}</span> -<span id="L592" class="LineNr">592 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>!is_mu_number<span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">)))</span> <span class="Delimiter">{</span> -<span id="L593" class="LineNr">593 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L168'>raise</a> << <a href='013update_operation.cc.html#L25'>maybe</a><span class="Delimiter">(</span>get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">).</span>name<span class="Delimiter">)</span> << <span class="Constant">"first ingredient of 'limit-time' should be a routine id generated by 'start-running', but got '"</span> << inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>original_string << <span class="Constant">"'</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> -<span id="L594" class="LineNr">594 </span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> -<span id="L595" class="LineNr">595 </span> <span class="Delimiter">}</span> -<span id="L596" class="LineNr">596 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>!is_mu_number<span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">1</span><span class="Delimiter">)))</span> <span class="Delimiter">{</span> -<span id="L597" class="LineNr">597 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L168'>raise</a> << <a href='013update_operation.cc.html#L25'>maybe</a><span class="Delimiter">(</span>get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">).</span>name<span class="Delimiter">)</span> << <span class="Constant">"second ingredient of 'limit-time' should be a number (of instructions to run for), but got '"</span> << inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">1</span><span class="Delimiter">).</span>original_string << <span class="Constant">"'</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> -<span id="L598" class="LineNr">598 </span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> -<span id="L599" class="LineNr">599 </span> <span class="Delimiter">}</span> -<span id="L600" class="LineNr">600 </span> <span class="Identifier">break</span><span class="Delimiter">;</span> -<span id="L601" class="LineNr">601 </span><span class="Delimiter">}</span> -<span id="L602" class="LineNr">602 </span><span class="Delimiter">:(before "End Primitive Recipe Implementations")</span> -<span id="L603" class="LineNr">603 </span><span class="Normal">case</span> LIMIT_TIME: <span class="Delimiter">{</span> -<span id="L604" class="LineNr">604 </span> <span class="Normal">int</span> id = ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">);</span> -<span id="L605" class="LineNr">605 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>Routines<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L606" class="LineNr">606 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>id == id<span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L607" class="LineNr">607 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>limit = ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">1</span><span class="Delimiter">).</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">);</span> -<span id="L608" class="LineNr">608 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> -<span id="L609" class="LineNr">609 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span> -<span id="L610" class="LineNr">610 </span> <span class="Delimiter">}</span> -<span id="L611" class="LineNr">611 </span> <span class="Identifier">break</span><span class="Delimiter">;</span> -<span id="L612" class="LineNr">612 </span><span class="Delimiter">}</span> -<span id="L613" class="LineNr">613 </span> -<span id="L614" class="LineNr">614 </span><span class="Delimiter">:(before "End routine Fields")</span> -<span id="L615" class="LineNr">615 </span><span class="Normal">int</span> instructions_run<span class="Delimiter">;</span> -<span id="L616" class="LineNr">616 </span><span class="Delimiter">:(before "End routine Constructor")</span> -<span id="L617" class="LineNr">617 </span>instructions_run = <span class="Constant">0</span><span class="Delimiter">;</span> -<span id="L618" class="LineNr">618 </span><span class="Delimiter">:(before "Reset instructions_run_this_scheduling_slice")</span> -<span id="L619" class="LineNr">619 </span>Current_routine<span class="Delimiter">-></span>instructions_run += Current_routine<span class="Delimiter">-></span>instructions_run_this_scheduling_slice<span class="Delimiter">;</span> -<span id="L620" class="LineNr">620 </span><span class="Delimiter">:(before "End Primitive Recipe Declarations")</span> -<span id="L621" class="LineNr">621 </span>NUMBER_OF_INSTRUCTIONS<span class="Delimiter">,</span> -<span id="L622" class="LineNr">622 </span><span class="Delimiter">:(before "End Primitive Recipe Numbers")</span> -<span id="L623" class="LineNr">623 </span><a href='001help.cc.html#L221'>put</a><span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> <span class="Constant">"number-of-instructions"</span><span class="Delimiter">,</span> NUMBER_OF_INSTRUCTIONS<span class="Delimiter">);</span> -<span id="L624" class="LineNr">624 </span><span class="Delimiter">:(before "End Primitive Recipe Checks")</span> -<span id="L625" class="LineNr">625 </span><span class="Normal">case</span> NUMBER_OF_INSTRUCTIONS: <span class="Delimiter">{</span> -<span id="L626" class="LineNr">626 </span> <span class="Normal">if</span> <span class="Delimiter">(</span><a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">)</span> != <span class="Constant">1</span><span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L627" class="LineNr">627 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L168'>raise</a> << <a href='013update_operation.cc.html#L25'>maybe</a><span class="Delimiter">(</span>get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">).</span>name<span class="Delimiter">)</span> << <span class="Constant">"'number-of-instructions' requires exactly one ingredient, but got '"</span> << to_original_string<span class="Delimiter">(</span>inst<span class="Delimiter">)</span> << <span class="Constant">"'</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> -<span id="L628" class="LineNr">628 </span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> -<span id="L629" class="LineNr">629 </span> <span class="Delimiter">}</span> -<span id="L630" class="LineNr">630 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>!is_mu_number<span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">)))</span> <span class="Delimiter">{</span> -<span id="L631" class="LineNr">631 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L168'>raise</a> << <a href='013update_operation.cc.html#L25'>maybe</a><span class="Delimiter">(</span>get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">).</span>name<span class="Delimiter">)</span> << <span class="Constant">"first ingredient of 'number-of-instructions' should be a routine id generated by 'start-running', but got '"</span> << inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>original_string << <span class="Constant">"'</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> -<span id="L632" class="LineNr">632 </span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> -<span id="L633" class="LineNr">633 </span> <span class="Delimiter">}</span> +<span id="L568" class="LineNr">568 </span><span class="Delimiter">:(before "End Primitive Recipe Declarations")</span> +<span id="L569" class="LineNr">569 </span>LIMIT_TIME<span class="Delimiter">,</span> +<span id="L570" class="LineNr">570 </span><span class="Delimiter">:(before "End Primitive Recipe Numbers")</span> +<span id="L571" class="LineNr">571 </span><a href='001help.cc.html#L221'>put</a><span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> <span class="Constant">"limit-time"</span><span class="Delimiter">,</span> LIMIT_TIME<span class="Delimiter">);</span> +<span id="L572" class="LineNr">572 </span><span class="Delimiter">:(before "End Primitive Recipe Checks")</span> +<span id="L573" class="LineNr">573 </span><span class="Normal">case</span> LIMIT_TIME: <span class="Delimiter">{</span> +<span id="L574" class="LineNr">574 </span> <span class="Normal">if</span> <span class="Delimiter">(</span><a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">)</span> != <span class="Constant">2</span><span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L575" class="LineNr">575 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L168'>raise</a> << <a href='013update_operation.cc.html#L25'>maybe</a><span class="Delimiter">(</span>get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">).</span>name<span class="Delimiter">)</span> << <span class="Constant">"'limit-time' requires exactly two ingredient, but got '"</span> << to_original_string<span class="Delimiter">(</span>inst<span class="Delimiter">)</span> << <span class="Constant">"'</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> +<span id="L576" class="LineNr">576 </span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> +<span id="L577" class="LineNr">577 </span> <span class="Delimiter">}</span> +<span id="L578" class="LineNr">578 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>!is_mu_number<span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">)))</span> <span class="Delimiter">{</span> +<span id="L579" class="LineNr">579 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L168'>raise</a> << <a href='013update_operation.cc.html#L25'>maybe</a><span class="Delimiter">(</span>get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">).</span>name<span class="Delimiter">)</span> << <span class="Constant">"first ingredient of 'limit-time' should be a routine id generated by 'start-running', but got '"</span> << inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>original_string << <span class="Constant">"'</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> +<span id="L580" class="LineNr">580 </span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> +<span id="L581" class="LineNr">581 </span> <span class="Delimiter">}</span> +<span id="L582" class="LineNr">582 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>!is_mu_number<span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">1</span><span class="Delimiter">)))</span> <span class="Delimiter">{</span> +<span id="L583" class="LineNr">583 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L168'>raise</a> << <a href='013update_operation.cc.html#L25'>maybe</a><span class="Delimiter">(</span>get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">).</span>name<span class="Delimiter">)</span> << <span class="Constant">"second ingredient of 'limit-time' should be a number (of instructions to run for), but got '"</span> << inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">1</span><span class="Delimiter">).</span>original_string << <span class="Constant">"'</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> +<span id="L584" class="LineNr">584 </span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> +<span id="L585" class="LineNr">585 </span> <span class="Delimiter">}</span> +<span id="L586" class="LineNr">586 </span> <span class="Identifier">break</span><span class="Delimiter">;</span> +<span id="L587" class="LineNr">587 </span><span class="Delimiter">}</span> +<span id="L588" class="LineNr">588 </span><span class="Delimiter">:(before "End Primitive Recipe Implementations")</span> +<span id="L589" class="LineNr">589 </span><span class="Normal">case</span> LIMIT_TIME: <span class="Delimiter">{</span> +<span id="L590" class="LineNr">590 </span> <span class="Normal">int</span> id = ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">);</span> +<span id="L591" class="LineNr">591 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>Routines<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L592" class="LineNr">592 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>id == id<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L593" class="LineNr">593 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>limit = ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">1</span><span class="Delimiter">).</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">);</span> +<span id="L594" class="LineNr">594 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> +<span id="L595" class="LineNr">595 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span> +<span id="L596" class="LineNr">596 </span> <span class="Delimiter">}</span> +<span id="L597" class="LineNr">597 </span> <span class="Identifier">break</span><span class="Delimiter">;</span> +<span id="L598" class="LineNr">598 </span><span class="Delimiter">}</span> +<span id="L599" class="LineNr">599 </span> +<span id="L600" class="LineNr">600 </span><span class="Delimiter">:(before "End routine Fields")</span> +<span id="L601" class="LineNr">601 </span><span class="Normal">int</span> instructions_run<span class="Delimiter">;</span> +<span id="L602" class="LineNr">602 </span><span class="Delimiter">:(before "End routine Constructor")</span> +<span id="L603" class="LineNr">603 </span>instructions_run = <span class="Constant">0</span><span class="Delimiter">;</span> +<span id="L604" class="LineNr">604 </span><span class="Delimiter">:(before "Reset instructions_run_this_scheduling_slice")</span> +<span id="L605" class="LineNr">605 </span>Current_routine<span class="Delimiter">-></span>instructions_run += Current_routine<span class="Delimiter">-></span>instructions_run_this_scheduling_slice<span class="Delimiter">;</span> +<span id="L606" class="LineNr">606 </span><span class="Delimiter">:(before "End Primitive Recipe Declarations")</span> +<span id="L607" class="LineNr">607 </span>NUMBER_OF_INSTRUCTIONS<span class="Delimiter">,</span> +<span id="L608" class="LineNr">608 </span><span class="Delimiter">:(before "End Primitive Recipe Numbers")</span> +<span id="L609" class="LineNr">609 </span><a href='001help.cc.html#L221'>put</a><span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> <span class="Constant">"number-of-instructions"</span><span class="Delimiter">,</span> NUMBER_OF_INSTRUCTIONS<span class="Delimiter">);</span> +<span id="L610" class="LineNr">610 </span><span class="Delimiter">:(before "End Primitive Recipe Checks")</span> +<span id="L611" class="LineNr">611 </span><span class="Normal">case</span> NUMBER_OF_INSTRUCTIONS: <span class="Delimiter">{</span> +<span id="L612" class="LineNr">612 </span> <span class="Normal">if</span> <span class="Delimiter">(</span><a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">)</span> != <span class="Constant">1</span><span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L613" class="LineNr">613 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L168'>raise</a> << <a href='013update_operation.cc.html#L25'>maybe</a><span class="Delimiter">(</span>get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">).</span>name<span class="Delimiter">)</span> << <span class="Constant">"'number-of-instructions' requires exactly one ingredient, but got '"</span> << to_original_string<span class="Delimiter">(</span>inst<span class="Delimiter">)</span> << <span class="Constant">"'</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> +<span id="L614" class="LineNr">614 </span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> +<span id="L615" class="LineNr">615 </span> <span class="Delimiter">}</span> +<span id="L616" class="LineNr">616 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>!is_mu_number<span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">)))</span> <span class="Delimiter">{</span> +<span id="L617" class="LineNr">617 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L168'>raise</a> << <a href='013update_operation.cc.html#L25'>maybe</a><span class="Delimiter">(</span>get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">).</span>name<span class="Delimiter">)</span> << <span class="Constant">"first ingredient of 'number-of-instructions' should be a routine id generated by 'start-running', but got '"</span> << inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>original_string << <span class="Constant">"'</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> +<span id="L618" class="LineNr">618 </span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> +<span id="L619" class="LineNr">619 </span> <span class="Delimiter">}</span> +<span id="L620" class="LineNr">620 </span> <span class="Identifier">break</span><span class="Delimiter">;</span> +<span id="L621" class="LineNr">621 </span><span class="Delimiter">}</span> +<span id="L622" class="LineNr">622 </span><span class="Delimiter">:(before "End Primitive Recipe Implementations")</span> +<span id="L623" class="LineNr">623 </span><span class="Normal">case</span> NUMBER_OF_INSTRUCTIONS: <span class="Delimiter">{</span> +<span id="L624" class="LineNr">624 </span> <span class="Normal">int</span> id = ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">);</span> +<span id="L625" class="LineNr">625 </span> <span class="Normal">int</span> result = -<span class="Constant">1</span><span class="Delimiter">;</span> +<span id="L626" class="LineNr">626 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>Routines<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L627" class="LineNr">627 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>id == id<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L628" class="LineNr">628 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> result = Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>instructions_run<span class="Delimiter">;</span> +<span id="L629" class="LineNr">629 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> +<span id="L630" class="LineNr">630 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span> +<span id="L631" class="LineNr">631 </span> <span class="Delimiter">}</span> +<span id="L632" class="LineNr">632 </span> products<span class="Delimiter">.</span>resize<span class="Delimiter">(</span><span class="Constant">1</span><span class="Delimiter">);</span> +<span id="L633" class="LineNr">633 </span> products<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>push_back<span class="Delimiter">(</span>result<span class="Delimiter">);</span> <span id="L634" class="LineNr">634 </span> <span class="Identifier">break</span><span class="Delimiter">;</span> <span id="L635" class="LineNr">635 </span><span class="Delimiter">}</span> -<span id="L636" class="LineNr">636 </span><span class="Delimiter">:(before "End Primitive Recipe Implementations")</span> -<span id="L637" class="LineNr">637 </span><span class="Normal">case</span> NUMBER_OF_INSTRUCTIONS: <span class="Delimiter">{</span> -<span id="L638" class="LineNr">638 </span> <span class="Normal">int</span> id = ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">);</span> -<span id="L639" class="LineNr">639 </span> <span class="Normal">int</span> result = -<span class="Constant">1</span><span class="Delimiter">;</span> -<span id="L640" class="LineNr">640 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>Routines<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L641" class="LineNr">641 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>id == id<span class="Delimiter">)</span> <span class="Delimiter">{</span> -<span id="L642" class="LineNr">642 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> result = Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>instructions_run<span class="Delimiter">;</span> -<span id="L643" class="LineNr">643 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> -<span id="L644" class="LineNr">644 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span> -<span id="L645" class="LineNr">645 </span> <span class="Delimiter">}</span> -<span id="L646" class="LineNr">646 </span> products<span class="Delimiter">.</span>resize<span class="Delimiter">(</span><span class="Constant">1</span><span class="Delimiter">);</span> -<span id="L647" class="LineNr">647 </span> products<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>push_back<span class="Delimiter">(</span>result<span class="Delimiter">);</span> -<span id="L648" class="LineNr">648 </span> <span class="Identifier">break</span><span class="Delimiter">;</span> -<span id="L649" class="LineNr">649 </span><span class="Delimiter">}</span> -<span id="L650" class="LineNr">650 </span> -<span id="L651" class="LineNr">651 </span><span class="Delimiter">:(scenario number_of_instructions)</span> -<span id="L652" class="LineNr">652 </span><span class="muRecipe">def</span> f1 [ -<span id="L653" class="LineNr">653 </span> <span class="Constant">10</span>:num/child-id<span class="Special"> <- </span>start-running f2 -<span id="L654" class="LineNr">654 </span> <span class="Delimiter">{</span> -<span id="L655" class="LineNr">655 </span> <span class="Conceal">¦</span> loop-unless <span class="Constant">20</span>:num -<span id="L656" class="LineNr">656 </span> <span class="Delimiter">}</span> -<span id="L657" class="LineNr">657 </span> <span class="Constant">11</span>:num<span class="Special"> <- </span>number-of-instructions <span class="Constant">10</span>:num -<span id="L658" class="LineNr">658 </span>] -<span id="L659" class="LineNr">659 </span><span class="muRecipe">def</span> f2 [ -<span id="L660" class="LineNr">660 </span> <span class="Comment"># 2 instructions worth of work</span> -<span id="L661" class="LineNr">661 </span> <span class="Constant">1</span>:num<span class="Special"> <- </span>copy <span class="Constant">34</span> -<span id="L662" class="LineNr">662 </span> <span class="Constant">20</span>:num<span class="Special"> <- </span>copy <span class="Constant">1</span> -<span id="L663" class="LineNr">663 </span>] -<span id="L664" class="LineNr">664 </span><span class="Comment"># f2 runs an extra instruction for the implicit return added by the</span> -<span id="L665" class="LineNr">665 </span><span class="Comment"># fill_in_return_ingredients transform</span> -<span id="L666" class="LineNr">666 </span><span class="traceContains">+mem: storing 3 in location 11</span> -<span id="L667" class="LineNr">667 </span> -<span id="L668" class="LineNr">668 </span><span class="Delimiter">:(scenario number_of_instructions_across_multiple_scheduling_intervals)</span> -<span id="L669" class="LineNr">669 </span><span class="Special">% Scheduling_interval = 1;</span> -<span id="L670" class="LineNr">670 </span><span class="muRecipe">def</span> f1 [ -<span id="L671" class="LineNr">671 </span> <span class="Constant">10</span>:num/child-id<span class="Special"> <- </span>start-running f2 -<span id="L672" class="LineNr">672 </span> <span class="Delimiter">{</span> -<span id="L673" class="LineNr">673 </span> <span class="Conceal">¦</span> loop-unless <span class="Constant">20</span>:num -<span id="L674" class="LineNr">674 </span> <span class="Delimiter">}</span> -<span id="L675" class="LineNr">675 </span> <span class="Constant">11</span>:num<span class="Special"> <- </span>number-of-instructions <span class="Constant">10</span>:num -<span id="L676" class="LineNr">676 </span>] -<span id="L677" class="LineNr">677 </span><span class="muRecipe">def</span> f2 [ -<span id="L678" class="LineNr">678 </span> <span class="Comment"># 4 instructions worth of work</span> -<span id="L679" class="LineNr">679 </span> <span class="Constant">1</span>:num<span class="Special"> <- </span>copy <span class="Constant">34</span> -<span id="L680" class="LineNr">680 </span> <span class="Constant">2</span>:num<span class="Special"> <- </span>copy <span class="Constant">1</span> -<span id="L681" class="LineNr">681 </span> <span class="Constant">2</span>:num<span class="Special"> <- </span>copy <span class="Constant">3</span> -<span id="L682" class="LineNr">682 </span> <span class="Constant">20</span>:num<span class="Special"> <- </span>copy <span class="Constant">1</span> -<span id="L683" class="LineNr">683 </span>] -<span id="L684" class="LineNr">684 </span><span class="Comment"># f2 runs an extra instruction for the implicit return added by the</span> -<span id="L685" class="LineNr">685 </span><span class="Comment"># fill_in_return_ingredients transform</span> -<span id="L686" class="LineNr">686 </span><span class="traceContains">+mem: storing 5 in location 11</span> -<span id="L687" class="LineNr">687 </span> -<span id="L688" class="LineNr">688 </span><span class="SalientComment">//:: make sure that each routine gets a different alloc to start</span> -<span id="L689" class="LineNr">689 </span> -<span id="L690" class="LineNr">690 </span><span class="Delimiter">:(scenario new_concurrent)</span> -<span id="L691" class="LineNr">691 </span><span class="muRecipe">def</span> f1 [ -<span id="L692" class="LineNr">692 </span> start-running f2 -<span id="L693" class="LineNr">693 </span> <span class="Constant">1</span>:&:num/<span class="Special">raw <- </span><span class="Normal">new</span> <span class="Constant">number:type</span> -<span id="L694" class="LineNr">694 </span> <span class="Comment"># wait for f2 to complete</span> -<span id="L695" class="LineNr">695 </span> <span class="Delimiter">{</span> -<span id="L696" class="LineNr">696 </span> <span class="Conceal">¦</span> loop-unless <span class="Constant">4</span>:num/<span class="Special">raw</span> -<span id="L697" class="LineNr">697 </span> <span class="Delimiter">}</span> -<span id="L698" class="LineNr">698 </span>] -<span id="L699" class="LineNr">699 </span><span class="muRecipe">def</span> f2 [ -<span id="L700" class="LineNr">700 </span> <span class="Constant">2</span>:&:num/<span class="Special">raw <- </span><span class="Normal">new</span> <span class="Constant">number:type</span> -<span id="L701" class="LineNr">701 </span> <span class="Comment"># hack: assumes scheduler implementation</span> -<span id="L702" class="LineNr">702 </span> <span class="Constant">3</span>:<span class="Normal">bool</span>/<span class="Special">raw <- </span>equal <span class="Constant">1</span>:&:num/<span class="Special">raw</span><span class="Delimiter">,</span> <span class="Constant">2</span>:&:num/<span class="Special">raw</span> -<span id="L703" class="LineNr">703 </span> <span class="Comment"># signal f2 complete</span> -<span id="L704" class="LineNr">704 </span> <span class="Constant">4</span>:num/<span class="Special">raw <- </span>copy <span class="Constant">1</span> -<span id="L705" class="LineNr">705 </span>] -<span id="L706" class="LineNr">706 </span><span class="traceContains">+mem: storing 0 in location 3</span> +<span id="L636" class="LineNr">636 </span> +<span id="L637" class="LineNr">637 </span><span class="Delimiter">:(scenario number_of_instructions)</span> +<span id="L638" class="LineNr">638 </span><span class="muRecipe">def</span> f1 [ +<span id="L639" class="LineNr">639 </span> <span class="Constant">10</span>:num/child-id<span class="Special"> <- </span>start-running f2 +<span id="L640" class="LineNr">640 </span> <span class="Delimiter">{</span> +<span id="L641" class="LineNr">641 </span> <span class="Conceal">¦</span> loop-unless <span class="Constant">20</span>:num +<span id="L642" class="LineNr">642 </span> <span class="Delimiter">}</span> +<span id="L643" class="LineNr">643 </span> <span class="Constant">11</span>:num<span class="Special"> <- </span>number-of-instructions <span class="Constant">10</span>:num +<span id="L644" class="LineNr">644 </span>] +<span id="L645" class="LineNr">645 </span><span class="muRecipe">def</span> f2 [ +<span id="L646" class="LineNr">646 </span> <span class="Comment"># 2 instructions worth of work</span> +<span id="L647" class="LineNr">647 </span> <span class="Constant">1</span>:num<span class="Special"> <- </span>copy <span class="Constant">34</span> +<span id="L648" class="LineNr">648 </span> <span class="Constant">20</span>:num<span class="Special"> <- </span>copy <span class="Constant">1</span> +<span id="L649" class="LineNr">649 </span>] +<span id="L650" class="LineNr">650 </span><span class="Comment"># f2 runs an extra instruction for the implicit return added by the</span> +<span id="L651" class="LineNr">651 </span><span class="Comment"># fill_in_return_ingredients transform</span> +<span id="L652" class="LineNr">652 </span><span class="traceContains">+mem: storing 3 in location 11</span> +<span id="L653" class="LineNr">653 </span> +<span id="L654" class="LineNr">654 </span><span class="Delimiter">:(scenario number_of_instructions_across_multiple_scheduling_intervals)</span> +<span id="L655" class="LineNr">655 </span><span class="Special">% Scheduling_interval = 1;</span> +<span id="L656" class="LineNr">656 </span><span class="muRecipe">def</span> f1 [ +<span id="L657" class="LineNr">657 </span> <span class="Constant">10</span>:num/child-id<span class="Special"> <- </span>start-running f2 +<span id="L658" class="LineNr">658 </span> <span class="Delimiter">{</span> +<span id="L659" class="LineNr">659 </span> <span class="Conceal">¦</span> loop-unless <span class="Constant">20</span>:num +<span id="L660" class="LineNr">660 </span> <span class="Delimiter">}</span> +<span id="L661" class="LineNr">661 </span> <span class="Constant">11</span>:num<span class="Special"> <- </span>number-of-instructions <span class="Constant">10</span>:num +<span id="L662" class="LineNr">662 </span>] +<span id="L663" class="LineNr">663 </span><span class="muRecipe">def</span> f2 [ +<span id="L664" class="LineNr">664 </span> <span class="Comment"># 4 instructions worth of work</span> +<span id="L665" class="LineNr">665 </span> <span class="Constant">1</span>:num<span class="Special"> <- </span>copy <span class="Constant">34</span> +<span id="L666" class="LineNr">666 </span> <span class="Constant">2</span>:num<span class="Special"> <- </span>copy <span class="Constant">1</span> +<span id="L667" class="LineNr">667 </span> <span class="Constant">2</span>:num<span class="Special"> <- </span>copy <span class="Constant">3</span> +<span id="L668" class="LineNr">668 </span> <span class="Constant">20</span>:num<span class="Special"> <- </span>copy <span class="Constant">1</span> +<span id="L669" class="LineNr">669 </span>] +<span id="L670" class="LineNr">670 </span><span class="Comment"># f2 runs an extra instruction for the implicit return added by the</span> +<span id="L671" class="LineNr">671 </span><span class="Comment"># fill_in_return_ingredients transform</span> +<span id="L672" class="LineNr">672 </span><span class="traceContains">+mem: storing 5 in location 11</span> +<span id="L673" class="LineNr">673 </span> +<span id="L674" class="LineNr">674 </span><span class="SalientComment">//:: make sure that each routine gets a different alloc to start</span> +<span id="L675" class="LineNr">675 </span> +<span id="L676" class="LineNr">676 </span><span class="Delimiter">:(scenario new_concurrent)</span> +<span id="L677" class="LineNr">677 </span><span class="muRecipe">def</span> f1 [ +<span id="L678" class="LineNr">678 </span> start-running f2 +<span id="L679" class="LineNr">679 </span> <span class="Constant">1</span>:&:num/<span class="Special">raw <- </span><span class="Normal">new</span> <span class="Constant">number:type</span> +<span id="L680" class="LineNr">680 </span> <span class="Comment"># wait for f2 to complete</span> +<span id="L681" class="LineNr">681 </span> <span class="Delimiter">{</span> +<span id="L682" class="LineNr">682 </span> <span class="Conceal">¦</span> loop-unless <span class="Constant">4</span>:num/<span class="Special">raw</span> +<span id="L683" class="LineNr">683 </span> <span class="Delimiter">}</span> +<span id="L684" class="LineNr">684 </span>] +<span id="L685" class="LineNr">685 </span><span class="muRecipe">def</span> f2 [ +<span id="L686" class="LineNr">686 </span> <span class="Constant">2</span>:&:num/<span class="Special">raw <- </span><span class="Normal">new</span> <span class="Constant">number:type</span> +<span id="L687" class="LineNr">687 </span> <span class="Comment"># hack: assumes scheduler implementation</span> +<span id="L688" class="LineNr">688 </span> <span class="Constant">3</span>:<span class="Normal">bool</span>/<span class="Special">raw <- </span>equal <span class="Constant">1</span>:&:num/<span class="Special">raw</span><span class="Delimiter">,</span> <span class="Constant">2</span>:&:num/<span class="Special">raw</span> +<span id="L689" class="LineNr">689 </span> <span class="Comment"># signal f2 complete</span> +<span id="L690" class="LineNr">690 </span> <span class="Constant">4</span>:num/<span class="Special">raw <- </span>copy <span class="Constant">1</span> +<span id="L691" class="LineNr">691 </span>] +<span id="L692" class="LineNr">692 </span><span class="traceContains">+mem: storing 0 in location 3</span> </pre> </body> </html> diff --git a/html/073wait.cc.html b/html/074wait.cc.html index 2a08a20a..eee7a236 100644 --- a/html/073wait.cc.html +++ b/html/074wait.cc.html @@ -2,7 +2,7 @@ <html> <head> <meta http-equiv="content-type" content="text/html; charset=UTF-8"> -<title>Mu - 073wait.cc</title> +<title>Mu - 074wait.cc</title> <meta name="Generator" content="Vim/7.4"> <meta name="plugin-version" content="vim7.4_v2"> <meta name="syntax" content="cpp"> @@ -98,28 +98,28 @@ if ('onhashchange' in window) { <span id="L33" class="LineNr"> 33 </span>waiting_on_location = <span class="Constant">0</span><span class="Delimiter">;</span> <span id="L34" class="LineNr"> 34 </span> <span id="L35" class="LineNr"> 35 </span><span class="Delimiter">:(before "End Mu Test Teardown")</span> -<span id="L36" class="LineNr"> 36 </span><span class="Normal">if</span> <span class="Delimiter">(</span>Passed && <a href='073wait.cc.html#L47'>any_routines_waiting</a><span class="Delimiter">())</span> +<span id="L36" class="LineNr"> 36 </span><span class="Normal">if</span> <span class="Delimiter">(</span>Passed && <a href='074wait.cc.html#L47'>any_routines_waiting</a><span class="Delimiter">())</span> <span id="L37" class="LineNr"> 37 </span> <a href='003trace.cc.html#L168'>raise</a> << Current_scenario<span class="Delimiter">-></span>name << <span class="Constant">": deadlock!</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> <span id="L38" class="LineNr"> 38 </span><span class="Delimiter">:(before "End Run Routine")</span> -<span id="L39" class="LineNr"> 39 </span><span class="Normal">if</span> <span class="Delimiter">(</span><a href='073wait.cc.html#L47'>any_routines_waiting</a><span class="Delimiter">())</span> <span class="Delimiter">{</span> +<span id="L39" class="LineNr"> 39 </span><span class="Normal">if</span> <span class="Delimiter">(</span><a href='074wait.cc.html#L47'>any_routines_waiting</a><span class="Delimiter">())</span> <span class="Delimiter">{</span> <span id="L40" class="LineNr"> 40 </span> <a href='003trace.cc.html#L168'>raise</a> << <span class="Constant">"deadlock!</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> -<span id="L41" class="LineNr"> 41 </span> <a href='073wait.cc.html#L54'>dump_waiting_routines</a><span class="Delimiter">();</span> +<span id="L41" class="LineNr"> 41 </span> <a href='074wait.cc.html#L54'>dump_waiting_routines</a><span class="Delimiter">();</span> <span id="L42" class="LineNr"> 42 </span><span class="Delimiter">}</span> <span id="L43" class="LineNr"> 43 </span><span class="Delimiter">:(before "End Test Teardown")</span> <span id="L44" class="LineNr"> 44 </span><span class="Normal">if</span> <span class="Delimiter">(</span>Passed && any_routines_with_error<span class="Delimiter">())</span> <span id="L45" class="LineNr"> 45 </span> <a href='003trace.cc.html#L168'>raise</a> << <span class="Constant">"some routines died with errors</span><span class="cSpecial">\n</span><span class="Constant">"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> <span id="L46" class="LineNr"> 46 </span><span class="Delimiter">:(code)</span> -<span id="L47" class="LineNr"> 47 </span><span class="Normal">bool</span> <a href='073wait.cc.html#L47'>any_routines_waiting</a><span class="Delimiter">()</span> <span class="Delimiter">{</span> +<span id="L47" class="LineNr"> 47 </span><span class="Normal">bool</span> <a href='074wait.cc.html#L47'>any_routines_waiting</a><span class="Delimiter">()</span> <span class="Delimiter">{</span> <span id="L48" class="LineNr"> 48 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>Routines<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L49" class="LineNr"> 49 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>state == WAITING<span class="Delimiter">)</span> <span id="L50" class="LineNr"> 50 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Identifier">return</span> <span class="Constant">true</span><span class="Delimiter">;</span> <span id="L51" class="LineNr"> 51 </span> <span class="Delimiter">}</span> <span id="L52" class="LineNr"> 52 </span> <span class="Identifier">return</span> <span class="Constant">false</span><span class="Delimiter">;</span> <span id="L53" class="LineNr"> 53 </span><span class="Delimiter">}</span> -<span id="L54" class="LineNr"> 54 </span><span class="Normal">void</span> <a href='073wait.cc.html#L54'>dump_waiting_routines</a><span class="Delimiter">()</span> <span class="Delimiter">{</span> +<span id="L54" class="LineNr"> 54 </span><span class="Normal">void</span> <a href='074wait.cc.html#L54'>dump_waiting_routines</a><span class="Delimiter">()</span> <span class="Delimiter">{</span> <span id="L55" class="LineNr"> 55 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>Routines<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L56" class="LineNr"> 56 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>state == WAITING<span class="Delimiter">)</span> -<span id="L57" class="LineNr"> 57 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> cerr << i << <span class="Constant">": "</span> << <a href='072scheduler.cc.html#L110'>routine_label</a><span class="Delimiter">(</span>Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">))</span> << <span class="cSpecial">'\n'</span><span class="Delimiter">;</span> +<span id="L57" class="LineNr"> 57 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> cerr << i << <span class="Constant">": "</span> << <a href='073scheduler.cc.html#L110'>routine_label</a><span class="Delimiter">(</span>Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">))</span> << <span class="cSpecial">'\n'</span><span class="Delimiter">;</span> <span id="L58" class="LineNr"> 58 </span> <span class="Delimiter">}</span> <span id="L59" class="LineNr"> 59 </span><span class="Delimiter">}</span> <span id="L60" class="LineNr"> 60 </span> @@ -199,7 +199,7 @@ if ('onhashchange' in window) { <span id="L134" class="LineNr">134 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>loc && <a href='001help.cc.html#L228'>get_or_insert</a><span class="Delimiter">(</span>Memory<span class="Delimiter">,</span> loc<span class="Delimiter">)</span> == <span class="Constant">0</span><span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L135" class="LineNr">135 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9999</span><span class="Delimiter">,</span> <span class="Constant">"schedule"</span><span class="Delimiter">)</span> << <span class="Constant">"waking up routine "</span> << Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>id << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> <span id="L136" class="LineNr">136 </span> <span class="Conceal">¦</span> <a href='001help.cc.html#L221'>put</a><span class="Delimiter">(</span>Memory<span class="Delimiter">,</span> loc<span class="Delimiter">,</span> <span class="Constant">1</span><span class="Delimiter">);</span> -<span id="L137" class="LineNr">137 </span> <span class="Conceal">¦</span> Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>state = <a href='072scheduler.cc.html#L41'>RUNNING</a><span class="Delimiter">;</span> +<span id="L137" class="LineNr">137 </span> <span class="Conceal">¦</span> Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>state = <a href='073scheduler.cc.html#L41'>RUNNING</a><span class="Delimiter">;</span> <span id="L138" class="LineNr">138 </span> <span class="Conceal">¦</span> Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>waiting_on_location = <span class="Constant">0</span><span class="Delimiter">;</span> <span id="L139" class="LineNr">139 </span> <span class="Delimiter">}</span> <span id="L140" class="LineNr">140 </span><span class="Delimiter">}</span> @@ -284,7 +284,7 @@ if ('onhashchange' in window) { <span id="L219" class="LineNr">219 </span><span class="Delimiter">}</span> <span id="L220" class="LineNr">220 </span> <span id="L221" class="LineNr">221 </span><span class="Delimiter">:(code)</span> -<span id="L222" class="LineNr">222 </span><span class="Normal">bool</span> <a href='073wait.cc.html#L222'>is_mu_location</a><span class="Delimiter">(</span>reagent<span class="Comment">/*</span><span class="Comment">copy</span><span class="Comment">*/</span> x<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L222" class="LineNr">222 </span><span class="Normal">bool</span> <a href='074wait.cc.html#L222'>is_mu_location</a><span class="Delimiter">(</span>reagent<span class="Comment">/*</span><span class="Comment">copy</span><span class="Comment">*/</span> x<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L223" class="LineNr">223 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>!canonize_type<span class="Delimiter">(</span>x<span class="Delimiter">))</span> <span class="Identifier">return</span> <span class="Constant">false</span><span class="Delimiter">;</span> <span id="L224" class="LineNr">224 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>!x<span class="Delimiter">.</span>type<span class="Delimiter">)</span> <span class="Identifier">return</span> <span class="Constant">false</span><span class="Delimiter">;</span> <span id="L225" class="LineNr">225 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>!x<span class="Delimiter">.</span>type<span class="Delimiter">-></span>atom<span class="Delimiter">)</span> <span class="Identifier">return</span> <span class="Constant">false</span><span class="Delimiter">;</span> @@ -423,10 +423,10 @@ if ('onhashchange' in window) { <span id="L358" class="LineNr">358 </span> assert<span class="Delimiter">(</span>id != waiter<span class="Delimiter">-></span>id<span class="Delimiter">);</span> <span class="Comment">// routine can't wait on itself</span> <span id="L359" class="LineNr">359 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> j = <span class="Constant">0</span><span class="Delimiter">;</span> j < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>Routines<span class="Delimiter">);</span> ++j<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L360" class="LineNr">360 </span> <span class="Conceal">¦</span> <span class="Normal">const</span> routine* waitee = Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>j<span class="Delimiter">);</span> -<span id="L361" class="LineNr">361 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>waitee<span class="Delimiter">-></span>id == id && waitee<span class="Delimiter">-></span>state != <a href='072scheduler.cc.html#L41'>RUNNING</a> && waitee<span class="Delimiter">-></span>state != WAITING<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L361" class="LineNr">361 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>waitee<span class="Delimiter">-></span>id == id && waitee<span class="Delimiter">-></span>state != <a href='073scheduler.cc.html#L41'>RUNNING</a> && waitee<span class="Delimiter">-></span>state != WAITING<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L362" class="LineNr">362 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// routine is COMPLETED or DISCONTINUED</span> <span id="L363" class="LineNr">363 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9999</span><span class="Delimiter">,</span> <span class="Constant">"schedule"</span><span class="Delimiter">)</span> << <span class="Constant">"waking up routine "</span> << waiter<span class="Delimiter">-></span>id << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> -<span id="L364" class="LineNr">364 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> waiter<span class="Delimiter">-></span>state = <a href='072scheduler.cc.html#L41'>RUNNING</a><span class="Delimiter">;</span> +<span id="L364" class="LineNr">364 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> waiter<span class="Delimiter">-></span>state = <a href='073scheduler.cc.html#L41'>RUNNING</a><span class="Delimiter">;</span> <span id="L365" class="LineNr">365 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> waiter<span class="Delimiter">-></span>waiting_on_routine = <span class="Constant">0</span><span class="Delimiter">;</span> <span id="L366" class="LineNr">366 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span> <span id="L367" class="LineNr">367 </span> <span class="Delimiter">}</span> @@ -584,9 +584,9 @@ if ('onhashchange' in window) { <span id="L519" class="LineNr">519 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> j = <span class="Constant">0</span><span class="Delimiter">;</span> j < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>Routines<span class="Delimiter">);</span> ++j<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L520" class="LineNr">520 </span> <span class="Conceal">¦</span> <span class="Normal">const</span> routine* waitee = Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>j<span class="Delimiter">);</span> <span id="L521" class="LineNr">521 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>waitee<span class="Delimiter">-></span>id != id<span class="Delimiter">)</span> <span class="Identifier">continue</span><span class="Delimiter">;</span> -<span id="L522" class="LineNr">522 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>waitee<span class="Delimiter">-></span>state != <a href='072scheduler.cc.html#L41'>RUNNING</a> || waitee<span class="Delimiter">-></span>blocked<span class="Delimiter">)</span> <span class="Delimiter">{</span> +<span id="L522" class="LineNr">522 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>waitee<span class="Delimiter">-></span>state != <a href='073scheduler.cc.html#L41'>RUNNING</a> || waitee<span class="Delimiter">-></span>blocked<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L523" class="LineNr">523 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">9999</span><span class="Delimiter">,</span> <span class="Constant">"schedule"</span><span class="Delimiter">)</span> << <span class="Constant">"waking up routine "</span> << waiter<span class="Delimiter">-></span>id << <span class="Constant">" because routine "</span> << waitee<span class="Delimiter">-></span>id << <span class="Constant">" is blocked"</span> << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> -<span id="L524" class="LineNr">524 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> waiter<span class="Delimiter">-></span>state = <a href='072scheduler.cc.html#L41'>RUNNING</a><span class="Delimiter">;</span> +<span id="L524" class="LineNr">524 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> waiter<span class="Delimiter">-></span>state = <a href='073scheduler.cc.html#L41'>RUNNING</a><span class="Delimiter">;</span> <span id="L525" class="LineNr">525 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> waiter<span class="Delimiter">-></span>waiting_on_routine_to_block = <span class="Constant">0</span><span class="Delimiter">;</span> <span id="L526" class="LineNr">526 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span> <span id="L527" class="LineNr">527 </span> <span class="Delimiter">}</span> @@ -616,7 +616,7 @@ if ('onhashchange' in window) { <span id="L551" class="LineNr">551 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L141'>SIZE</a><span class="Delimiter">(</span>Routines<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L552" class="LineNr">552 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>id == id<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L553" class="LineNr">553 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>state == WAITING<span class="Delimiter">)</span> -<span id="L554" class="LineNr">554 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>state = <a href='072scheduler.cc.html#L41'>RUNNING</a><span class="Delimiter">;</span> +<span id="L554" class="LineNr">554 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>state = <a href='073scheduler.cc.html#L41'>RUNNING</a><span class="Delimiter">;</span> <span id="L555" class="LineNr">555 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Routines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)-></span>blocked = <span class="Constant">false</span><span class="Delimiter">;</span> <span id="L556" class="LineNr">556 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Identifier">break</span><span class="Delimiter">;</span> <span id="L557" class="LineNr">557 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span> diff --git a/html/076continuation.cc.html b/html/076continuation.cc.html index 3cb2541f..db9ae8c5 100644 --- a/html/076continuation.cc.html +++ b/html/076continuation.cc.html @@ -83,7 +83,7 @@ if ('onhashchange' in window) { <span id="L19" class="LineNr"> 19 </span>Type[continuation]<span class="Delimiter">.</span>name = <span class="Constant">"continuation"</span><span class="Delimiter">;</span> <span id="L20" class="LineNr"> 20 </span> <span id="L21" class="LineNr"> 21 </span><span class="Comment">//: A continuation can be called like a recipe.</span> -<span id="L22" class="LineNr"> 22 </span><span class="Delimiter">:(before "End <a href='071recipe.cc.html#L277'>is_mu_recipe</a> Atom Cases(r)")</span> +<span id="L22" class="LineNr"> 22 </span><span class="Delimiter">:(before "End <a href='072recipe.cc.html#L277'>is_mu_recipe</a> Atom Cases(r)")</span> <span id="L23" class="LineNr"> 23 </span><span class="Normal">if</span> <span class="Delimiter">(</span>r<span class="Delimiter">.</span>type<span class="Delimiter">-></span>name == <span class="Constant">"continuation"</span><span class="Delimiter">)</span> <span class="Identifier">return</span> <span class="Constant">true</span><span class="Delimiter">;</span> <span id="L24" class="LineNr"> 24 </span> <span id="L25" class="LineNr"> 25 </span><span class="Comment">//: However, it can't be type-checked like most recipes. Pretend it's like a</span> @@ -119,11 +119,11 @@ if ('onhashchange' in window) { <span id="L55" class="LineNr"> 55 </span> <span class="Constant">23</span>:number<span class="Special"> <- </span>add <span class="Constant">22</span>:number<span class="Delimiter">,</span> <span class="Constant">1</span> <span id="L56" class="LineNr"> 56 </span> <span class="Identifier">return</span> <span class="Constant">23</span>:number <span id="L57" class="LineNr"> 57 </span>] -<span id="L58" class="LineNr"> 58 </span><span class="Comment"># first call of 'g' executes the part before reply-delimited-continuation</span> +<span id="L58" class="LineNr"> 58 </span><span class="Comment"># first call of 'g' executes the part before return-continuation-until-mark</span> <span id="L59" class="LineNr"> 59 </span><span class="traceContains">+mem: storing 77 in location 21</span> <span id="L60" class="LineNr"> 60 </span><span class="traceContains">+run: {2: "number"} <- copy {5: "literal"}</span> <span id="L61" class="LineNr"> 61 </span><span class="traceContains">+mem: storing 5 in location 2</span> -<span id="L62" class="LineNr"> 62 </span><span class="Comment"># calls of the continuation execute the part after reply-delimited-continuation</span> +<span id="L62" class="LineNr"> 62 </span><span class="Comment"># calls of the continuation execute the part after return-continuation-until-mark</span> <span id="L63" class="LineNr"> 63 </span><span class="traceContains">+run: {2: "number"} <- call {1: "continuation"}, {2: "number"}</span> <span id="L64" class="LineNr"> 64 </span><span class="traceContains">+mem: storing 5 in location 22</span> <span id="L65" class="LineNr"> 65 </span><span class="traceContains">+mem: storing 6 in location 2</span> @@ -133,9 +133,9 @@ if ('onhashchange' in window) { <span id="L69" class="LineNr"> 69 </span><span class="traceContains">+run: {2: "number"} <- call {1: "continuation"}, {2: "number"}</span> <span id="L70" class="LineNr"> 70 </span><span class="traceContains">+mem: storing 7 in location 22</span> <span id="L71" class="LineNr"> 71 </span><span class="traceContains">+mem: storing 8 in location 2</span> -<span id="L72" class="LineNr"> 72 </span><span class="Comment"># first call of 'g' does not execute the part after reply-delimited-continuation</span> +<span id="L72" class="LineNr"> 72 </span><span class="Comment"># first call of 'g' does not execute the part after return-continuation-until-mark</span> <span id="L73" class="LineNr"> 73 </span><span class="traceAbsent">-mem: storing 77 in location 22</span> -<span id="L74" class="LineNr"> 74 </span><span class="Comment"># calls of the continuation don't execute the part before reply-delimited-continuation</span> +<span id="L74" class="LineNr"> 74 </span><span class="Comment"># calls of the continuation don't execute the part before return-continuation-until-mark</span> <span id="L75" class="LineNr"> 75 </span><span class="traceAbsent">-mem: storing 5 in location 21</span> <span id="L76" class="LineNr"> 76 </span><span class="traceAbsent">-mem: storing 6 in location 21</span> <span id="L77" class="LineNr"> 77 </span><span class="traceAbsent">-mem: storing 7 in location 21</span> @@ -245,7 +245,7 @@ if ('onhashchange' in window) { <span id="L181" class="LineNr">181 </span> <span class="Conceal">¦</span> <a href='003trace.cc.html#L161'>trace</a><span class="Delimiter">(</span><span class="Constant">"trace"</span><span class="Delimiter">)</span> << <span class="Constant">"calling delimited continuation; growing callstack depth to "</span> << Trace_stream<span class="Delimiter">-></span>callstack_depth << <a href='003trace.cc.html#L197'>end</a><span class="Delimiter">();</span> <span id="L182" class="LineNr">182 </span> <span class="Conceal">¦</span> assert<span class="Delimiter">(</span>Trace_stream<span class="Delimiter">-></span>callstack_depth < <span class="Constant">9000</span><span class="Delimiter">);</span> <span class="Comment">// 9998-101 plus cushion</span> <span id="L183" class="LineNr">183 </span> <span class="Delimiter">}</span> -<span id="L184" class="LineNr">184 </span> ++current_step_index<span class="Delimiter">();</span> <span class="Comment">// skip past the reply-delimited-continuation</span> +<span id="L184" class="LineNr">184 </span> ++current_step_index<span class="Delimiter">();</span> <span class="Comment">// skip past the return-continuation-until-mark</span> <span id="L185" class="LineNr">185 </span> ingredients<span class="Delimiter">.</span>erase<span class="Delimiter">(</span>ingredients<span class="Delimiter">.</span>begin<span class="Delimiter">());</span> <span class="Comment">// drop the callee</span> <span id="L186" class="LineNr">186 </span> finish_call_housekeeping<span class="Delimiter">(</span><a href='026call.cc.html#L84'>to_instruction</a><span class="Delimiter">(</span>caller<span class="Delimiter">),</span> ingredients<span class="Delimiter">);</span> <span id="L187" class="LineNr">187 </span> <span class="Identifier">continue</span><span class="Delimiter">;</span> diff --git a/index.html b/index.html index be4e0bf5..8b704838 100644 --- a/index.html +++ b/index.html @@ -156,16 +156,16 @@ addresses around all you like, and write from any copy of an address) and simpler implementation (no static analysis). Mu by convention abbreviates type <tt>address</tt> to <tt>&</tt>. -<p/>Support for higher-order recipes that can pass <a href='html/071recipe.cc.html'>recipes</a> +<p/>Support for higher-order recipes that can pass <a href='html/072recipe.cc.html'>recipes</a> around like any other value. -<p/>Support for running multiple functions concurrently using <a href='html/072scheduler.cc.html'><em>routines</em></a>, +<p/>Support for running multiple functions concurrently using <a href='html/073scheduler.cc.html'><em>routines</em></a>, for communicating between routines using <a href='html/075channel.mu.html'><em>channels</em></a>, -and for <a href='html/073wait.cc.html'>synchronizing</a> between routines. +and for <a href='html/074wait.cc.html'>synchronizing</a> between routines. Channels are Mu's only synchronization primitive, queues that can cause the routine reading or writing from them to stall without taking up CPU resources. Mu provides safe concurrency by forbidding routines from sharing addresses; -writing to a channel always performs a <a href='html/074deep_copy.cc.html'>deep copy</a> +writing to a channel always performs a <a href='html/071deep_copy.cc.html'>deep copy</a> that preserves all internal aliasing. <p><b>Part III</b>: transforms to make Mu a little more expressive, and give |