about summary refs log blame commit diff stats
path: root/108write.subx
blob: 84060c627803e843353fcbba513c69d694f5914e (plain) (tree) 
f94442fe ^


3d6450f2 ^


f94442fe ^




3d6450f2 ^




f94442fe ^


3d6450f2 ^

bfcc0f85 ^

3d6450f2 ^

3d6450f2 ^

ee9a9237 ^



3d6450f2 ^

5e27c7f1 ^

71eb22a5 ^

7a583220 ^

33352536 ^


a148b23a ^



1639687b ^

33352536 ^

6070c23e ^

ee9a9237 ^

33352536 ^


ee9a9237 ^

6030d7e2 ^

ee9a9237 ^

33352536 ^

6030d7e2 ^

261b1b80 ^

6030d7e2 ^

ee9a9237 ^

33352536 ^








bfcc0f85 ^

33352536 ^

bfcc0f85 ^

9d27e966 ^

33352536 ^

bfcc0f85 ^

33352536 ^


9d27e966 ^

33352536 ^


ee9a9237 ^

6030d7e2 ^

ee9a9237 ^

33352536 ^



ee9a9237 ^

33352536 ^




b8475380 ^

7a583220 ^

33352536 ^


6030d7e2 ^

3d6450f2 ^

3d6450f2 ^

6030d7e2 ^

ee9a9237 ^

6030d7e2 ^

ee9a9237 ^

6030d7e2 ^

ee9a9237 ^

33352536 ^

6030d7e2 ^

ee9a9237 ^

6030d7e2 ^


ee9a9237 ^

6030d7e2 ^

ee9a9237 ^

33352536 ^

6030d7e2 ^

ee9a9237 ^

6030d7e2 ^


9d27e966 ^

33352536 ^


ee9a9237 ^

6030d7e2 ^

ee9a9237 ^

33352536 ^

6030d7e2 ^


3d6450f2 ^


6030d7e2 ^

ee9a9237 ^

6030d7e2 ^

ee9a9237 ^

6030d7e2 ^

ee9a9237 ^

33352536 ^

6030d7e2 ^

ee9a9237 ^

6030d7e2 ^


ee9a9237 ^

6030d7e2 ^

ee9a9237 ^

33352536 ^

6030d7e2 ^

ee9a9237 ^

6030d7e2 ^


ee9a9237 ^

6030d7e2 ^

ee9a9237 ^

