2019-03-17 14:40:57 +02:00
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
< html >
< head >
2020-04-14 19:56:54 +03:00
< title > Cinders and Deferrals< / title >
2020-05-03 03:20:55 +03:00
< link href = "../docs-assets/Breadcrumbs.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
2020-03-19 02:11:25 +02:00
< meta name = "viewport" content = "width=device-width initial-scale=1" >
2019-03-17 14:40:57 +02:00
< meta http-equiv = "Content-Type" content = "text/html; charset=utf-8" >
< meta http-equiv = "Content-Language" content = "en-gb" >
2020-05-03 03:01:21 +03:00
2020-05-03 03:20:55 +03:00
< link href = "../docs-assets/Contents.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Progress.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Navigation.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Fonts.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Base.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
2020-05-03 03:01:21 +03:00
< script >
MathJax = {
tex: {
inlineMath: '$', '$'], ['\\(', '\\)'
},
svg: {
fontCache: 'global'
}
};
< / script >
< script type = "text/javascript" id = "MathJax-script" async
src="https://cdn.jsdelivr.net/npm/mathjax@3/es5/tex-svg.js">
< / script >
< script >
function togglePopup(material_id) {
var popup = document.getElementById(material_id);
popup.classList.toggle("show");
}
< / script >
2020-05-03 03:20:55 +03:00
< link href = "../docs-assets/Popups.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Colours.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
2020-04-14 19:56:54 +03:00
2019-03-17 14:40:57 +02:00
< / head >
2020-05-03 03:01:21 +03:00
< body class = "commentary-font" >
2020-03-19 02:11:25 +02:00
< nav role = "navigation" >
2020-04-14 19:56:54 +03:00
< h1 > < a href = "../index.html" >
2020-05-03 18:34:53 +03:00
< img src = "../docs-assets/Inform.png" height = 72" >
2020-04-14 19:56:54 +03:00
< / a > < / h1 >
< ul > < li > < a href = "../compiler.html" > compiler tools< / a > < / li >
2020-03-19 02:11:25 +02:00
< li > < a href = "../other.html" > other tools< / a > < / li >
< li > < a href = "../extensions.html" > extensions and kits< / a > < / li >
< li > < a href = "../units.html" > unit test tools< / a > < / li >
2020-04-14 19:56:54 +03:00
< / ul > < h2 > Compiler Webs< / h2 > < ul >
2020-03-19 02:11:25 +02:00
< li > < a href = "../inbuild/index.html" > inbuild< / a > < / li >
< li > < a href = "../inform7/index.html" > inform7< / a > < / li >
< li > < a href = "../inter/index.html" > inter< / a > < / li >
2020-04-14 19:56:54 +03:00
< / ul > < h2 > Inbuild Modules< / h2 > < ul >
< li > < a href = "../supervisor-module/index.html" > supervisor< / a > < / li >
< / ul > < h2 > Inform7 Modules< / h2 > < ul >
2020-08-26 12:52:50 +03:00
< li > < a href = "../core-module/index.html" > core< / a > < / li >
< li > < a href = "../assertions-module/index.html" > assertions< / a > < / li >
< li > < a href = "../values-module/index.html" > values< / a > < / li >
< li > < a href = "../knowledge-module/index.html" > knowledge< / a > < / li >
< li > < a href = "index.html" > < span class = "selectedlink" > imperative< / span > < / a > < / li >
< li > < a href = "../runtime-module/index.html" > runtime< / a > < / li >
2020-03-19 02:11:25 +02:00
< li > < a href = "../if-module/index.html" > if< / a > < / li >
< li > < a href = "../multimedia-module/index.html" > multimedia< / a > < / li >
< li > < a href = "../index-module/index.html" > index< / a > < / li >
2020-04-14 19:56:54 +03:00
< / ul > < h2 > Inter Modules< / h2 > < ul >
< li > < a href = "../bytecode-module/index.html" > bytecode< / a > < / li >
2020-03-19 02:11:25 +02:00
< li > < a href = "../building-module/index.html" > building< / a > < / li >
< li > < a href = "../codegen-module/index.html" > codegen< / a > < / li >
2020-05-20 02:02:28 +03:00
< / ul > < h2 > Services< / h2 > < ul >
2020-04-14 19:56:54 +03:00
< li > < a href = "../arch-module/index.html" > arch< / a > < / li >
2020-08-20 01:36:18 +03:00
< li > < a href = "../calculus-module/index.html" > calculus< / a > < / li >
2020-04-14 19:56:54 +03:00
< li > < a href = "../html-module/index.html" > html< / a > < / li >
2020-05-20 02:02:28 +03:00
< li > < a href = "../inflections-module/index.html" > inflections< / a > < / li >
2020-08-20 01:36:18 +03:00
< li > < a href = "../kinds-module/index.html" > kinds< / a > < / li >
2020-05-20 02:02:28 +03:00
< li > < a href = "../linguistics-module/index.html" > linguistics< / a > < / li >
< li > < a href = "../problems-module/index.html" > problems< / a > < / li >
2020-08-20 01:36:18 +03:00
< li > < a href = "../syntax-module/index.html" > syntax< / a > < / li >
< li > < a href = "../words-module/index.html" > words< / a > < / li >
2020-03-19 02:11:25 +02:00
< li > < a href = "../../../inweb/docs/foundation-module/index.html" > foundation< / a > < / li >
2020-04-14 19:56:54 +03:00
< / ul >
2020-03-19 02:11:25 +02:00
< / nav >
< main role = "main" >
2020-05-03 03:01:21 +03:00
<!-- Weave of 'Cinders and Deferrals' generated by Inweb -->
< div class = "breadcrumbs" >
2021-04-04 01:10:19 +03:00
< ul class = "crumbs" > < li > < a href = "../index.html" > Home< / a > < / li > < li > < a href = "../compiler.html" > Inform7< / a > < / li > < li > < a href = "index.html" > imperative< / a > < / li > < li > < a href = "index.html#3" > Chapter 3: Propositions< / a > < / li > < li > < b > Cinders and Deferrals< / b > < / li > < / ul > < / div >
2020-05-03 03:01:21 +03:00
< p class = "purpose" > To compile terms, having carefully preserved any constants which might have been lost in the process of deferring a proposition (such tricky constants being called "cinders").< / p >
2019-03-17 14:40:57 +02:00
2021-03-30 00:53:01 +03:00
< ul class = "toc" > < li > < a href = "3-cad.html#SP1" > § 1. About cinders< / a > < / li > < li > < a href = "3-cad.html#SP3" > § 3. Finding cinders< / a > < / li > < li > < a href = "3-cad.html#SP5" > § 5. Declaring cinder parameters< / a > < / li > < li > < a href = "3-cad.html#SP6" > § 6. The kind of terms< / a > < / li > < / ul > < hr class = "tocbar" >
2019-03-17 14:40:57 +02:00
2020-08-18 00:57:45 +03:00
< p class = "commentary firstcommentary" > < a id = "SP1" class = "paragraph-anchor" > < / a > < b > § 1. About cinders. < / b > Any proposition which includes quantification will, in general, need to be
2019-03-17 14:40:57 +02:00
deferred: the quantifier will become a loop, and the loop variable will be a
local variable in the deferred routine. Instead of compiling explicit code
2020-05-03 03:01:21 +03:00
in the current routine < span class = "extract" > < span class = "extract-syntax" > R< / span > < / span > , we will compile a call to, say, < span class = "extract" > < span class = "extract-syntax" > Prop_19< / span > < / span > .
2019-03-17 14:40:57 +02:00
< / p >
2020-05-03 03:01:21 +03:00
< p class = "commentary" > It is both good and bad that < span class = "extract" > < span class = "extract-syntax" > Prop_19< / span > < / span > has its own set of local variables.
2019-03-17 14:40:57 +02:00
Good because this means it can have loop variables and counters to help it
2020-05-03 03:01:21 +03:00
to implement quantifiers, without having to use up scarce locals in < span class = "extract" > < span class = "extract-syntax" > R< / span > < / span > .
2019-03-17 14:40:57 +02:00
(Recall that I6 allows only 15 locals in any one routine.) But bad because
2020-05-03 03:01:21 +03:00
the proposition may itself involve mention of local variables in < span class = "extract" > < span class = "extract-syntax" > R< / span > < / span > , which
do not exist inside < span class = "extract" > < span class = "extract-syntax" > Prop_19< / span > < / span > .
2019-03-17 14:40:57 +02:00
< / p >
2020-05-03 03:01:21 +03:00
< p class = "commentary" > There are two issues here. Suppose we have:
2019-03-17 14:40:57 +02:00
< / p >
< blockquote >
< p > if a dark room contains the painting< / p >
< / blockquote >
2020-05-03 03:01:21 +03:00
< p class = "commentary" > This compiles to code quantifying over rooms \(x\), requiring a loop, so it
2019-03-17 14:40:57 +02:00
will be deferred to a routine. "The painting" is, in predicate calculus
2020-04-14 19:56:54 +03:00
terms, a constant — in that it does not depend on \(x\) — but that does not
2019-03-17 14:40:57 +02:00
mean it's a value known at compile time. If it is a local variable in the
current routine, then it won't exist in the deferred one, as mentioned
above. But it might also be a phrase to decide something, which has
side-effects, so that it might be important not to evaluate it more than
once.
< / p >
2020-05-03 03:01:21 +03:00
< p class = "commentary" > Any such constants are compiled into the call to < span class = "extract" > < span class = "extract-syntax" > Prop_19< / span > < / span > as parameters:
then, when the latter is compiled, they become locals < span class = "extract" > < span class = "extract-syntax" > const_0< / span > < / span > , < span class = "extract" > < span class = "extract-syntax" > const_1< / span > < / span > ,
2019-03-17 14:40:57 +02:00
..., whose evaluation will be rapid and without side-effects.
< / p >
2020-08-18 00:57:45 +03:00
< p class = "commentary firstcommentary" > < a id = "SP2" class = "paragraph-anchor" > < / a > < b > § 2. < / b > As part of the deferral process, then, we scan through a proposition to look
2019-03-17 14:40:57 +02:00
for constants which might cause trouble. These are called "cinders", which
is a contraction of "constants in deferred routines".
< / p >
2020-05-03 03:01:21 +03:00
< p class = "commentary" > Within any given proposition, the cinders are numbered 0, 1, 2, ...; these
numbers are recorded in the < span class = "extract" > < span class = "extract-syntax" > cinder< / span > < / span > field of the relevant < span class = "extract" > < span class = "extract-syntax" > pcalc_term< / span > < / span >
structure. A constant term with < span class = "extract" > < span class = "extract-syntax" > cinder< / span > < / span > set to \(-1\) is harmless, and
can be compiled in < span class = "extract" > < span class = "extract-syntax" > Prop_19< / span > < / span > as it stands: a literal number, for instance.
2019-03-17 14:40:57 +02:00
< / p >
2020-05-03 03:01:21 +03:00
< p class = "commentary" > At any given moment, we can only be working on the compilation of a single
2019-03-17 14:40:57 +02:00
deferred proposition routine. The following records the information noted
down at the time when the proposition was deferred:
< / p >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > pcalc_prop_deferral< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > current_pdef< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment-syntax" > used only in this section< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-08-18 00:57:45 +03:00
< p class = "commentary firstcommentary" > < a id = "SP3" class = "paragraph-anchor" > < / a > < b > § 3. Finding cinders. < / b > In this operation, conducted when we defer a proposition, we look for
2019-03-17 14:40:57 +02:00
constant terms which need to be cindered, do so, compile their values as
a comma-separated list of I6 expressions (which can be used in a function
call), note down their kinds of value in the record of the deferral, and
return the number of cinders made.
< / p >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
2021-04-09 12:09:44 +03:00
< span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > Deferrals::Cinders::find_count< / span > < button class = "popup" onclick = "togglePopup('usagePopup1')" > < span class = "comment-syntax" > ?< / span > < span class = "popuptext" id = "usagePopup1" > Usage of < span class = "code-font" > < span class = "function-syntax" > Deferrals::Cinders::find_count< / span > < / span > :< br / > Deciding to Defer - < a href = "3-dtd.html#SP13" > § 13< / a > , < a href = "3-dtd.html#SP24" > § 24< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pcalc_prop< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > prop< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > pcalc_prop_deferral< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > pdef< / span > < span class = "plain-syntax" > ) {< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > TRAVERSE_VARIABLE< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pl< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > cinder_number< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > pcalc_prop_deferral< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > save_current_pdef< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > current_pdef< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > current_pdef< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > pdef< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > TRAVERSE_PROPOSITION< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pl< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > prop< / span > < span class = "plain-syntax" > )< / span >
2020-08-20 01:36:18 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > for< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > =0; < / span > < span class = "identifier-syntax" > i< / span > < span class = "function-syntax" > < pl-> < / span > < span class = "identifier-syntax" > arity< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > ++)< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > cinder_number< / span > < span class = "plain-syntax" > =< / span >
2021-04-09 12:09:44 +03:00
< span class = "plain-syntax" > < / span > < a href = "3-cad.html#SP3" class = "function-link" > < span class = "function-syntax" > Deferrals::Cinders::cind_find_in_term_count< / span > < / a > < span class = "plain-syntax" > (& (< / span > < span class = "identifier-syntax" > pl< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > terms< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > ]), < / span > < span class = "identifier-syntax" > cinder_number< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > current_pdef< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > save_current_pdef< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > cinder_number< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2021-04-09 12:09:44 +03:00
< span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > Deferrals::Cinders::find_emit< / span > < button class = "popup" onclick = "togglePopup('usagePopup2')" > < span class = "comment-syntax" > ?< / span > < span class = "popuptext" id = "usagePopup2" > Usage of < span class = "code-font" > < span class = "function-syntax" > Deferrals::Cinders::find_emit< / span > < / span > :< br / > Deciding to Defer - < a href = "3-dtd.html#SP6_1_2" > § 6.1.2< / a > , < a href = "3-dtd.html#SP8" > § 8< / a > , < a href = "3-dtd.html#SP13" > § 13< / a > , < a href = "3-dtd.html#SP24" > § 24< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pcalc_prop< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > prop< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > pcalc_prop_deferral< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > pdef< / span > < span class = "plain-syntax" > ) {< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > TRAVERSE_VARIABLE< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pl< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > cinder_number< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > started< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > pcalc_prop_deferral< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > save_current_pdef< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > current_pdef< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > current_pdef< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > pdef< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > TRAVERSE_PROPOSITION< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pl< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > prop< / span > < span class = "plain-syntax" > )< / span >
2020-08-20 01:36:18 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > for< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > =0; < / span > < span class = "identifier-syntax" > i< / span > < span class = "function-syntax" > < pl-> < / span > < span class = "identifier-syntax" > arity< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > ++)< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > cinder_number< / span > < span class = "plain-syntax" > =< / span >
2021-04-09 12:09:44 +03:00
< span class = "plain-syntax" > < / span > < a href = "3-cad.html#SP3" class = "function-link" > < span class = "function-syntax" > Deferrals::Cinders::cind_find_in_term_emit< / span > < / a > < span class = "plain-syntax" > (& (< / span > < span class = "identifier-syntax" > pl< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > terms< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > ]), < / span > < span class = "identifier-syntax" > cinder_number< / span > < span class = "plain-syntax" > , & < / span > < span class = "identifier-syntax" > started< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > current_pdef< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > save_current_pdef< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > cinder_number< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2021-04-09 12:09:44 +03:00
< span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > Deferrals::Cinders::cind_find_in_term_emit< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pcalc_term< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > cinder_number< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > started< / span > < span class = "plain-syntax" > ) {< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "comment-syntax" > do not clear the local I6 stream< / span >
2020-08-20 01:36:18 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > function< / span > < span class = "plain-syntax" > )< / span >
2021-04-09 12:09:44 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < a href = "3-cad.html#SP3" class = "function-link" > < span class = "function-syntax" > Deferrals::Cinders::cind_find_in_term_emit< / span > < / a > < span class = "plain-syntax" > (& (< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > function< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > fn_of< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > cinder_number< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > started< / span > < span class = "plain-syntax" > );< / span >
2020-08-20 01:36:18 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > constant< / span > < span class = "plain-syntax" > ) {< / span >
2021-04-09 12:09:44 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < a href = "3-cad.html#SP4" class = "function-link" > < span class = "function-syntax" > Deferrals::Cinders::spec_needs_to_be_cindered< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > constant< / span > < span class = "plain-syntax" > )) {< / span >
2020-08-20 01:36:18 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > cinder< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > cinder_number< / span > < span class = "plain-syntax" > ++;< / span >
2021-04-08 17:06:01 +03:00
< span class = "plain-syntax" > < / span > < a href = "3-cv.html#SP5" class = "function-link" > < span class = "function-syntax" > CompileValues::to_code_val< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > constant< / span > < span class = "plain-syntax" > );< / span >
2020-08-20 01:36:18 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > current_pdef< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > cinder_kinds< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > cinder< / span > < span class = "plain-syntax" > ] =< / span >
2020-08-26 12:52:50 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Specifications::to_kind< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > constant< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > started< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > TRUE< / span > < span class = "plain-syntax" > ;< / span >
2020-08-20 01:36:18 +03:00
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > cinder< / span > < span class = "plain-syntax" > = -1;< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > cinder_number< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2021-04-09 12:09:44 +03:00
< span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > Deferrals::Cinders::cind_find_in_term_count< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pcalc_term< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > cinder_number< / span > < span class = "plain-syntax" > ) {< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "comment-syntax" > do not clear the local I6 stream< / span >
2020-08-20 01:36:18 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > function< / span > < span class = "plain-syntax" > )< / span >
2021-04-09 12:09:44 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < a href = "3-cad.html#SP3" class = "function-link" > < span class = "function-syntax" > Deferrals::Cinders::cind_find_in_term_count< / span > < / a > < span class = "plain-syntax" > (& (< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > function< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > fn_of< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > cinder_number< / span > < span class = "plain-syntax" > );< / span >
2020-08-20 01:36:18 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > constant< / span > < span class = "plain-syntax" > ) {< / span >
2021-04-09 12:09:44 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < a href = "3-cad.html#SP4" class = "function-link" > < span class = "function-syntax" > Deferrals::Cinders::spec_needs_to_be_cindered< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > constant< / span > < span class = "plain-syntax" > )) {< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > cinder_number< / span > < span class = "plain-syntax" > ++;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > cinder_number< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-08-18 00:57:45 +03:00
< p class = "commentary firstcommentary" > < a id = "SP4" class = "paragraph-anchor" > < / a > < b > § 4. < / b > Which leaves us to decide, given any specification, whether it represents
2019-03-17 14:40:57 +02:00
a value needing to be cindered.
< / p >
2020-05-03 03:01:21 +03:00
< p class = "commentary" > If in doubt, we should cinder, but we don't want to go mad since there's a limit
2019-03-17 14:40:57 +02:00
to how many cinders can be passed as parameters. Currently we do cinder these:
< / p >
< ul class = "items" > < li > (a) phrases to decide values, cindered because they might be slow or have
side-effects to evaluate;
< / li > < li > (b) stacked non-local variables, such as variables attached to actions or
activities, cindered because they are only allowed in certain routines, and
the eventual deferred proposition routine might not qualify;
< / li > < li > (c) local variables, cindered since they won't exist in the deferred routine;
< / li > < li > (d) list and table entries, cindered since they are relatively slow to look up.
< / li > < / ul >
2020-05-03 03:01:21 +03:00
< p class = "commentary" > But we do not cinder these, since their evaluation never depends on context
2019-03-17 14:40:57 +02:00
and never needs more than a single array entry lookup at run-time:
< / p >
< ul class = "items" > < li > (a) constants from literal numbers to names of scenes, rulebooks, and so on;
< / li > < li > (b) global variables.
< / li > < / ul >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
2021-04-09 12:09:44 +03:00
< span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > Deferrals::Cinders::spec_needs_to_be_cindered< / span > < button class = "popup" onclick = "togglePopup('usagePopup3')" > < span class = "comment-syntax" > ?< / span > < span class = "popuptext" id = "usagePopup3" > Usage of < span class = "code-font" > < span class = "function-syntax" > Deferrals::Cinders::spec_needs_to_be_cindered< / span > < / span > :< br / > < a href = "3-cad.html#SP3" > § 3< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > parse_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > ) {< / span >
2020-08-26 12:52:50 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Node::is< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > CONSTANT_NT< / span > < span class = "plain-syntax" > )) < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Lvalues::is_global_variable< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > )) < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > TRUE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-08-18 00:57:45 +03:00
< p class = "commentary firstcommentary" > < a id = "SP5" class = "paragraph-anchor" > < / a > < b > § 5. Declaring cinder parameters. < / b > Symmetrically, when we come to compiled our deferred proposition routine
2020-05-03 03:01:21 +03:00
< span class = "extract" > < span class = "extract-syntax" > Prop_19< / span > < / span > , we need to place suitable cinder variables in its I6 header.
2019-03-17 14:40:57 +02:00
We print their names, separated by spaces, since that's the somewhat
assembler-like syntax used by I6 routine headers.
< / p >
2020-05-03 03:01:21 +03:00
< p class = "commentary" > We also set < span class = "extract" > < span class = "extract-syntax" > current_pdef< / span > < / span > , since this is the first action taken in starting
2019-03-17 14:40:57 +02:00
a new deferred routine.
< / p >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
2021-04-09 12:09:44 +03:00
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > Deferrals::Cinders::declare< / span > < button class = "popup" onclick = "togglePopup('usagePopup4')" > < span class = "comment-syntax" > ?< / span > < span class = "popuptext" id = "usagePopup4" > Usage of < span class = "code-font" > < span class = "function-syntax" > Deferrals::Cinders::declare< / span > < / span > :< br / > Compile Deferred Propositions - < a href = "3-cdp.html#SP2_1_5" > § 2.1.5< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pcalc_prop< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > prop< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > pcalc_prop_deferral< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > pdef< / span > < span class = "plain-syntax" > ) {< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > TRAVERSE_VARIABLE< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pl< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > cinder_number< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > pcalc_prop_deferral< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > save_current_pdef< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > current_pdef< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > current_pdef< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > pdef< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > TRAVERSE_PROPOSITION< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pl< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > prop< / span > < span class = "plain-syntax" > )< / span >
2020-08-20 01:36:18 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > for< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > =0; < / span > < span class = "identifier-syntax" > i< / span > < span class = "function-syntax" > < pl-> < / span > < span class = "identifier-syntax" > arity< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > ++)< / span >
2021-04-09 12:09:44 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > cinder_number< / span > < span class = "plain-syntax" > = < / span > < a href = "3-cad.html#SP5" class = "function-link" > < span class = "function-syntax" > Deferrals::Cinders::cind_declare_in< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > cinder_number< / span > < span class = "plain-syntax" > , & (< / span > < span class = "identifier-syntax" > pl< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > terms< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > ]));< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > current_pdef< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > save_current_pdef< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2021-04-09 12:09:44 +03:00
< span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > Deferrals::Cinders::cind_declare_in< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > cinder_number< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > pcalc_term< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > ) {< / span >
2020-08-20 01:36:18 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > function< / span > < span class = "plain-syntax" > )< / span >
2021-04-09 12:09:44 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < a href = "3-cad.html#SP5" class = "function-link" > < span class = "function-syntax" > Deferrals::Cinders::cind_declare_in< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > cinder_number< / span > < span class = "plain-syntax" > , & (< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > function< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > fn_of< / span > < span class = "plain-syntax" > ));< / span >
2020-08-20 01:36:18 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > constant< / span > < span class = "plain-syntax" > ) & & (< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > cinder< / span > < span class = "plain-syntax" > > = < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > ))< / span >
2020-08-26 12:52:50 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Node::is< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > constant< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > CONSTANT_NT< / span > < span class = "plain-syntax" > ) == < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ) {< / span >
2020-06-28 01:18:54 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > TEMPORARY_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > cinder_name< / span > < span class = "plain-syntax" > )< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE_TO< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > cinder_name< / span > < span class = "plain-syntax" > , < / span > < span class = "string-syntax" > "const_%d"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > cinder_number< / span > < span class = "plain-syntax" > ++);< / span >
2021-04-02 19:33:37 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-lv.html#SP4" class = "function-link" > < span class = "function-syntax" > LocalVariables::new_other_as_symbol< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > cinder_name< / span > < span class = "plain-syntax" > );< / span >
2020-06-28 01:18:54 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > DISCARD_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > cinder_name< / span > < span class = "plain-syntax" > )< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > cinder_number< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-08-18 00:57:45 +03:00
< p class = "commentary firstcommentary" > < a id = "SP6" class = "paragraph-anchor" > < / a > < b > § 6. The kind of terms. < / b > We are now finally able to say what the kind of value of a term to be
2019-03-17 14:40:57 +02:00
compiled is. The only troublesome case is when the term is a cinder; its
kind is then part of the information recorded at deferral time.
< / p >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
2021-04-09 12:09:44 +03:00
< span class = "identifier-syntax" > kind< / span > < span class = "plain-syntax" > *< / span > < span class = "function-syntax" > Deferrals::Cinders::kind_of_value_of_term< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pcalc_term< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > ) {< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > variable< / span > < span class = "plain-syntax" > > = < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > ) {< / span >
2020-08-20 01:36:18 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > term_checked_as_kind< / span > < span class = "plain-syntax" > ) < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > term_checked_as_kind< / span > < span class = "plain-syntax" > ;< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > K_object< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > constant< / span > < span class = "plain-syntax" > ) {< / span >
2020-08-20 01:36:18 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > cinder< / span > < span class = "plain-syntax" > > = < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > ) < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > current_pdef< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > cinder_kinds< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > cinder< / span > < span class = "plain-syntax" > ];< / span >
2020-08-27 17:50:24 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Specifications::is_phrasal< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > constant< / span > < span class = "plain-syntax" > ))< / span >
2020-08-26 12:52:50 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Dash::check_value< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > constant< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Specifications::to_kind< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > constant< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pt< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > function< / span > < span class = "plain-syntax" > ) < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > K_object< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > internal_error< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "Broken pcalc term"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-08-18 00:57:45 +03:00
< p class = "commentary firstcommentary" > < a id = "SP7" class = "paragraph-anchor" > < / a > < b > § 7. < / b > < / p >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
2021-04-09 12:09:44 +03:00
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > Deferrals::Cinders::emit< / span > < button class = "popup" onclick = "togglePopup('usagePopup5')" > < span class = "comment-syntax" > ?< / span > < span class = "popuptext" id = "usagePopup5" > Usage of < span class = "code-font" > < span class = "function-syntax" > Deferrals::Cinders::emit< / span > < / span > :< br / > Compile Schemas - < a href = "3-cs.html#SP5_2" > § 5.2< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > c< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > local_variable< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > lvar< / span > < span class = "plain-syntax" > = < / span > < a href = "3-cad.html#SP7" class = "function-link" > < span class = "function-syntax" > Deferrals::Cinders::find_cinder_var< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > c< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > lvar< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > internal_error< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "absent calculus variable"< / span > < span class = "plain-syntax" > );< / span >
2021-04-02 19:33:37 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_symbol< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > lvar_s< / span > < span class = "plain-syntax" > = < / span > < a href = "2-lv.html#SP1" class = "function-link" > < span class = "function-syntax" > LocalVariables::declare< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > lvar< / span > < span class = "plain-syntax" > );< / span >
2020-08-26 12:52:50 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Produce::val_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Emit::tree< / span > < span class = "plain-syntax" > (), < / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > lvar_s< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > }< / span >
2021-04-02 19:33:37 +03:00
2021-04-09 12:09:44 +03:00
< span class = "reserved-syntax" > local_variable< / span > < span class = "plain-syntax" > *< / span > < span class = "function-syntax" > Deferrals::Cinders::find_cinder_var< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > v< / span > < span class = "plain-syntax" > ) {< / span >
2021-04-02 19:33:37 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > TEMPORARY_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > T< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE_TO< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > T< / span > < span class = "plain-syntax" > , < / span > < span class = "string-syntax" > "const_%d"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > v< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > local_variable< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > found< / span > < span class = "plain-syntax" > = < / span > < a href = "2-lv.html#SP13" class = "function-link" > < span class = "function-syntax" > LocalVariables::by_identifier< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > T< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > DISCARD_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > T< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > found< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-05-03 03:01:21 +03:00
< nav role = "progress" > < div class = "progresscontainer" >
2021-04-09 12:09:44 +03:00
< ul class = "progressbar" > < li class = "progressprev" > < a href = "3-dtd.html" > ❮ < / a > < / li > < li class = "progresschapter" > < a href = "P-wtmd.html" > P< / a > < / li > < li class = "progresschapter" > < a href = "1-im.html" > 1< / a > < / li > < li class = "progresschapter" > < a href = "2-sf.html" > 2< / a > < / li > < li class = "progresscurrentchapter" > 3< / li > < li class = "progresssection" > < a href = "3-cv.html" > cv< / a > < / li > < li class = "progresssection" > < a href = "3-cs.html" > cs< / a > < / li > < li class = "progresssection" > < a href = "3-ca.html" > ca< / a > < / li > < li class = "progresssection" > < a href = "3-cp.html" > cp< / a > < / li > < li class = "progresssection" > < a href = "3-dtd.html" > dtd< / a > < / li > < li class = "progresscurrent" > cad< / li > < li class = "progresssection" > < a href = "3-cdp.html" > cdp< / a > < / li > < li class = "progresschapter" > < a href = "4-cbal.html" > 4< / a > < / li > < li class = "progressnext" > < a href = "3-cdp.html" > ❯ < / a > < / li > < / ul > < / div >
2020-05-03 03:01:21 +03:00
< / nav > <!-- End of weave -->
2019-03-17 14:40:57 +02:00
2020-03-19 02:11:25 +02:00
< / main >
2019-03-17 14:40:57 +02:00
< / body >
< / html >
