2021-04-10 19:55:28 +03:00
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
< html >
< head >
< title > Compile Rvalues< / title >
< link href = "../docs-assets/Breadcrumbs.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< meta name = "viewport" content = "width=device-width initial-scale=1" >
< meta http-equiv = "Content-Type" content = "text/html; charset=utf-8" >
< meta http-equiv = "Content-Language" content = "en-gb" >
< 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" >
< script >
function togglePopup(material_id) {
var popup = document.getElementById(material_id);
popup.classList.toggle("show");
}
< / script >
< 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" >
< / head >
< body class = "commentary-font" >
< nav role = "navigation" >
< h1 > < a href = "../index.html" >
< img src = "../docs-assets/Inform.png" height = 72" >
< / a > < / h1 >
< ul > < li > < a href = "../compiler.html" > compiler tools< / a > < / li >
< 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 >
< / ul > < h2 > Compiler Webs< / h2 > < ul >
< 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 >
< / ul > < h2 > Inbuild Modules< / h2 > < ul >
< li > < a href = "../supervisor-module/index.html" > supervisor< / a > < / li >
< / ul > < h2 > Inform7 Modules< / h2 > < ul >
< 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 >
< 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 >
< / ul > < h2 > Inter Modules< / h2 > < ul >
< li > < a href = "../bytecode-module/index.html" > bytecode< / a > < / li >
< li > < a href = "../building-module/index.html" > building< / a > < / li >
2021-08-10 13:01:03 +03:00
< li > < a href = "../pipeline-module/index.html" > pipeline< / a > < / li >
< li > < a href = "../final-module/index.html" > final< / a > < / li >
2021-04-10 19:55:28 +03:00
< / ul > < h2 > Services< / h2 > < ul >
< li > < a href = "../arch-module/index.html" > arch< / a > < / li >
< li > < a href = "../calculus-module/index.html" > calculus< / a > < / li >
< li > < a href = "../html-module/index.html" > html< / a > < / li >
< li > < a href = "../inflections-module/index.html" > inflections< / a > < / li >
< li > < a href = "../kinds-module/index.html" > kinds< / a > < / li >
< li > < a href = "../linguistics-module/index.html" > linguistics< / a > < / li >
< li > < a href = "../problems-module/index.html" > problems< / a > < / li >
< li > < a href = "../syntax-module/index.html" > syntax< / a > < / li >
< li > < a href = "../words-module/index.html" > words< / a > < / li >
< li > < a href = "../../../inweb/docs/foundation-module/index.html" > foundation< / a > < / li >
< / ul >
< / nav >
< main role = "main" >
<!-- Weave of 'Compile Rvalues' generated by Inweb -->
< div class = "breadcrumbs" >
< 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#2" > Chapter 2: Values< / a > < / li > < li > < b > Compile Rvalues< / b > < / li > < / ul > < / div >
< p class = "purpose" > To compile rvalues into Inter value opcodes or array entries.< / p >
< p class = "commentary firstcommentary" > < a id = "SP1" class = "paragraph-anchor" > < / a > < b > § 1. < / b > And so to the code for compiling constants.
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CompileRvalues::compile< / 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" > CompileRvalues::compile< / span > < / span > :< br / > Compile Values - < a href = "2-cv.html#SP6_1_1" > § 6.1.1< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value_holster< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > parse_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > switch< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Node::get_type< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > case< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > PHRASE_TO_DECIDE_VALUE_NT:< / span >
< span class = "plain-syntax" > < / span > < a href = "5-ci.html#SP1" class = "function-link" > < span class = "function-syntax" > CompileInvocations::list< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > ,< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > down< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > down< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > Node::get_text< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / 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" > break< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > case< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > CONSTANT_NT:< / span > < span class = "plain-syntax" > {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > kind< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > kind_of_constant< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Node::get_kind_of_value< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / 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" > ccm< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Kinds::Behaviour::get_constant_compilation_method< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > kind_of_constant< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > switch< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ccm< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > case< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > NONE_CCM:< / span > < span class = "plain-syntax" > < / span > < span class = "comment-syntax" > constant values of this kind cannot exist< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > LOG< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "SP: $P; kind: %u\n"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > kind_of_constant< / 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" > "Tried to compile CONSTANT SP for a disallowed kind"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > case< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > LITERAL_CCM:< / span > < span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "2-cr.html#SP1_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Compile a literal-compilation-mode constant< / span > < span class = "named-paragraph-number" > 1.1< / span > < / a > < / span > < span class = "plain-syntax" > ; < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > case< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > NAMED_CONSTANT_CCM:< / span > < span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "2-cr.html#SP1_2" class = "named-paragraph-link" > < span class = "named-paragraph" > Compile a quantitative-compilation-mode constant< / span > < span class = "named-paragraph-number" > 1.2< / span > < / a > < / span > < span class = "plain-syntax" > ; < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > case< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > SPECIAL_CCM:< / span > < span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "2-cr.html#SP1_3" class = "named-paragraph-link" > < span class = "named-paragraph" > Compile a special-compilation-mode constant< / span > < span class = "named-paragraph-number" > 1.3< / span > < / a > < / span > < span class = "plain-syntax" > ; < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > break< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
< p class = "commentary firstcommentary" > < a id = "SP1_1" class = "paragraph-anchor" > < / a > < b > § 1.1. < / b > There are three basic compilation modes.
< / p >
< p class = "commentary" > Here, the literal-parser is used to resolve the text of the SP to an integer.
I6 is typeless, of course, so it doesn't matter that this is not necessarily
a number: all that matters is that the correct integer value is compiled.
< / p >
< p class = "commentary" > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Compile a literal-compilation-mode constant< / span > < span class = "named-paragraph-number" > 1.1< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Rvalues::to_int< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > );< / span >
2021-04-23 02:32:20 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Holsters::non_void_context< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > ))< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Holsters::holster_pair< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > LITERAL_IVAL< / span > < span class = "plain-syntax" > , (< / span > < span class = "identifier-syntax" > inter_ti< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > );< / span >
< / pre >
< ul class = "endnotetexts" > < li > This code is used in < a href = "2-cr.html#SP1" > § 1< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP1_2" class = "paragraph-anchor" > < / a > < b > § 1.2. < / b > Whereas here, an instance is attached.
< / p >
< p class = "commentary" > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Compile a quantitative-compilation-mode constant< / span > < span class = "named-paragraph-number" > 1.2< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > instance< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > I< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Node::get_constant_instance< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / 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" > I< / span > < span class = "plain-syntax" > ) {< / span >
2021-04-23 02:32:20 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Holsters::non_void_context< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > )) {< / span >
2021-05-08 18:22:30 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_name< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > RTInstances::value_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > I< / span > < span class = "plain-syntax" > );< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > Emit::holster_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > internal_error< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "no iname for instance"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > internal_error< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "no instance"< / span > < span class = "plain-syntax" > );< / span >
< / pre >
< ul class = "endnotetexts" > < li > This code is used in < a href = "2-cr.html#SP1" > § 1< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP1_3" class = "paragraph-anchor" > < / a > < b > § 1.3. < / b > Otherwise there are just miscellaneous different things to do in different
kinds of value:
< / p >
< p class = "commentary" > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Compile a special-compilation-mode constant< / span > < span class = "named-paragraph-number" > 1.3< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > PluginCalls::compile_constant< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > kind_of_constant< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > ))< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / 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" > Kinds::get_construct< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > kind_of_constant< / span > < span class = "plain-syntax" > ) == < / span > < span class = "identifier-syntax" > CON_activity< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > activity< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > act< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Rvalues::to_activity< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_name< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > RTActivities::iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > act< / span > < span class = "plain-syntax" > );< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > Emit::holster_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / 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" > Kinds::get_construct< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > kind_of_constant< / span > < span class = "plain-syntax" > ) == < / span > < span class = "identifier-syntax" > CON_combination< / 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" > NC< / 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" > for< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > parse_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > term< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > down< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > term< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > term< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > term< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > next< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > NC< / 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" > NT< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > downs< / 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" > for< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > parse_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > term< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > down< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > term< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > term< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > term< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > next< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > NT< / 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" > NT< / span > < span class = "plain-syntax" > < < / span > < span class = "identifier-syntax" > NC< / span > < span class = "plain-syntax" > ) {< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::inv< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > SEQUENTIAL_BIP< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::down< / span > < span class = "plain-syntax" > (); < / span > < span class = "identifier-syntax" > downs< / span > < span class = "plain-syntax" > ++;< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < a href = "2-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" > term< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > while< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > downs< / span > < span class = "plain-syntax" > > < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > ) { < / span > < span class = "identifier-syntax" > EmitCode::up< / span > < span class = "plain-syntax" > (); < / span > < span class = "identifier-syntax" > downs< / span > < span class = "plain-syntax" > --; }< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / 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" > Kinds::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > kind_of_constant< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K_equation< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > equation< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > eqn< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Rvalues::to_equation< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_name< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > RTEquations::identifier< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > eqn< / span > < span class = "plain-syntax" > );< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > Emit::holster_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / 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" > Kinds::get_construct< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > kind_of_constant< / span > < span class = "plain-syntax" > ) == < / span > < span class = "identifier-syntax" > CON_description< / span > < span class = "plain-syntax" > ) {< / span >
2021-04-23 02:32:20 +03:00
< span class = "plain-syntax" > < / span > < a href = "4-dtd.html#SP13" class = "function-link" > < span class = "function-syntax" > Deferrals::compile_multiple_use_proposition< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > ,< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > Kinds::unary_construction_material< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > kind_of_constant< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / 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" > Kinds::get_construct< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > kind_of_constant< / span > < span class = "plain-syntax" > ) == < / span > < span class = "identifier-syntax" > CON_list_of< / span > < span class = "plain-syntax" > ) {< / span >
2021-04-21 01:43:29 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > wording< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Node::get_text< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > literal_list< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Lists::find_literal< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Wordings::first_wn< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > ) + < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > );< / span >
2021-04-21 12:36:22 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_name< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > ListLiterals::compile_literal_list< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ll< / 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" > N< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > Emit::holster_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / 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" > Kinds::get_construct< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > kind_of_constant< / span > < span class = "plain-syntax" > ) == < / span > < span class = "identifier-syntax" > CON_phrase< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > constant_phrase< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > cphr< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Rvalues::to_constant_phrase< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_name< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > = < / span > < a href = "3-cls.html#SP2" class = "function-link" > < span class = "function-syntax" > Closures::iname< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > cphr< / span > < span class = "plain-syntax" > );< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > Emit::holster_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / 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" > Kinds::Behaviour::is_object< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > kind_of_constant< / 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" > Annotations::read_int< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > self_object_ANNOT< / span > < span class = "plain-syntax" > )) {< / span >
2021-04-23 02:32:20 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Holsters::non_void_context< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > )) {< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Emit::holster_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > Hierarchy::find< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > SELF_HL< / span > < span class = "plain-syntax" > ));< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Annotations::read_int< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > nothing_object_ANNOT< / span > < span class = "plain-syntax" > )) {< / span >
2021-04-23 02:32:20 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Holsters::non_void_context< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > ))< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Holsters::holster_pair< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > LITERAL_IVAL< / 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" > else< / span > < span class = "plain-syntax" > {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > instance< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > I< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Rvalues::to_instance< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / 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" > I< / span > < span class = "plain-syntax" > ) {< / span >
2021-05-08 18:22:30 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_name< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > RTInstances::value_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > I< / span > < span class = "plain-syntax" > );< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > Emit::holster_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > parse_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > NB< / span > < span class = "plain-syntax" > = < / span > < a href = "3-fnc.html#SP4" class = "function-link" > < span class = "function-syntax" > Functions::line_being_compiled< / span > < / a > < span class = "plain-syntax" > ();< / span >
2021-06-21 12:54:37 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > NB< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > RTInstances::note_usage< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > I< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > NB< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 19:55:28 +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 = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Kinds::get_construct< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > kind_of_constant< / span > < span class = "plain-syntax" > ) == < / span > < span class = "identifier-syntax" > CON_property< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "2-cr.html#SP1_3_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Compile property constants< / span > < span class = "named-paragraph-number" > 1.3.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / 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" > Kinds::get_construct< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > kind_of_constant< / span > < span class = "plain-syntax" > ) == < / span > < span class = "identifier-syntax" > CON_relation< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > binary_predicate< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > bp< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Rvalues::to_binary_predicate< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_name< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > RTRelations::iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > bp< / span > < span class = "plain-syntax" > );< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > Emit::holster_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / 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" > Kinds::get_construct< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > kind_of_constant< / span > < span class = "plain-syntax" > ) == < / span > < span class = "identifier-syntax" > CON_rule< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > rule< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > R< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Rvalues::to_rule< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > );< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Emit::holster_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > RTRules::iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > R< / span > < span class = "plain-syntax" > ));< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / 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" > Kinds::get_construct< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > kind_of_constant< / span > < span class = "plain-syntax" > ) == < / span > < span class = "identifier-syntax" > CON_rulebook< / span > < span class = "plain-syntax" > ) {< / span >
2021-05-09 20:56:10 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > rulebook< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > B< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Rvalues::to_rulebook< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Emit::holster_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > RTRulebooks::id_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > B< / span > < span class = "plain-syntax" > ));< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / 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" > Kinds::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > kind_of_constant< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K_rulebook_outcome< / span > < span class = "plain-syntax" > )) {< / span >
2021-05-09 20:56:10 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > named_rulebook_outcome< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > rbno< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Rvalues::to_named_rulebook_outcome< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Emit::holster_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > RTRulebooks::nro_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > rbno< / span > < span class = "plain-syntax" > ));< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / 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" > Kinds::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > kind_of_constant< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K_table< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > table< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > t< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Rvalues::to_table< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > );< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Emit::holster_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > RTTables::identifier< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > t< / span > < span class = "plain-syntax" > ));< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / 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" > Kinds::get_construct< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > kind_of_constant< / span > < span class = "plain-syntax" > ) == < / span > < span class = "identifier-syntax" > CON_table_column< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > table_column< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > tc< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Rvalues::to_table_column< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > );< / span >
2021-04-23 02:32:20 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Holsters::non_void_context< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > ))< / span >
2021-05-09 00:44:59 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Emit::holster_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > RTTableColumns::id_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > tc< / span > < span class = "plain-syntax" > ));< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / 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" > Kinds::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > kind_of_constant< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K_text< / span > < span class = "plain-syntax" > )) {< / span >
2021-05-17 01:58:16 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-cr.html#SP3" class = "function-link" > < span class = "function-syntax" > CompileRvalues::text< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / 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" > K_understanding< / span > < span class = "plain-syntax" > ) & & (< / span > < span class = "identifier-syntax" > Kinds::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > kind_of_constant< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K_understanding< / 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" > Wordings::empty< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Node::get_text< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / 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" > "Text no longer available for CONSTANT/UNDERSTANDING"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_ti< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > v1< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > v2< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > ;< / span >
2021-05-23 00:40:05 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-cr.html#SP4" class = "function-link" > < span class = "function-syntax" > CompileRvalues::compile_understanding< / span > < / a > < span class = "plain-syntax" > (& < / span > < span class = "identifier-syntax" > v1< / span > < span class = "plain-syntax" > , & < / span > < span class = "identifier-syntax" > v2< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > Node::get_text< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > ));< / span >
2021-04-23 02:32:20 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Holsters::non_void_context< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > )) {< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Holsters::holster_pair< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > v1< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > v2< / 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 = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Kinds::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > kind_of_constant< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K_use_option< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > use_option< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > uo< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Rvalues::to_use_option< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > );< / span >
2021-05-02 21:34:02 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Emit::holster_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > RTUseOptions::uo_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > uo< / span > < span class = "plain-syntax" > ));< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / 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" > Kinds::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > kind_of_constant< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K_verb< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > verb_form< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > vf< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Rvalues::to_verb_form< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > );< / span >
2021-05-08 15:11:12 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Emit::holster_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > RTVerbs::form_fn_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > vf< / span > < span class = "plain-syntax" > ));< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / 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" > Kinds::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > kind_of_constant< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K_response< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > rule< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > R< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Rvalues::to_rule< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / 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" > c< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Annotations::read_int< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > response_code_ANNOT< / span > < span class = "plain-syntax" > );< / span >
2021-04-23 02:32:20 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_name< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > iname< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Responses::response_constant_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > R< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > c< / span > < span class = "plain-syntax" > );< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > iname< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > Emit::holster_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > iname< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Holsters::holster_pair< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > LITERAL_IVAL< / span > < span class = "plain-syntax" > , < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Rules::now_rule_needs_response< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > R< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > c< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > EMPTY_WORDING< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > LOG< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "Kov is %u\n"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > kind_of_constant< / 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" > "no special ccm provided"< / span > < span class = "plain-syntax" > );< / span >
< / pre >
< ul class = "endnotetexts" > < li > This code is used in < a href = "2-cr.html#SP1" > § 1< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP1_3_1" class = "paragraph-anchor" > < / a > < b > § 1.3.1. < / b > The interesting, read "unfortunate", case is that of constant property
names. The curiosity here is that it's legal to store the nameless negation
of an either/or property in a "property" constant. This was purely so that
the following ungainly syntax works:
< / p >
< blockquote >
< p > change X to not P;< / p >
< / blockquote >
< p class = "commentary" > Which is now gone anyway, in favour of "now", where all this is handled
better. The feature, if we can call it that, probably derives from the fact
that Inform 6 allows an attribute < span class = "extract" > < span class = "extract-syntax" > attr< / span > < / span > can be negated in sense in several
contexts by using a tilde: < span class = "extract" > < span class = "extract-syntax" > ~attr< / span > < / span > .
< / p >
< p class = "commentary" > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Compile property constants< / span > < span class = "named-paragraph-number" > 1.3.1< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > property< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > prn< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Rvalues::to_property< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / 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" > prn< / 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" > "PROPERTY SP with null property"< / 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" > Properties::is_either_or< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > prn< / 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" > parity< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > property< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > prn_to_eval< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > prn< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "function-syntax" > < negated-clause> < / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Node::get_text< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > ))) < / span > < span class = "identifier-syntax" > parity< / span > < span class = "plain-syntax" > = -1;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > RTProperties::stored_in_negation< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > prn< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > parity< / span > < span class = "plain-syntax" > = -< / span > < span class = "identifier-syntax" > parity< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > prn_to_eval< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > EitherOrProperties::get_negation< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > prn_to_eval< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
2021-04-23 02:32:20 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Holsters::non_void_context< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > )) {< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > parity< / span > < span class = "plain-syntax" > == < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > ) {< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Emit::holster_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > RTProperties::iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > prn_to_eval< / span > < span class = "plain-syntax" > ));< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > StandardProblems::sentence_problem< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Task::syntax_tree< / span > < span class = "plain-syntax" > (), < / span > < span class = "identifier-syntax" > _p_< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Untestable< / span > < span class = "plain-syntax" > ),< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "this refers to an either-or property with a negative "< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "that I can't unravel'"< / span > < span class = "plain-syntax" > ,< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "which normally never happens. (Are you using 'change' "< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "instead of 'now'?"< / 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" > else< / span > < span class = "plain-syntax" > {< / span >
2021-04-23 02:32:20 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Holsters::non_void_context< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > )) {< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Emit::holster_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > RTProperties::iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > prn< / span > < span class = "plain-syntax" > ));< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
< ul class = "endnotetexts" > < li > This code is used in < a href = "2-cr.html#SP1_3" > § 1.3< / a > .< / li > < / ul >
2021-05-17 01:58:16 +03:00
< p class = "commentary firstcommentary" > < a id = "SP2" class = "paragraph-anchor" > < / a > < b > § 2. < / b > The actions plugin provides other kinds with idiosyncratic compilation needs,
if it is enabled.
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CompileRvalues::action_kinds< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value_holster< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > kind< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > parse_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > value< / 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" > Holsters::non_void_context< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > ) == < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > internal_error< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "action in void context"< / 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" > Kinds::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K_action_name< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_name< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > RTActions::double_sharp< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ARvalues::to_action_name< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Emit::holster_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > N< / 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" > TRUE< / 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" > Kinds::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K_description_of_action< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > action_pattern< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > ap< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Node::get_constant_action_pattern< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > );< / span >
2021-05-25 14:14:32 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-map.html#SP1" class = "function-link" > < span class = "function-syntax" > RTActionPatterns::compile_pattern_match< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ap< / span > < span class = "plain-syntax" > );< / span >
2021-05-17 01:58:16 +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 >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Kinds::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K_stored_action< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > explicit_action< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > ea< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Node::get_constant_explicit_action< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < a href = "2-cv.html#SP1" class = "function-link" > < span class = "function-syntax" > CompileValues::compiling_in_constant_mode< / span > < / a > < span class = "plain-syntax" > ()) {< / span >
2021-05-25 02:04:01 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Emit::holster_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > StoredActionLiterals::small_block< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ea< / span > < span class = "plain-syntax" > ));< / span >
2021-05-17 01:58:16 +03:00
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > {< / span >
2021-05-25 14:14:32 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-cr.html#SP5" class = "function-link" > < span class = "function-syntax" > CompileRvalues::compile_explicit_action< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ea< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > TRUE< / span > < span class = "plain-syntax" > );< / span >
2021-05-17 01:58:16 +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" > TRUE< / 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" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
< p class = "commentary firstcommentary" > < a id = "SP3" class = "paragraph-anchor" > < / a > < b > § 3. < / b > Texts can be compiled in four different ways, so the following splits into
2021-04-23 16:19:14 +03:00
four cases. Note that responses take the form
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > "blah blah blah" ( letter )< / span >
< / pre >
< p class = "commentary" > so the penultimate word, if it's there, is the letter.
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CompileRvalues::text< / 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" > CompileRvalues::text< / span > < / span > :< br / > < a href = "2-cr.html#SP1_3" > § 1.3< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > value_holster< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > parse_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > str< / 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" > Holsters::non_void_context< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > ) == < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > internal_error< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "text in void context"< / 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" > Annotations::read_int< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > explicit_literal_ANNOT< / span > < span class = "plain-syntax" > )) {< / span >
2021-05-17 01:58:16 +03:00
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "2-cr.html#SP3_1" class = "named-paragraph-link" > < span class = "named-paragraph" > This is an explicit text< / span > < span class = "named-paragraph-number" > 3.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
2021-04-23 16:19:14 +03:00
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > wording< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > SW< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Node::get_text< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > str< / 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" > unescaped< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Annotations::read_int< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > text_unescaped_ANNOT< / 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" > Wordings::empty< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > SW< / span > < span class = "plain-syntax" > )) < / span > < span class = "identifier-syntax" > internal_error< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "text without wording"< / 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" > Wordings::length< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > SW< / span > < span class = "plain-syntax" > ) > = < / span > < span class = "constant-syntax" > 2< / span > < span class = "plain-syntax" > ) & & < / span >
< span class = "plain-syntax" > (< / span > < span class = "function-syntax" > < response-letter> < / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Wordings::one_word< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Wordings::last_wn< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > SW< / span > < span class = "plain-syntax" > )-1)))) {< / span >
2021-05-17 01:58:16 +03:00
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "2-cr.html#SP3_2" class = "named-paragraph-link" > < span class = "named-paragraph" > This is a response text< / span > < span class = "named-paragraph-number" > 3.2< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
2021-04-23 16:19:14 +03:00
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > unescaped< / span > < span class = "plain-syntax" > == < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > ) & & < / span >
< span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Vocabulary::test_flags< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Wordings::first_wn< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > SW< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > TEXTWITHSUBS_MC< / span > < span class = "plain-syntax" > ))) {< / span >
2021-05-17 01:58:16 +03:00
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "2-cr.html#SP3_3" class = "named-paragraph-link" > < span class = "named-paragraph" > This is a text substitution< / span > < span class = "named-paragraph-number" > 3.3< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
2021-04-23 16:19:14 +03:00
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > unescaped< / span > < span class = "plain-syntax" > ) {< / span >
2021-05-17 01:58:16 +03:00
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "2-cr.html#SP3_4" class = "named-paragraph-link" > < span class = "named-paragraph" > This is an unescaped text literal< / span > < span class = "named-paragraph-number" > 3.4< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
2021-04-23 16:19:14 +03:00
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > {< / span >
2021-05-17 01:58:16 +03:00
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "2-cr.html#SP3_5" class = "named-paragraph-link" > < span class = "named-paragraph" > This is a regular text literal< / span > < span class = "named-paragraph-number" > 3.5< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
2021-04-23 16:19:14 +03:00
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
2021-05-17 01:58:16 +03:00
< p class = "commentary firstcommentary" > < a id = "SP3_1" class = "paragraph-anchor" > < / a > < b > § 3.1. < / b > Not explicit in the sense of an advisory sticker on an Eminem CD: explicit
2021-04-23 16:19:14 +03:00
in providing a text stream for its content, rather than a wording from the
source text. (This usually means it has been manufactured somewhere in the
compiler, rather than parsed from the source.)
< / p >
2021-05-17 01:58:16 +03:00
< p class = "commentary" > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > This is an explicit text< / span > < span class = "named-paragraph-number" > 3.1< / span > < / span > < span class = "comment-syntax" > =< / span >
2021-04-23 16:19:14 +03:00
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Node::get_explicit_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > str< / 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" > Holsters::non_void_context< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Emit::holster_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > Node::get_explicit_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > internal_error< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "unvalued SCG"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / 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" > A< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Annotations::read_int< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > constant_number_ANNOT< / 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" > Holsters::non_void_context< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > ))< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Holsters::holster_pair< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > LITERAL_IVAL< / span > < span class = "plain-syntax" > , (< / span > < span class = "identifier-syntax" > inter_ti< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > A< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
2021-05-17 01:58:16 +03:00
< ul class = "endnotetexts" > < li > This code is used in < a href = "2-cr.html#SP3" > § 3< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP3_2" class = "paragraph-anchor" > < / a > < b > § 3.2. < / b > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > This is a response text< / span > < span class = "named-paragraph-number" > 3.2< / span > < / span > < span class = "comment-syntax" > =< / span >
2021-04-23 16:19:14 +03:00
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
2021-05-09 20:56:10 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > rule< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > R< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > RTRules::rule_currently_being_compiled< / span > < span class = "plain-syntax" > ();< / span >
2021-04-23 16:19:14 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > marker< / span > < span class = "plain-syntax" > = < / span > < span class = "function-syntax" > < < r> > < / span > < span class = "plain-syntax" > ;< / span >
2021-05-09 20:56:10 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > R< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ) || (< / span > < span class = "identifier-syntax" > Rules::rule_allows_responses< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > R< / span > < span class = "plain-syntax" > ) == < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > )) {< / span >
2021-04-23 16:19:14 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > StandardProblems::sentence_problem< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Task::syntax_tree< / span > < span class = "plain-syntax" > (), < / span > < span class = "identifier-syntax" > _p_< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > PM_ResponseContextWrong< / span > < span class = "plain-syntax" > ),< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "lettered responses can only be used in named rules"< / span > < span class = "plain-syntax" > ,< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "not in any of the other contexts in which quoted text can appear."< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2021-05-09 20:56:10 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Rules::get_response< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > R< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > marker< / span > < span class = "plain-syntax" > )) {< / span >
2021-04-23 16:19:14 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > StandardProblems::sentence_problem< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Task::syntax_tree< / span > < span class = "plain-syntax" > (), < / span > < span class = "identifier-syntax" > _p_< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > PM_ResponseDuplicated< / span > < span class = "plain-syntax" > ),< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "this duplicates a response letter"< / span > < span class = "plain-syntax" > ,< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "which is not allowed: if a bracketed letter like (A) is used to mark "< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "some text as a response, then it can only occur once in its rule."< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2021-05-09 20:56:10 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Responses::set_via_source_text< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > R< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > marker< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > SW< / span > < span class = "plain-syntax" > );< / span >
2021-04-23 16:19:14 +03:00
< / pre >
2021-05-17 01:58:16 +03:00
< ul class = "endnotetexts" > < li > This code is used in < a href = "2-cr.html#SP3" > § 3< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP3_3" class = "paragraph-anchor" > < / a > < b > § 3.3. < / b > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > This is a text substitution< / span > < span class = "named-paragraph-number" > 3.3< / span > < / span > < span class = "comment-syntax" > =< / span >
2021-04-23 16:19:14 +03:00
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > TextSubstitutions::text_substitution_cue< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > SW< / span > < span class = "plain-syntax" > );< / span >
< / pre >
2021-05-17 01:58:16 +03:00
< ul class = "endnotetexts" > < li > This code is used in < a href = "2-cr.html#SP3" > § 3< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP3_4" class = "paragraph-anchor" > < / a > < b > § 3.4. < / b > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > This is an unescaped text literal< / span > < span class = "named-paragraph-number" > 3.4< / span > < / span > < span class = "comment-syntax" > =< / span >
2021-04-23 16:19:14 +03:00
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_name< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > val_iname< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > TextLiterals::to_value_unescaped< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > SW< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Emit::holster_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > val_iname< / span > < span class = "plain-syntax" > );< / span >
< / pre >
2021-05-17 01:58:16 +03:00
< ul class = "endnotetexts" > < li > This code is used in < a href = "2-cr.html#SP3" > § 3< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP3_5" class = "paragraph-anchor" > < / a > < b > § 3.5. < / b > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > This is a regular text literal< / span > < span class = "named-paragraph-number" > 3.5< / span > < / span > < span class = "comment-syntax" > =< / span >
2021-04-23 16:19:14 +03:00
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_name< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > val_iname< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > TextLiterals::to_value< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > SW< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Emit::holster_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > VH< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > val_iname< / span > < span class = "plain-syntax" > );< / span >
< / pre >
2021-05-17 01:58:16 +03:00
< ul class = "endnotetexts" > < li > This code is used in < a href = "2-cr.html#SP3" > § 3< / a > .< / li > < / ul >
2021-05-23 00:40:05 +03:00
< p class = "commentary firstcommentary" > < a id = "SP4" class = "paragraph-anchor" > < / a > < b > § 4. < / b > Values for "understanding" refer to command grammar. We cache them as they
occur in the source text because they can compile to a fairly large slice of
code, and we don't want to repeat that:
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > typedef< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > cached_understanding< / span > < span class = "plain-syntax" > {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > wording< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > understanding_text< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment-syntax" > word range of the understanding text< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_name< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > cu_iname< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment-syntax" > function to test this< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > CLASS_DEFINITION< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > cached_understanding< / span > < span class = "plain-syntax" > ;< / span >
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CompileRvalues::compile_understanding< / 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" > CompileRvalues::compile_understanding< / span > < / span > :< br / > < a href = "2-cr.html#SP1_3" > § 1.3< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > inter_ti< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > inter_ti< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > val2< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > wording< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "function-syntax" > < subject-pronoun> < / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > LITERAL_IVAL< / span > < span class = "plain-syntax" > ; *< / span > < span class = "identifier-syntax" > val2< / 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" > else< / span > < span class = "plain-syntax" > {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > cached_understanding< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > cu< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > LOOP_OVER< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > cu< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > cached_understanding< / 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" > Wordings::match< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > cu< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > understanding_text< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Emit::to_value_pair< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > val2< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > cu< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > cu_iname< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > command_grammar< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > cg< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Understand::consultation< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > );< / span >
2021-05-26 01:18:46 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_name< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > iname< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > RTCommandGrammars::get_consult_fn_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > cg< / span > < span class = "plain-syntax" > );< / span >
2021-05-23 00:40:05 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > iname< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > cu< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > CREATE< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > cached_understanding< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > cu< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > understanding_text< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > cu< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > cu_iname< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > iname< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Emit::to_value_pair< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > val2< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > iname< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
< ul class = "endnotetexts" > < li > The structure cached_understanding is private to this section.< / li > < / ul >
2021-05-25 14:14:32 +03:00
< p class = "commentary firstcommentary" > < a id = "SP5" class = "paragraph-anchor" > < / a > < b > § 5. < / b > Explicit actions can be compiled either as a "try" invocation or as the
constant value of a stored action. Either way it calls the runtime function
< span class = "extract" > < span class = "extract-syntax" > TryAction< / span > < / span > , for which see < a href = "../WorldModelKit/index.html" class = "internal" > WorldModelKit< / a > ; this function takes five
arguments, plus an optional sixth for where to store rather than process the
action.
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CompileRvalues::compile_explicit_action< / 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" > CompileRvalues::compile_explicit_action< / span > < / span > :< br / > < a href = "2-cr.html#SP2" > § 2< / a > < br / > Compile Invocations Inline - < a href = "5-cii.html#SP6_1_1_4_9" > § 6.1.1.4.9< / a > , < a href = "5-cii.html#SP6_1_1_4_10" > § 6.1.1.4.10< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > explicit_action< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > ea< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > as_value< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > parse_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > n< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > ea< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > first_noun< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment-syntax" > the noun< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > parse_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > s< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > ea< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > second_noun< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment-syntax" > the second noun< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > parse_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > a< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > ea< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > actor< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment-syntax" > the actor< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > K_understanding< / span > < span class = "plain-syntax" > ) & & (< / span > < span class = "identifier-syntax" > Rvalues::is_CONSTANT_of_kind< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > n< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K_understanding< / span > < span class = "plain-syntax" > )) & & < / span >
< span class = "plain-syntax" > (< / span > < span class = "function-syntax" > < subject-pronoun> < / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Node::get_text< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > n< / span > < span class = "plain-syntax" > )) == < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ))< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > n< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Rvalues::from_wording< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Node::get_text< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > n< / 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" > K_understanding< / span > < span class = "plain-syntax" > ) & & (< / span > < span class = "identifier-syntax" > Rvalues::is_CONSTANT_of_kind< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > s< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K_understanding< / span > < span class = "plain-syntax" > )) & & < / span >
< span class = "plain-syntax" > (< / span > < span class = "function-syntax" > < subject-pronoun> < / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Node::get_text< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > s< / span > < span class = "plain-syntax" > )) == < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ))< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > s< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Rvalues::from_wording< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Node::get_text< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > s< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > action_name< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > an< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > ea< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > action< / 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" > flag_bits< / 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" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Kinds::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Specifications::to_kind< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > n< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > K_text< / span > < span class = "plain-syntax" > )) < / span > < span class = "identifier-syntax" > flag_bits< / span > < span class = "plain-syntax" > += < / span > < span class = "constant-syntax" > 16< / 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" > Kinds::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Specifications::to_kind< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > s< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > K_text< / span > < span class = "plain-syntax" > )) < / span > < span class = "identifier-syntax" > flag_bits< / span > < span class = "plain-syntax" > += < / span > < span class = "constant-syntax" > 32< / 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" > flag_bits< / span > < span class = "plain-syntax" > > < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > TheHeap::ensure_basic_heap_present< / 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" > ea< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > request< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > flag_bits< / span > < span class = "plain-syntax" > += < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::call< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Hierarchy::find< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > TRYACTION_HL< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::down< / span > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::val_number< / span > < span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > inter_ti< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > flag_bits< / 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" > a< / span > < span class = "plain-syntax" > ) < / span > < a href = "2-cr.html#SP6" class = "function-link" > < span class = "function-syntax" > CompileRvalues::compile_ea_parameter< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > a< / 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 = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::val_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_object< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > Hierarchy::find< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > PLAYER_HL< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::val_iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_action_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > RTActions::double_sharp< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > an< / 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" > n< / span > < span class = "plain-syntax" > ) < / span > < a href = "2-cr.html#SP6" class = "function-link" > < span class = "function-syntax" > CompileRvalues::compile_ea_parameter< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > n< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > ActionSemantics::kind_of_noun< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > an< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::val_number< / span > < span class = "plain-syntax" > (0);< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > s< / span > < span class = "plain-syntax" > ) < / span > < a href = "2-cr.html#SP6" class = "function-link" > < span class = "function-syntax" > CompileRvalues::compile_ea_parameter< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > s< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > ActionSemantics::kind_of_second< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > an< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::val_number< / span > < span class = "plain-syntax" > (0);< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > as_value< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::call< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Hierarchy::find< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > STORED_ACTION_TY_CURRENT_HL< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::down< / span > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "3-sf.html#SP21" class = "function-link" > < span class = "function-syntax" > Frames::emit_new_local_value< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_stored_action< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::up< / span > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::up< / span > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
< p class = "commentary firstcommentary" > < a id = "SP6" class = "paragraph-anchor" > < / a > < b > § 6. < / b > Which requires the following. Note that if the action expects to see a
< span class = "extract" > < span class = "extract-syntax" > K_understanding< / span > < / span > , then we typecheck in a way which will not cause an unwanted
silent cast to < span class = "extract" > < span class = "extract-syntax" > K_text< / span > < / span > ; but type-safety is not violated.
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CompileRvalues::compile_ea_parameter< / 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" > CompileRvalues::compile_ea_parameter< / span > < / span > :< br / > < a href = "2-cr.html#SP5" > § 5< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > parse_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > term< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > kind< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > required_kind< / 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" > K_understanding< / span > < span class = "plain-syntax" > ) & & (< / span > < span class = "identifier-syntax" > Kinds::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > required_kind< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K_understanding< / span > < span class = "plain-syntax" > ))) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > kind< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Specifications::to_kind< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > term< / 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" > Kinds::compatible< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K_understanding< / span > < span class = "plain-syntax" > )) ||< / span >
< span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Kinds::compatible< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K_text< / span > < span class = "plain-syntax" > )))< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > required_kind< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > NULL< / 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" > Dash::check_value< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > term< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > required_kind< / span > < span class = "plain-syntax" > ))< / span >
< span class = "plain-syntax" > < / span > < a href = "2-cv.html#SP5" class = "function-link" > < span class = "function-syntax" > CompileValues::to_code_val_of_kind< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > term< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K_object< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
2021-04-10 19:55:28 +03:00
< nav role = "progress" > < div class = "progresscontainer" >
2021-05-25 14:14:32 +03:00
< ul class = "progressbar" > < li class = "progressprev" > < a href = "2-cv.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 = "progresscurrentchapter" > 2< / li > < li class = "progresssection" > < a href = "2-cv.html" > cv< / a > < / li > < li class = "progresscurrent" > cr< / li > < li class = "progresssection" > < a href = "2-cl.html" > cl< / a > < / li > < li class = "progresssection" > < a href = "2-cc.html" > cc< / a > < / li > < li class = "progresssection" > < a href = "2-map.html" > map< / a > < / li > < li class = "progresssection" > < a href = "2-mgap.html" > mgap< / a > < / li > < li class = "progresschapter" > < a href = "3-sf.html" > 3< / a > < / li > < li class = "progresschapter" > < a href = "4-cs.html" > 4< / a > < / li > < li class = "progresschapter" > < a href = "5-cbal.html" > 5< / a > < / li > < li class = "progressnext" > < a href = "2-cl.html" > ❯ < / a > < / li > < / ul > < / div >
2021-04-10 19:55:28 +03:00
< / nav > <!-- End of weave -->
< / main >
< / body >
< / html >