33352536 generated by cgit-pink 1.4.1-2-gfad0 (git 2.36.2.497.gbbea4dcf42) at 2024-11-30 09:56:08 +0000
pan> class="Delimiter">(</span> <span id="L32" class="LineNr">32 </span> <span class="Constant">&quot;run: 0x00000007 opcode: 01\n&quot;</span> <span id="L33" class="LineNr">33 </span> <span class="Delimiter">);</span> <span id="L34" class="LineNr">34 </span><span class="Delimiter">}</span> <span id="L35" class="LineNr">35 </span> <span id="L36" class="LineNr">36 </span><span class="Normal">void</span> <a href='040---tests.cc.html#L36'>create_test_function</a><span class="Delimiter">(</span>program&amp; p<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L37" class="LineNr">37 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>p<span class="Delimiter">.</span><a href='011run.cc.html#L107'>segments</a><span class="Delimiter">.</span>empty<span class="Delimiter">())</span> <span class="Identifier">return</span><span class="Delimiter">;</span> <span id="L38" class="LineNr">38 </span> segment&amp; code = *find<span class="Delimiter">(</span>p<span class="Delimiter">,</span> <span class="Constant">&quot;code&quot;</span><span class="Delimiter">);</span> <span id="L39" class="LineNr">39 </span> <a href='003trace.cc.html#L96'>trace</a><span class="Delimiter">(</span><span class="Constant">3</span><span class="Delimiter">,</span> <span class="Constant">&quot;transform&quot;</span><span class="Delimiter">)</span> &lt;&lt; <span class="Constant">&quot;-- create 'run-tests'&quot;</span> &lt;&lt; end<span class="Delimiter">();</span> <span id="L40" class="LineNr">40 </span> vector&lt;line&gt; new_insts<span class="Delimiter">;</span> <span id="L41" class="LineNr">41 </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 &lt; <a href='001help.cc.html#L169'>SIZE</a><span class="Delimiter">(</span>code<span class="Delimiter">.</span><a href='011run.cc.html#L114'>lines</a><span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L42" class="LineNr">42 </span> line&amp; inst = code<span class="Delimiter">.</span><a href='011run.cc.html#L114'>lines</a><span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">);</span> <span id="L43" class="LineNr">43 </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 &lt; <a href='001help.cc.html#L169'>SIZE</a><span class="Delimiter">(</span>inst<span class="Delimiter">.</span><a href='011run.cc.html#L123'>words</a><span class="Delimiter">);</span> ++j<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L44" class="LineNr">44 </span> <span class="Normal">const</span> word&amp; curr = inst<span class="Delimiter">.</span><a href='011run.cc.html#L123'>words</a><span class="Delimiter">.</span>at<span class="Delimiter">(</span>j<span class="Delimiter">);</span> <span id="L45" class="LineNr">45 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>*curr<span class="Delimiter">.</span>data<span class="Delimiter">.</span>rbegin<span class="Delimiter">()</span> != <span class="Constant">':'</span><span class="Delimiter">)</span> <span class="Identifier">continue</span><span class="Delimiter">;</span> <span class="Comment">// not a label</span> <span id="L46" class="LineNr">46 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>!starts_with<span class="Delimiter">(</span>curr<span class="Delimiter">.</span>data<span class="Delimiter">,</span> <span class="Constant">&quot;test-&quot;</span><span class="Delimiter">))</span> <span class="Identifier">continue</span><span class="Delimiter">;</span> <span id="L47" class="LineNr">47 </span> string fn = <a href='036labels.cc.html#L263'>drop_last</a><span class="Delimiter">(</span>curr<span class="Delimiter">.</span>data<span class="Delimiter">);</span> <span id="L48" class="LineNr">48 </span> new_insts<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span>call<span class="Delimiter">(</span>fn<span class="Delimiter">));</span> <span id="L49" class="LineNr">49 </span> <span class="Delimiter">}</span> <span id="L50" class="LineNr">50 </span> <span class="Delimiter">}</span> <span id="L51" class="LineNr">51 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>new_insts<span class="Delimiter">.</span>empty<span class="Delimiter">())</span> <span class="Identifier">return</span><span class="Delimiter">;</span> <span class="Comment">// no tests found</span> <span id="L52" class="LineNr">52 </span> code<span class="Delimiter">.</span><a href='011run.cc.html#L114'>lines</a><span class="Delimiter">.</span>push_back<span class="Delimiter">(</span>label<span class="Delimiter">(</span><span class="Constant">&quot;run-tests&quot;</span><span class="Delimiter">));</span> <span id="L53" class="LineNr">53 </span> code<span class="Delimiter">.</span><a href='011run.cc.html#L114'>lines</a><span class="Delimiter">.</span>insert<span class="Delimiter">(</span>code<span class="Delimiter">.</span><a href='011run.cc.html#L114'>lines</a><span class="Delimiter">.</span>end<span class="Delimiter">(),</span> new_insts<span class="Delimiter">.</span>begin<span class="Delimiter">(),</span> new_insts<span class="Delimiter">.</span>end<span class="Delimiter">());</span> <span id="L54" class="LineNr">54 </span> code<span class="Delimiter">.</span><a href='011run.cc.html#L114'>lines</a><span class="Delimiter">.</span>push_back<span class="Delimiter">(</span><a href='040---tests.cc.html#L91'>ret</a><span class="Delimiter">());</span> <span id="L55" class="LineNr">55 </span><span class="Delimiter">}</span> <span id="L56" class="LineNr">56 </span> <span id="L57" class="LineNr">57 </span>string to_string<span class="Delimiter">(</span><span class="Normal">const</span> segment&amp; s<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L58" class="LineNr">58 </span> ostringstream out<span class="Delimiter">;</span> <span id="L59" class="LineNr">59 </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 &lt; <a href='001help.cc.html#L169'>SIZE</a><span class="Delimiter">(</span>s<span class="Delimiter">.</span><a href='011run.cc.html#L114'>lines</a><span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L60" class="LineNr">60 </span> <span class="Normal">const</span> line&amp; l = s<span class="Delimiter">.</span><a href='011run.cc.html#L114'>lines</a><span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<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> j = <span class="Constant">0</span><span class="Delimiter">;</span> j &lt; <a href='001help.cc.html#L169'>SIZE</a><span class="Delimiter">(</span>l<span class="Delimiter">.</span><a href='011run.cc.html#L123'>words</a><span class="Delimiter">);</span> ++j<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L62" class="LineNr">62 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>j &gt; <span class="Constant">0</span><span class="Delimiter">)</span> out &lt;&lt; <span class="Constant">' '</span><span class="Delimiter">;</span> <span id="L63" class="LineNr">63 </span> out &lt;&lt; to_string<span class="Delimiter">(</span>l<span class="Delimiter">.</span><a href='011run.cc.html#L123'>words</a><span class="Delimiter">.</span>at<span class="Delimiter">(</span>j<span class="Delimiter">));</span> <span id="L64" class="LineNr">64 </span> <span class="Delimiter">}</span> <span id="L65" class="LineNr">65 </span> out &lt;&lt; <span class="cSpecial">'\n'</span><span class="Delimiter">;</span> <span id="L66" class="LineNr">66 </span> <span class="Delimiter">}</span> <span id="L67" class="LineNr">67 </span> <span class="Identifier">return</span> out<span class="Delimiter">.</span>str<span class="Delimiter">();</span> <span id="L68" class="LineNr">68 </span><span class="Delimiter">}</span> <span id="L69" class="LineNr">69 </span> <span id="L70" class="LineNr">70 </span><a href='011run.cc.html#L122'>line</a> call<span class="Delimiter">(</span>string s<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L71" class="LineNr">71 </span> <a href='011run.cc.html#L122'>line</a> result<span class="Delimiter">;</span> <span id="L72" class="LineNr">72 </span> result<span class="Delimiter">.</span><a href='011run.cc.html#L123'>words</a><span class="Delimiter">.</span>push_back<span class="Delimiter">(</span>call<span class="Delimiter">());</span> <span id="L73" class="LineNr">73 </span> result<span class="Delimiter">.</span><a href='011run.cc.html#L123'>words</a><span class="Delimiter">.</span>push_back<span class="Delimiter">(</span><a href='040---tests.cc.html#L84'>disp32</a><span class="Delimiter">(</span>s<span class="Delimiter">));</span> <span id="L74" class="LineNr">74 </span> <span class="Identifier">return</span> result<span class="Delimiter">;</span> <span id="L75" class="LineNr">75 </span><span class="Delimiter">}</span> <span id="L76" class="LineNr">76 </span> <span id="L77" class="LineNr">77 </span><a href='011run.cc.html#L128'>word</a> call<span class="Delimiter">()</span> <span class="Delimiter">{</span> <span id="L78" class="LineNr">78 </span> <a href='011run.cc.html#L128'>word</a> result<span class="Delimiter">;</span> <span id="L79" class="LineNr">79 </span> result<span class="Delimiter">.</span>data = <span class="Constant">&quot;e8&quot;</span><span class="Delimiter">;</span> <span id="L80" class="LineNr">80 </span> result<span class="Delimiter">.</span>metadata<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span><span class="Constant">&quot;call&quot;</span><span class="Delimiter">);</span> <span id="L81" class="LineNr">81 </span> <span class="Identifier">return</span> result<span class="Delimiter">;</span> <span id="L82" class="LineNr">82 </span><span class="Delimiter">}</span> <span id="L83" class="LineNr">83 </span> <span id="L84" class="LineNr">84 </span><a href='011run.cc.html#L128'>word</a> <a href='040---tests.cc.html#L84'>disp32</a><span class="Delimiter">(</span>string s<span class="Delimiter">)</span> <span class="Delimiter">{</span> <span id="L85" class="LineNr">85 </span> <a href='011run.cc.html#L128'>word</a> result<span class="Delimiter">;</span> <span id="L86" class="LineNr">86 </span> result<span class="Delimiter">.</span>data = s<span class="Delimiter">;</span> <span id="L87" class="LineNr">87 </span> result<span class="Delimiter">.</span>metadata<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span><span class="Constant">&quot;disp32&quot;</span><span class="Delimiter">);</span> <span id="L88" class="LineNr">88 </span> <span class="Identifier">return</span> result<span class="Delimiter">;</span> <span id="L89" class="LineNr">89 </span><span class="Delimiter">}</span> <span id="L90" class="LineNr">90 </span> <span id="L91" class="LineNr">91 </span><a href='011run.cc.html#L122'>line</a> <a href='040---tests.cc.html#L91'>ret</a><span class="Delimiter">()</span> <span class="Delimiter">{</span> <span id="L92" class="LineNr">92 </span> <a href='011run.cc.html#L122'>line</a> result<span class="Delimiter">;</span> <span id="L93" class="LineNr">93 </span> result<span class="Delimiter">.</span><a href='011run.cc.html#L123'>words</a><span class="Delimiter">.</span>push_back<span class="Delimiter">(</span><a href='011run.cc.html#L128'>word</a><span class="Delimiter">());</span> <span id="L94" class="LineNr">94 </span> result<span class="Delimiter">.</span><a href='011run.cc.html#L123'>words</a><span class="Delimiter">.</span>back<span class="Delimiter">().</span>data = <span class="Constant">&quot;c3&quot;</span><span class="Delimiter">;</span> <span id="L95" class="LineNr">95 </span> result<span class="Delimiter">.</span><a href='011run.cc.html#L123'>words</a><span class="Delimiter">.</span>back<span class="Delimiter">().</span>metadata<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span><span class="Constant">&quot;return&quot;</span><span class="Delimiter">);</span> <span id="L96" class="LineNr">96 </span> <span class="Identifier">return</span> result<span class="Delimiter">;</span> <span id="L97" class="LineNr">97 </span><span class="Delimiter">}</span> </pre> </body> </html> <!-- vim: set foldmethod=manual : -->
generated by cgit-pink 1.4.1-2-gfad0 (git 2.36.2.497.gbbea4dcf42) at 2024-11-30 09:56:08 +0000