about summary refs log tree commit diff stats
path: root/arc/callcc.mu
Commit message (Expand)AuthorAgeFilesLines
* 1276 - make C++ version the defaultKartik K. Agaram2015-05-051-0/+20
a id='n14' href='#n14'>14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 998check_type_pointers.cc</title>
<meta name="Generator" content="Vim/7.4">
<meta name="plugin-version" content="vim7.4_v2">
<meta name="syntax" content="cpp">
<meta name="settings" content="use_css,pre_wrap,no_foldcolumn,expand_tabs,prevent_copy=">
<meta name="colorscheme" content="minimal">
<style type="text/css">
<!--
pre { white-space: pre-wrap; font-family: monospace; color: #eeeeee; background-color: #080808; }
body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color: #080808; }
* { font-size: 12pt; font-size: 1em; }
.Comment { color: #9090ff; }
.CommentedCode { color: #6c6c6c; }
-->
</style>

<script type='text/javascript'>
<!--

-->
</script>
</head>
<body>
<pre id='vimCodeElement'>
<span class="Comment">//: enable this when tracking down null types</span>
<span class="Comment">//: (but it interferes with edit/; since recipes created in the environment</span>
<span class="Comment">//: can raise warnings here which will stop running the entire environment)</span>
<span class="CommentedCode">//? :(before &quot;End Transform All&quot;)</span>
<span class="CommentedCode">//? check_type_pointers();</span>
<span class="CommentedCode">//? </span>
<span class="CommentedCode">//? :(code)</span>
<span class="CommentedCode">//? void check_type_pointers() {</span>
<span class="CommentedCode">//?   for (map&lt;recipe_ordinal, recipe&gt;::iterator p = Recipe.begin(); p != Recipe.end(); ++p) {</span>
<span class="CommentedCode">//?     if (any_type_ingredient_in_header(p-&gt;first)) continue;</span>
<span class="CommentedCode">//?     const recipe&amp; r = p-&gt;second;</span>
<span class="CommentedCode">//?     for (long long int i = 0; i &lt; SIZE(r.steps); ++i) {</span>
<span class="CommentedCode">//?       const instruction&amp; inst = r.steps.at(i);</span>
<span class="CommentedCode">//?       for (long long int j = 0; j &lt; SIZE(inst.ingredients); ++j) {</span>
<span class="CommentedCode">//?         if (!inst.ingredients.at(j).type) {</span>
<span class="CommentedCode">//?           raise_error &lt;&lt; maybe(r.name) &lt;&lt; &quot; '&quot; &lt;&lt; inst.to_string() &lt;&lt; &quot;' -- &quot; &lt;&lt; inst.ingredients.at(j).to_string() &lt;&lt; &quot; has no type\n&quot; &lt;&lt; end();</span>
<span class="CommentedCode">//?           return;</span>
<span class="CommentedCode">//?         }</span>
<span class="CommentedCode">//?         if (!inst.ingredients.at(j).properties.at(0).second) {</span>
<span class="CommentedCode">//?           raise_error &lt;&lt; maybe(r.name) &lt;&lt; &quot; '&quot; &lt;&lt; inst.to_string() &lt;&lt; &quot;' -- &quot; &lt;&lt; inst.ingredients.at(j).to_string() &lt;&lt; &quot; has no type name\n&quot; &lt;&lt; end();</span>
<span class="CommentedCode">//?           return;</span>
<span class="CommentedCode">//?         }</span>
<span class="CommentedCode">//?       }</span>
<span class="CommentedCode">//?       for (long long int j = 0; j &lt; SIZE(inst.products); ++j) {</span>
<span class="CommentedCode">//?         if (!inst.products.at(j).type) {</span>
<span class="CommentedCode">//?           raise_error &lt;&lt; maybe(r.name) &lt;&lt; &quot; '&quot; &lt;&lt; inst.to_string() &lt;&lt; &quot;' -- &quot; &lt;&lt; inst.products.at(j).to_string() &lt;&lt; &quot; has no type\n&quot; &lt;&lt; end();</span>
<span class="CommentedCode">//?           return;</span>
<span class="CommentedCode">//?         }</span>
<span class="CommentedCode">//?         if (!inst.products.at(j).properties.at(0).second) {</span>
<span class="CommentedCode">//?           raise_error &lt;&lt; maybe(r.name) &lt;&lt; &quot; '&quot; &lt;&lt; inst.to_string() &lt;&lt; &quot;' -- &quot; &lt;&lt; inst.products.at(j).to_string() &lt;&lt; &quot; has no type name\n&quot; &lt;&lt; end();</span>
<span class="CommentedCode">//?           return;</span>
<span class="CommentedCode">//?         }</span>
<span class="CommentedCode">//?       }</span>
<span class="CommentedCode">//?     }</span>
<span class="CommentedCode">//?   }</span>
<span class="CommentedCode">//? }</span>
</pre>
</body>
</html>
<!-- vim: set foldmethod=manual : -->