2021-04-10 02:37:43 +03:00
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
< html >
< head >
< title > Compile Loops< / 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 >
MathJax = {
tex: {
inlineMath: '$', '$'], ['\\(', '\\)'
},
svg: {
fontCache: 'global'
}
};
< / script >
< script type = "text/javascript" id = "MathJax-script" async
src="https://cdn.jsdelivr.net/npm/mathjax@3/es5/tex-svg.js">
< / script >
< script >
function togglePopup(material_id) {
var popup = document.getElementById(material_id);
popup.classList.toggle("show");
}
< / script >
< 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" >
2022-04-28 19:37:28 +03:00
< h1 > < a href = "../index.html" >
2021-04-10 02:37:43 +03:00
< img src = "../docs-assets/Inform.png" height = 72" >
< / a > < / h1 >
2022-04-28 19:37:28 +03:00
< ul > < li > < a href = "../index.html" > home< / a > < / li >
2022-04-04 20:31:44 +03:00
< / ul > < h2 > Compiler< / h2 > < ul >
< li > < a href = "../structure.html" > structure< / a > < / li >
< li > < a href = "../inbuildn.html" > inbuild< / a > < / li >
< li > < a href = "../inform7n.html" > inform7< / a > < / li >
< li > < a href = "../intern.html" > inter< / a > < / li >
< li > < a href = "../services.html" > services< / a > < / li >
2022-04-18 17:46:46 +03:00
< li > < a href = "../secrets.html" > secrets< / a > < / li >
2022-04-04 20:31:44 +03:00
< / ul > < h2 > Other Tools< / h2 > < ul >
< li > < a href = "../inblorbn.html" > inblorb< / a > < / li >
< li > < a href = "../indocn.html" > indoc< / a > < / li >
< li > < a href = "../inform6.html" > inform6< / a > < / li >
< li > < a href = "../inpolicyn.html" > inpolicy< / a > < / li >
< li > < a href = "../inrtpsn.html" > inrtps< / a > < / li >
2022-04-07 01:30:32 +03:00
< / ul > < h2 > Resources< / h2 > < ul >
< li > < a href = "../extensions.html" > extensions< / a > < / li >
< li > < a href = "../kits.html" > kits< / a > < / li >
2022-04-04 20:31:44 +03:00
< / ul > < h2 > Repository< / h2 > < ul >
< li > < a href = "https://github.com/ganelson/inform" > < img src = "../docs-assets/github.png" height = 18 > github< / a > < / li >
< / ul > < h2 > Related Projects< / h2 > < ul >
2022-04-28 19:20:06 +03:00
< li > < a href = "../../../inweb/index.html" > inweb< / a > < / li >
< li > < a href = "../../../intest/index.html" > intest< / a > < / li >
2021-04-10 02:37:43 +03:00
< / ul >
< / nav >
< main role = "main" >
<!-- Weave of 'Compile Loops' generated by Inweb -->
< div class = "breadcrumbs" >
2022-04-28 19:37:28 +03:00
< ul class = "crumbs" > < li > < a href = "../index.html" > Home< / a > < / li > < li > < a href = "../inform7n.html" > Inform7< / a > < / li > < li > < a href = "index.html" > imperative< / a > < / li > < li > < a href = "index.html#4" > Chapter 4: Propositions< / a > < / li > < li > < b > Compile Loops< / b > < / li > < / ul > < / div >
2021-04-10 02:37:43 +03:00
< p class = "purpose" > To compile loop headers from a range of values expressed by a proposition.< / p >
2021-04-10 19:55:28 +03:00
< ul class = "toc" > < li > < a href = "4-cl.html#SP1" > § 1. Domains of loops< / a > < / li > < li > < a href = "4-cl.html#SP3" > § 3. Loop schemas over a whole kind< / a > < / li > < li > < a href = "4-cl.html#SP4" > § 4. Loops through list values< / a > < / li > < / ul > < hr class = "tocbar" >
2021-04-10 02:37:43 +03:00
< p class = "commentary firstcommentary" > < a id = "SP1" class = "paragraph-anchor" > < / a > < b > § 1. Domains of loops. < / b > This function ccmpiles the header (and in effect therefore the structure)
of a loop through all values \(x\) such that \(\phi(x)\) is true, where \(\phi\)
is the proposition inside the description < span class = "extract" > < span class = "extract-syntax" > desc< / span > < / span > . The loop variable will
be < span class = "extract" > < span class = "extract-syntax" > v1< / span > < / span > .
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
2022-09-26 02:22:54 +03:00
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CompileLoops::through_matches< / 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" > CompileLoops::through_matches< / span > < / span > :< br / > Compile Invocations Inline - < a href = "5-cii.html#SP6_8" > § 6.8< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > parse_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > local_variable< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > v1< / span > < span class = "plain-syntax" > ) {< / span >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > kind< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > DK< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Specifications::to_kind< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > spec< / 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" > DK< / span > < span class = "plain-syntax" > ) != < / span > < span class = "identifier-syntax" > CON_description< / 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" > "repeat through non-description"< / 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" > Kinds::unary_construction_material< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > DK< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < a href = "3-cb.html#SP18" class = "function-link" > < span class = "function-syntax" > CodeBlocks::set_scope_to_block_about_to_open< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > v1< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > local_variable< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > v2< / span > < span class = "plain-syntax" > = < / span > < a href = "3-lv.html#SP7" class = "function-link" > < span class = "function-syntax" > LocalVariables::new_let_value< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > EMPTY_WORDING< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "3-cb.html#SP18" class = "function-link" > < span class = "function-syntax" > CodeBlocks::set_scope_to_block_about_to_open< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > v2< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 02:37:43 +03:00
< 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" > K< / span > < span class = "plain-syntax" > )) {< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "4-cl.html#SP1_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Exploit the runtime representation of objects< / span > < span class = "named-paragraph-number" > 1.1< / span > < / a > < / span >
2021-04-10 02:37:43 +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" > i6_schema< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > loop_schema< / 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 > < a href = "4-cl.html#SP3" class = "function-link" > < span class = "function-syntax" > CompileLoops::schema< / span > < / a > < span class = "plain-syntax" > (& < / span > < span class = "identifier-syntax" > loop_schema< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > )) < / span > < span class = "named-paragraph-container code-font" > < a href = "4-cl.html#SP1_2" class = "named-paragraph-link" > < span class = "named-paragraph" > Compile from the kind's loop schema< / span > < span class = "named-paragraph-number" > 1.2< / span > < / a > < / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "4-cl.html#SP1_3" class = "named-paragraph-link" > < span class = "named-paragraph" > Issue bad repeat domain problem< / span > < span class = "named-paragraph-number" > 1.3< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
2021-04-10 02:37:43 +03:00
< 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 > In the case where we are looping through objects, we can exploit a runtime
ability to move quickly to the next object in a given kind. This requires a
loop construction a little too complex for a schema, so we generate the code
by hand.
< / p >
< p class = "commentary" > In fact we secretly make a second loop variable < span class = "extract" > < span class = "extract-syntax" > v2< / span > < / span > as well, though it is
invisible from source text, and construct a loop analogous to:
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > for (v1=D(0), v2=D(v1); v1; v1=v2, v2=D(v1))< / span >
< / pre >
< p class = "commentary" > where < span class = "extract" > < span class = "extract-syntax" > D< / span > < / span > is a function deferred from the proposition which is such that:
< / p >
< ul class = "items" > < li > ● < span class = "extract" > < span class = "extract-syntax" > D(0)< / span > < / span > produces the first \(x\) such that \(\phi(x)\), and otherwise
< / li > < li > ● < span class = "extract" > < span class = "extract-syntax" > D(x)< / span > < / span > produces either the next match after \(x\), or 0 to indicate that
there are no further matches.
< / li > < / ul >
< p class = "commentary" > This arrangement is possible because object values, and enumerated values, are
never equal to 0 at runtime.
< / p >
< p class = "commentary" > The reason we do not simply compile
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > for (v1=D(0); v1; v1=D(v1))< / span >
< / pre >
< p class = "commentary" > is to protects us in case the body of the loop takes action which moves < span class = "extract" > < span class = "extract-syntax" > v1< / span > < / span > out
of the domain — e.g., in the case of:
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > repeat< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > with< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > T< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > running< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > through< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > items< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > on< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > the< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > table< / span > < span class = "plain-syntax" > :< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > now< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > T< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > is< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > in< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > the< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > box< / span > < span class = "plain-syntax" > .< / span >
< / pre >
< p class = "commentary" > This is the famous "broken < span class = "extract" > < span class = "extract-syntax" > objectloop< / span > < / span > " hazard of Inform 6. Experience shows
that authors value safety over the slight speed overhead incurred.
< / p >
< p class = "commentary" > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Exploit the runtime representation of objects< / 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" >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_symbol< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > val_var_s< / span > < span class = "plain-syntax" > = < / span > < a href = "3-lv.html#SP1" class = "function-link" > < span class = "function-syntax" > LocalVariables::declare< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > v1< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_symbol< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > aux_var_s< / span > < span class = "plain-syntax" > = < / span > < a href = "3-lv.html#SP1" class = "function-link" > < span class = "function-syntax" > LocalVariables::declare< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > v2< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 02:37:43 +03:00
2021-04-23 02:32:20 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < a href = "4-dtd.html#SP16" class = "function-link" > < span class = "function-syntax" > Deferrals::spec_is_variable_of_kind_description< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > ) == < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ) {< / span >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > pcalc_prop< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > domain_prop< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > SentencePropositions::from_spec< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > spec< / 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" > CreationPredicates::contains_callings< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > domain_prop< / span > < span class = "plain-syntax" > ))< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "4-cl.html#SP1_1_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Issue called in repeat problem< / span > < span class = "named-paragraph-number" > 1.1.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
2021-04-10 02:37:43 +03:00
< 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" > FOR_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 = "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 = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::inv< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > STORE_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 = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::ref_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > val_var_s< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < a href = "4-cl.html#SP2" class = "function-link" > < span class = "function-syntax" > CompileLoops::iterate< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > );< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::up< / span > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::inv< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > STORE_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 = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::ref_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > aux_var_s< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < a href = "4-cl.html#SP2" class = "function-link" > < span class = "function-syntax" > CompileLoops::iterate< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > v1< / span > < span class = "plain-syntax" > );< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::up< / 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 = "identifier-syntax" > EmitCode::val_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > val_var_s< / span > < span class = "plain-syntax" > );< / span >
< 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 = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::inv< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > STORE_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 = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::ref_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > val_var_s< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::val_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > aux_var_s< / 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 = "identifier-syntax" > EmitCode::inv< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > STORE_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 = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::ref_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > aux_var_s< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < a href = "4-cl.html#SP2" class = "function-link" > < span class = "function-syntax" > CompileLoops::iterate< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > v2< / span > < span class = "plain-syntax" > );< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::up< / span > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::up< / span > < span class = "plain-syntax" > ();< / span >
2021-04-10 02:37:43 +03:00
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::code< / span > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::down< / span > < span class = "plain-syntax" > ();< / span >
2021-04-10 02:37:43 +03:00
< / pre >
2021-04-10 19:55:28 +03:00
< ul class = "endnotetexts" > < li > This code is used in < a href = "4-cl.html#SP1" > § 1< / a > .< / li > < / ul >
2021-04-10 02:37:43 +03:00
< p class = "commentary firstcommentary" > < a id = "SP1_2" class = "paragraph-anchor" > < / a > < b > § 1.2. < / b > It would be nice to generate the whole loop from the schema for the kind,
but of course our description is unlikely to be just \({\it kind}_K(x)\). So
the idea is roughly:
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > loop over each v1 in K< / span >
< span class = "plain-syntax" > if phi(v1)< / span >
< span class = "plain-syntax" > ...< / span >
< / pre >
< p class = "commentary" > We can optimise out the "if" part in the case when \(\phi(x) = {\it kind}_K(x)\).
< / p >
< p class = "commentary" > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Compile from the kind's loop schema< / 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" >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < a href = "4-cs.html#SP1" class = "function-link" > < span class = "function-syntax" > CompileSchemas::from_local_variables_in_void_context< / span > < / a > < span class = "plain-syntax" > (& < / span > < span class = "identifier-syntax" > loop_schema< / 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 >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Lvalues::is_lvalue< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > ) == < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Specifications::is_kind_like< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > spec< / 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" > pcalc_prop< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > prop< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Specifications::to_proposition< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > spec< / 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" > prop< / 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" > IF_BIP< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::down< / span > < span class = "plain-syntax" > ();< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < a href = "4-cp.html#SP1" class = "function-link" > < span class = "function-syntax" > CompilePropositions::to_test_as_condition< / span > < / a > < span class = "plain-syntax" > (< / span >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Lvalues::new_LOCAL_VARIABLE< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > EMPTY_WORDING< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > v1< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > prop< / span > < span class = "plain-syntax" > );< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::code< / span > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::down< / span > < span class = "plain-syntax" > ();< / span >
2021-04-10 02:37:43 +03:00
< 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-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" > IF_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 = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::inv< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > INDIRECT2_BIP< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::down< / span > < span class = "plain-syntax" > ();< / span >
2021-04-10 19:55:28 +03:00
< 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" > spec< / span > < span class = "plain-syntax" > );< / span >
2021-04-17 17:28:28 +03:00
< 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 = "constant-syntax" > CONDITION_DUSAGE< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 19:55:28 +03:00
< 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 >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Lvalues::new_LOCAL_VARIABLE< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > EMPTY_WORDING< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > v1< / span > < span class = "plain-syntax" > ));< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::up< / span > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::code< / span > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::down< / span > < span class = "plain-syntax" > ();< / span >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > }< / span >
< / pre >
2021-04-10 19:55:28 +03:00
< ul class = "endnotetexts" > < li > This code is used in < a href = "4-cl.html#SP1" > § 1< / a > .< / li > < / ul >
2021-04-10 02:37:43 +03:00
< p class = "commentary firstcommentary" > < a id = "SP1_1_1" class = "paragraph-anchor" > < / a > < b > § 1.1.1. < / b > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Issue called in repeat problem< / span > < span class = "named-paragraph-number" > 1.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 = "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_CalledInRepeat< / span > < span class = "plain-syntax" > ),< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "this tries to use '(called ...)' to give names to values "< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "arising in the course of working out what to repeat through"< / span > < span class = "plain-syntax" > ,< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "but this is not allowed. (Sorry: it's too hard to get right.)"< / span > < span class = "plain-syntax" > );< / span >
< / pre >
2021-04-10 19:55:28 +03:00
< ul class = "endnotetexts" > < li > This code is used in < a href = "4-cl.html#SP1_1" > § 1.1< / a > .< / li > < / ul >
2021-04-10 02:37:43 +03:00
< p class = "commentary firstcommentary" > < a id = "SP1_3" class = "paragraph-anchor" > < / a > < b > § 1.3. < / b > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Issue bad repeat domain problem< / 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" >
2022-04-12 14:32:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Problems::quote_source< / span > < span class = "plain-syntax" > (1, < / span > < span class = "identifier-syntax" > current_sentence< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Problems::quote_kind< / span > < span class = "plain-syntax" > (2, < / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > StandardProblems::handmade_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_BadRepeatDomain< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Problems::issue_problem_segment< / span > < span class = "plain-syntax" > (< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "In %1, you seem to want to repeat through all possible values which have "< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "the kind '%2', and there are just too many of those. "< / span >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "For instance, you can 'repeat with D running through doors' because "< / span >
2022-04-12 14:32:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "there are only a small number of doors, but you can't 'repeat with N "< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "running through numbers' because numbers are without end."< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Problems::issue_problem_end< / span > < span class = "plain-syntax" > ();< / span >
2021-04-10 02:37:43 +03:00
< / pre >
2021-04-10 19:55:28 +03:00
< ul class = "endnotetexts" > < li > This code is used in < a href = "4-cl.html#SP1" > § 1< / a > .< / li > < / ul >
2021-04-10 02:37:43 +03:00
< p class = "commentary firstcommentary" > < a id = "SP2" class = "paragraph-anchor" > < / a > < b > § 2. < / b > Here we compile code to call < span class = "extract" > < span class = "extract-syntax" > D(v)< / span > < / span > , on the variable < span class = "extract" > < span class = "extract-syntax" > fromv< / span > < / span > , or < span class = "extract" > < span class = "extract-syntax" > D(0)< / span > < / span > if
2021-04-10 19:55:28 +03:00
< span class = "extract" > < span class = "extract-syntax" > fromv< / span > < / span > is < span class = "extract" > < span class = "extract-syntax" > NULL< / span > < / span > . As in < a href = "4-dtd.html" class = "internal" > Deciding to Defer< / a > , we are forced to call < span class = "extract" > < span class = "extract-syntax" > D< / span > < / span > as
2021-04-10 02:37:43 +03:00
a multipurpose description function if it is not known at compile time; but
we can more efficiently defer for this single purpose if it is.
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
2021-04-10 19:55:28 +03:00
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CompileLoops::iterate< / 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" > CompileLoops::iterate< / span > < / span > :< br / > < a href = "4-cl.html#SP1_1" > § 1.1< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > parse_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > local_variable< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > fromv< / 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 > < a href = "4-dtd.html#SP16" class = "function-link" > < span class = "function-syntax" > Deferrals::spec_is_variable_of_kind_description< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > spec< / 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" > INDIRECT2_BIP< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::down< / span > < span class = "plain-syntax" > ();< / span >
2021-04-10 19:55:28 +03:00
< 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" > spec< / span > < span class = "plain-syntax" > );< / span >
2021-04-17 17:28:28 +03:00
< 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 = "constant-syntax" > LOOP_DOMAIN_DUSAGE< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > fromv< / span > < span class = "plain-syntax" > ) {< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_symbol< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > fromv_s< / span > < span class = "plain-syntax" > = < / span > < a href = "3-lv.html#SP1" class = "function-link" > < span class = "function-syntax" > LocalVariables::declare< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > fromv< / span > < span class = "plain-syntax" > );< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::val_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > fromv_s< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > {< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::val_number< / span > < span class = "plain-syntax" > (0);< / span >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > }< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::up< / span > < span class = "plain-syntax" > ();< / span >
2021-04-10 02:37:43 +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" > pcalc_prop< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > prop< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > SentencePropositions::from_spec< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > );< / span >
2021-04-23 02:32:20 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > pcalc_prop_deferral< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > pdef< / span > < span class = "plain-syntax" > = < / span > < a href = "4-dtd.html#SP3" class = "function-link" > < span class = "function-syntax" > Deferrals::defer_loop_domain< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > prop< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > arity< / span > < span class = "plain-syntax" > = < / span > < a href = "4-cad.html#SP3" class = "function-link" > < span class = "function-syntax" > Cinders::count< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > prop< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > pdef< / span > < span class = "plain-syntax" > ) + < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > ;< / span >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > switch< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > arity< / span > < span class = "plain-syntax" > ) {< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > case< / span > < span class = "plain-syntax" > < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > : < / span > < span class = "identifier-syntax" > EmitCode::inv< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > INDIRECT0_BIP< / 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 = "constant-syntax" > 1< / span > < span class = "plain-syntax" > : < / span > < span class = "identifier-syntax" > EmitCode::inv< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > INDIRECT1_BIP< / 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 = "constant-syntax" > 2< / span > < span class = "plain-syntax" > : < / span > < span class = "identifier-syntax" > EmitCode::inv< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > INDIRECT2_BIP< / 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 = "constant-syntax" > 3< / span > < span class = "plain-syntax" > : < / span > < span class = "identifier-syntax" > EmitCode::inv< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > INDIRECT3_BIP< / 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 = "constant-syntax" > 4< / span > < span class = "plain-syntax" > : < / span > < span class = "identifier-syntax" > EmitCode::inv< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > INDIRECT4_BIP< / span > < span class = "plain-syntax" > ); < / span > < span class = "reserved-syntax" > break< / span > < span class = "plain-syntax" > ;< / span >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > default:< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > internal_error< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "indirect function call with too many arguments"< / 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 = "identifier-syntax" > EmitCode::down< / 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_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > pdef< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > ppd_iname< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < a href = "4-cad.html#SP4" class = "function-link" > < span class = "function-syntax" > Cinders::compile_cindered_values< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > prop< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > pdef< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > fromv< / span > < span class = "plain-syntax" > ) {< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_symbol< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > fromv_s< / span > < span class = "plain-syntax" > = < / span > < a href = "3-lv.html#SP1" class = "function-link" > < span class = "function-syntax" > LocalVariables::declare< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > fromv< / span > < span class = "plain-syntax" > );< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::val_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > fromv_s< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > {< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::val_number< / span > < span class = "plain-syntax" > (0);< / span >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > }< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::up< / span > < span class = "plain-syntax" > ();< / span >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
< p class = "commentary firstcommentary" > < a id = "SP3" class = "paragraph-anchor" > < / a > < b > § 3. Loop schemas over a whole kind. < / b > If < span class = "extract" > < span class = "extract-syntax" > K< / span > < / span > is a kind, this function generates a schema for a loop over all instances
of the kind, or returns < span class = "extract" > < span class = "extract-syntax" > FALSE< / span > < / span > if that is impossible or unreasonable.
< / p >
< p class = "commentary" > In the situation above, this function was needed only for non-object kinds; but
other parts of Inform also use it, so it needs to work for object kinds too.
< / p >
< p class = "commentary" > Choosing an efficient schema here makes a big difference to Inform's runtime
performance.
< / p >
< pre class = "definitions code-font" > < span class = "definition-keyword" > define< / span > < span class = "constant-syntax" > MAX_LOOP_DOMAIN_SCHEMA_LENGTH< / span > < span class = "plain-syntax" > < / span > < span class = "constant-syntax" > 1000< / span >
< / pre >
< pre class = "displayed-code all-displayed-code code-font" >
2021-04-10 19:55:28 +03:00
< span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CompileLoops::schema< / 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" > CompileLoops::schema< / span > < / span > :< br / > < a href = "4-cl.html#SP1" > § 1< / a > < br / > Compile Deferred Propositions - < a href = "4-cdp.html#SP5" > § 5< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > i6_schema< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > sch< / 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 >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ) < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Kinds::Behaviour::is_subkind_of_object< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > )) {< / span >
2021-05-23 13:34:11 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > InstanceCounting::optimise_loop< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > sch< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > ) == < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > )< / span >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Calculus::Schemas::modify< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > sch< / span > < span class = "plain-syntax" > , < / span > < span class = "string-syntax" > "objectloop (*1 ofclass %n)"< / span > < span class = "plain-syntax" > ,< / span >
2021-05-16 01:31:42 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > RTKindDeclarations::iname< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > ));< / span >
2021-04-10 02:37:43 +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_object< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Calculus::Schemas::modify< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > sch< / span > < span class = "plain-syntax" > , < / span > < span class = "string-syntax" > "objectloop (*1 ofclass Object)"< / 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::Behaviour::is_an_enumeration< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Calculus::Schemas::modify< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > sch< / span > < span class = "plain-syntax" > ,< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "for (*1=1: *1< =%d: *1++)"< / span > < span class = "plain-syntax" > ,< / span >
2021-05-14 16:12:46 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > RTKindConstructors::get_highest_valid_value_as_integer< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > ));< / span >
2021-04-10 02:37:43 +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 = "identifier-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > p< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > construct< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > loop_domain_schema< / 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" > p< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ) < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Calculus::Schemas::modify< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > sch< / span > < span class = "plain-syntax" > , < / span > < span class = "string-syntax" > "%S"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > p< / 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 >
< / pre >
< p class = "commentary firstcommentary" > < a id = "SP4" class = "paragraph-anchor" > < / a > < b > § 4. Loops through list values. < / b > This is a quite different kind of loop: for iterating through the members of
a list (whose contents are not known at compile time).
< / p >
< p class = "commentary" > We need three variables, of which only < span class = "extract" > < span class = "extract-syntax" > val_var< / span > < / span > is visible in source text:
< / p >
< ul class = "items" > < li > ● < span class = "extract" > < span class = "extract-syntax" > index_var_s< / span > < / span > is the position in the list — 0, 1, 2, ...;
< / li > < li > ● < span class = "extract" > < span class = "extract-syntax" > val_var_s< / span > < / span > is the entry at that position;
< / li > < li > ● < span class = "extract" > < span class = "extract-syntax" > copy_var_s< / span > < / span > is the list itself — which we stash into this temporary
variable to avoid having to evaluate it more than once.
< / li > < / ul >
< pre class = "displayed-code all-displayed-code code-font" >
2022-09-26 02:22:54 +03:00
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CompileLoops::through_list< / 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" > CompileLoops::through_list< / span > < / span > :< br / > Compile Invocations Inline - < a href = "5-cii.html#SP6_8" > § 6.8< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > parse_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > local_variable< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > val_var< / span > < span class = "plain-syntax" > ) {< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > local_variable< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > index_var< / span > < span class = "plain-syntax" > = < / span > < a href = "3-lv.html#SP7" class = "function-link" > < span class = "function-syntax" > LocalVariables::new_let_value< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > EMPTY_WORDING< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K_number< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > local_variable< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > copy_var< / span > < span class = "plain-syntax" > = < / span > < a href = "3-lv.html#SP7" class = "function-link" > < span class = "function-syntax" > LocalVariables::new_let_value< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > EMPTY_WORDING< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K_number< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 02:37:43 +03:00
< 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" > spec< / 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" > CK< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Kinds::unary_construction_material< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K< / 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" > pointery< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
2021-05-16 01:31:42 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Kinds::Behaviour::uses_block_values< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > CK< / span > < span class = "plain-syntax" > )) {< / span >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > pointery< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > TRUE< / span > < span class = "plain-syntax" > ;< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < a href = "3-lvs.html#SP16" class = "function-link" > < span class = "function-syntax" > LocalVariableSlates::free_at_end_of_scope< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > val_var< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > }< / span >
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < a href = "3-cb.html#SP18" class = "function-link" > < span class = "function-syntax" > CodeBlocks::set_scope_to_block_about_to_open< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > val_var< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "3-lv.html#SP25" class = "function-link" > < span class = "function-syntax" > LocalVariables::set_kind< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > val_var< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > CK< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "3-cb.html#SP18" class = "function-link" > < span class = "function-syntax" > CodeBlocks::set_scope_to_block_about_to_open< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > index_var< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 02:37:43 +03:00
2021-04-10 19:55:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_symbol< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > val_var_s< / span > < span class = "plain-syntax" > = < / span > < a href = "3-lv.html#SP1" class = "function-link" > < span class = "function-syntax" > LocalVariables::declare< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > val_var< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_symbol< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > index_var_s< / span > < span class = "plain-syntax" > = < / span > < a href = "3-lv.html#SP1" class = "function-link" > < span class = "function-syntax" > LocalVariables::declare< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > index_var< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_symbol< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > copy_var_s< / span > < span class = "plain-syntax" > = < / span > < a href = "3-lv.html#SP1" class = "function-link" > < span class = "function-syntax" > LocalVariables::declare< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > copy_var< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 02:37:43 +03:00
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" > FOR_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 = "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 = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::inv< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > STORE_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 = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::ref_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > copy_var_s< / span > < span class = "plain-syntax" > );< / span >
2021-04-10 19:55:28 +03:00
< 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" > spec< / span > < span class = "plain-syntax" > );< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::up< / span > < span class = "plain-syntax" > ();< / span >
< 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 = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::inv< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > STORE_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 = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::ref_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > index_var_s< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::val_number< / span > < span class = "plain-syntax" > (1);< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::up< / span > < span class = "plain-syntax" > ();< / span >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pointery< / 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 = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::inv< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > STORE_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 = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::ref_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > val_var_s< / 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" > BLKVALUECREATE_HL< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::down< / span > < span class = "plain-syntax" > ();< / span >
2021-05-15 01:28:50 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > RTKindIDs::emit_strong_ID_as_val< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > CK< / span > < span class = "plain-syntax" > );< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::up< / 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 = "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" > BLKVALUECOPYAZ_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_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > val_var_s< / 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" > LIST_OF_TY_GETITEM_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_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > copy_var_s< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::val_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > index_var_s< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::val_true< / 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 = "identifier-syntax" > EmitCode::up< / span > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::up< / span > < span class = "plain-syntax" > ();< / span >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / 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" > STORE_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 = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::ref_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > val_var_s< / 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" > LIST_OF_TY_GETITEM_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_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > copy_var_s< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::val_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > index_var_s< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::val_true< / 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 = "identifier-syntax" > EmitCode::up< / span > < span class = "plain-syntax" > ();< / span >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > }< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::up< / 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 = "identifier-syntax" > EmitCode::inv< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > LE_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 = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::val_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > index_var_s< / 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" > LIST_OF_TY_GETLENGTH_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_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > copy_var_s< / 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 = "identifier-syntax" > EmitCode::up< / span > < span class = "plain-syntax" > ();< / span >
< 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 = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::inv< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > POSTINCREMENT_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 = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::ref_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > index_var_s< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::up< / span > < span class = "plain-syntax" > ();< / span >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pointery< / span > < span class = "plain-syntax" > ) {< / span >
2021-04-17 17:28:28 +03:00
< 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" > BLKVALUECOPYAZ_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_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > val_var_s< / 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" > LIST_OF_TY_GETITEM_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_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > copy_var_s< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::val_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > index_var_s< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::val_true< / 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 = "identifier-syntax" > EmitCode::up< / span > < span class = "plain-syntax" > ();< / span >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / 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" > STORE_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 = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::ref_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > val_var_s< / 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" > LIST_OF_TY_GETITEM_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_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > copy_var_s< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::val_symbol< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > index_var_s< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::val_true< / 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 = "identifier-syntax" > EmitCode::up< / span > < span class = "plain-syntax" > ();< / span >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > }< / span >
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::up< / span > < span class = "plain-syntax" > ();< / span >
2021-04-10 02:37:43 +03:00
2021-04-17 17:28:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::code< / span > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > EmitCode::down< / span > < span class = "plain-syntax" > ();< / span >
2021-04-10 02:37:43 +03:00
< span class = "plain-syntax" > }< / span >
< / pre >
< nav role = "progress" > < div class = "progresscontainer" >
2021-04-10 19:55:28 +03:00
< ul class = "progressbar" > < li class = "progressprev" > < a href = "4-cp.html" > ❮ < / a > < / li > < li class = "progresschapter" > < a href = "P-wtmd.html" > P< / a > < / li > < li class = "progresschapter" > < a href = "1-im.html" > 1< / a > < / li > < li class = "progresschapter" > < a href = "2-cv.html" > 2< / a > < / li > < li class = "progresschapter" > < a href = "3-sf.html" > 3< / a > < / li > < li class = "progresscurrentchapter" > 4< / li > < li class = "progresssection" > < a href = "4-cs.html" > cs< / a > < / li > < li class = "progresssection" > < a href = "4-ca.html" > ca< / a > < / li > < li class = "progresssection" > < a href = "4-cp.html" > cp< / a > < / li > < li class = "progresscurrent" > cl< / li > < li class = "progresssection" > < a href = "4-dtd.html" > dtd< / a > < / li > < li class = "progresssection" > < a href = "4-cad.html" > cad< / a > < / li > < li class = "progresssection" > < a href = "4-cdp.html" > cdp< / a > < / li > < li class = "progresschapter" > < a href = "5-cbal.html" > 5< / a > < / li > < li class = "progressnext" > < a href = "4-dtd.html" > ❯ < / a > < / li > < / ul > < / div >
2021-04-10 02:37:43 +03:00
< / nav > <!-- End of weave -->
< / main >
< / body >
< / html >