2021-05-30 16:42:29 +03:00
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
< html >
< head >
< title > Kind GPRs< / title >
< link href = "../docs-assets/Breadcrumbs.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< meta name = "viewport" content = "width=device-width initial-scale=1" >
< meta http-equiv = "Content-Type" content = "text/html; charset=utf-8" >
< meta http-equiv = "Content-Language" content = "en-gb" >
< link href = "../docs-assets/Contents.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Progress.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Navigation.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Fonts.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Base.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< script >
function togglePopup(material_id) {
var popup = document.getElementById(material_id);
popup.classList.toggle("show");
}
< / script >
< link href = "../docs-assets/Popups.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Colours.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< / head >
< body class = "commentary-font" >
< nav role = "navigation" >
< h1 > < a href = "../index.html" >
< img src = "../docs-assets/Inform.png" height = 72" >
< / a > < / h1 >
< ul > < li > < a href = "../compiler.html" > compiler tools< / a > < / li >
< li > < a href = "../other.html" > other tools< / a > < / li >
< li > < a href = "../extensions.html" > extensions and kits< / a > < / li >
< li > < a href = "../units.html" > unit test tools< / a > < / li >
< / ul > < h2 > Compiler Webs< / h2 > < ul >
< li > < a href = "../inbuild/index.html" > inbuild< / a > < / li >
< li > < a href = "../inform7/index.html" > inform7< / a > < / li >
< li > < a href = "../inter/index.html" > inter< / a > < / li >
< / ul > < h2 > Inbuild Modules< / h2 > < ul >
< li > < a href = "../supervisor-module/index.html" > supervisor< / a > < / li >
< / ul > < h2 > Inform7 Modules< / h2 > < ul >
< li > < a href = "../core-module/index.html" > core< / a > < / li >
< li > < a href = "../assertions-module/index.html" > assertions< / a > < / li >
< li > < a href = "../values-module/index.html" > values< / a > < / li >
< li > < a href = "../knowledge-module/index.html" > knowledge< / a > < / li >
< li > < a href = "../imperative-module/index.html" > imperative< / a > < / li >
< li > < a href = "index.html" > < span class = "selectedlink" > runtime< / span > < / a > < / li >
< li > < a href = "../if-module/index.html" > if< / a > < / li >
< li > < a href = "../multimedia-module/index.html" > multimedia< / a > < / li >
< li > < a href = "../index-module/index.html" > index< / a > < / li >
< / ul > < h2 > Inter Modules< / h2 > < ul >
< li > < a href = "../bytecode-module/index.html" > bytecode< / a > < / li >
< li > < a href = "../building-module/index.html" > building< / a > < / li >
< li > < a href = "../codegen-module/index.html" > codegen< / a > < / li >
< / ul > < h2 > Services< / h2 > < ul >
< li > < a href = "../arch-module/index.html" > arch< / a > < / li >
< li > < a href = "../calculus-module/index.html" > calculus< / a > < / li >
< li > < a href = "../html-module/index.html" > html< / a > < / li >
< li > < a href = "../inflections-module/index.html" > inflections< / a > < / li >
< li > < a href = "../kinds-module/index.html" > kinds< / a > < / li >
< li > < a href = "../linguistics-module/index.html" > linguistics< / a > < / li >
< li > < a href = "../problems-module/index.html" > problems< / a > < / li >
< li > < a href = "../syntax-module/index.html" > syntax< / a > < / li >
< li > < a href = "../words-module/index.html" > words< / a > < / li >
< li > < a href = "../../../inweb/docs/foundation-module/index.html" > foundation< / a > < / li >
< / ul >
< / nav >
< main role = "main" >
<!-- Weave of 'Kind GPRs' generated by Inweb -->
< div class = "breadcrumbs" >
< ul class = "crumbs" > < li > < a href = "../index.html" > Home< / a > < / li > < li > < a href = "../compiler.html" > Inform7< / a > < / li > < li > < a href = "index.html" > runtime< / a > < / li > < li > < a href = "index.html#7" > Chapter 7: Command Grammar< / a > < / li > < li > < b > Kind GPRs< / b > < / li > < / ul > < / div >
< p class = "purpose" > General parsing routine (GPR) functions to match values of non-object kinds in the command parser.< / p >
< p class = "commentary firstcommentary" > < a id = "SP1" class = "paragraph-anchor" > < / a > < b > § 1. < / b > We provide special support for the token "[number]" here. This is a function
which picks up any irregular meanings added by the source text, say by "Understand
"lots" as 100."; it does not parse orthodox numbers like 4, -3, and such.
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > KindGPRs::number< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_name< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > iname< / span > < span class = "plain-syntax" > = < / span > < a href = "2-hrr.html#SP11" class = "function-link" > < span class = "function-syntax" > Hierarchy::find< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "constant-syntax" > DECIMAL_TOKEN_INNER_HL< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > packaging_state< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > save< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Functions::begin< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > iname< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > gpr_kit< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > = < / span > < a href = "2-gpr.html#SP3" class = "function-link" > < span class = "function-syntax" > GPRs::new_kit< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-gpr.html#SP4" class = "function-link" > < span class = "function-syntax" > GPRs::add_original_var< / span > < / a > < span class = "plain-syntax" > (& < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > command_grammar< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > cg< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > CommandGrammars::get_parsing_grammar< / 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" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > cg< / span > < span class = "plain-syntax" > ) < / span > < a href = "7-cg.html#SP12" class = "function-link" > < span class = "function-syntax" > RTCommandGrammars::compile_for_value_GPR< / span > < / a > < span class = "plain-syntax" > (& < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > cg< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP13" class = "function-link" > < span class = "function-syntax" > EmitCode::inv< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > RETURN_BIP< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::down< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP7" class = "function-link" > < span class = "function-syntax" > EmitCode::val_iname< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < a href = "2-hrr.html#SP11" class = "function-link" > < span class = "function-syntax" > Hierarchy::find< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > GPR_FAIL_HL< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::up< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Functions::end< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > save< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-hrr.html#SP17" class = "function-link" > < span class = "function-syntax" > Hierarchy::make_available< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > iname< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
< p class = "commentary firstcommentary" > < a id = "SP2" class = "paragraph-anchor" > < / a > < b > § 2. < / b > And similarly "[time]":
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > KindGPRs::time< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_name< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > iname< / span > < span class = "plain-syntax" > = < / span > < a href = "2-hrr.html#SP11" class = "function-link" > < span class = "function-syntax" > Hierarchy::find< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "constant-syntax" > TIME_TOKEN_INNER_HL< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > packaging_state< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > save< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Functions::begin< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > iname< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > gpr_kit< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > = < / span > < a href = "2-gpr.html#SP3" class = "function-link" > < span class = "function-syntax" > GPRs::new_kit< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-gpr.html#SP4" class = "function-link" > < span class = "function-syntax" > GPRs::add_original_var< / span > < / a > < span class = "plain-syntax" > (& < / span > < span class = "identifier-syntax" > kit< / 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" > TimesOfDay::kind< / span > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > command_grammar< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > cg< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > CommandGrammars::get_parsing_grammar< / 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" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > cg< / span > < span class = "plain-syntax" > ) < / span > < a href = "7-cg.html#SP12" class = "function-link" > < span class = "function-syntax" > RTCommandGrammars::compile_for_value_GPR< / span > < / a > < span class = "plain-syntax" > (& < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > cg< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP13" class = "function-link" > < span class = "function-syntax" > EmitCode::inv< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > RETURN_BIP< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::down< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP7" class = "function-link" > < span class = "function-syntax" > EmitCode::val_iname< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < a href = "2-hrr.html#SP11" class = "function-link" > < span class = "function-syntax" > Hierarchy::find< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > GPR_FAIL_HL< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::up< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Functions::end< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > save< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-hrr.html#SP17" class = "function-link" > < span class = "function-syntax" > Hierarchy::make_available< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > iname< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
< p class = "commentary firstcommentary" > < a id = "SP3" class = "paragraph-anchor" > < / a > < b > § 3. < / b > And "[truth state]":
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > KindGPRs::truth_state< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_name< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > iname< / span > < span class = "plain-syntax" > = < / span > < a href = "2-hrr.html#SP11" class = "function-link" > < span class = "function-syntax" > Hierarchy::find< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "constant-syntax" > TRUTH_STATE_TOKEN_INNER_HL< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > packaging_state< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > save< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Functions::begin< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > iname< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > gpr_kit< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > = < / span > < a href = "2-gpr.html#SP3" class = "function-link" > < span class = "function-syntax" > GPRs::new_kit< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-gpr.html#SP4" class = "function-link" > < span class = "function-syntax" > GPRs::add_original_var< / span > < / a > < span class = "plain-syntax" > (& < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > command_grammar< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > cg< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > CommandGrammars::get_parsing_grammar< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_truth_state< / 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" > cg< / span > < span class = "plain-syntax" > ) < / span > < a href = "7-cg.html#SP12" class = "function-link" > < span class = "function-syntax" > RTCommandGrammars::compile_for_value_GPR< / span > < / a > < span class = "plain-syntax" > (& < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > cg< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP13" class = "function-link" > < span class = "function-syntax" > EmitCode::inv< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > RETURN_BIP< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::down< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP7" class = "function-link" > < span class = "function-syntax" > EmitCode::val_iname< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < a href = "2-hrr.html#SP11" class = "function-link" > < span class = "function-syntax" > Hierarchy::find< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > GPR_FAIL_HL< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::up< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Functions::end< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > save< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-hrr.html#SP17" class = "function-link" > < span class = "function-syntax" > Hierarchy::make_available< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > iname< / 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. < / b > More generally, we can make a GPR for values of any enumeration or quasinumerical
kind on request: see < a href = "5-kc.html#SP7" class = "internal" > RTKindConstructors::request_I6_GPR< / a > .
< / p >
< p class = "commentary" > This does not work for other kinds, and in particular for kinds of object. Those
are handled elsewhere by < a href = "7-nft.html" class = "internal" > Noun Filter Tokens< / a > .
< / p >
< p class = "commentary" > For a quasinumerical kind, we compile only a general GPR to match values of that
kind, trying each possible notation in turn until one matches:
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > KindGPRs::quasinumerical_agent< / 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" > KindGPRs::quasinumerical_agent< / span > < / span > :< br / > Kind Constructors - < a href = "5-kc.html#SP7" > § 7< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > compilation_subtask< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > t< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > kind< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > RETRIEVE_POINTER_kind< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > t< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > data< / 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_quasinumerical< / 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 > < span class = "identifier-syntax" > internal_error< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "miscall"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_name< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > iname< / span > < span class = "plain-syntax" > = < / span > < a href = "5-kc.html#SP3" class = "function-link" > < span class = "function-syntax" > RTKindConstructors::get_kind_GPR_iname< / span > < / a > < 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" > packaging_state< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > save< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Functions::begin< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > iname< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > gpr_kit< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > = < / span > < a href = "2-gpr.html#SP3" class = "function-link" > < span class = "function-syntax" > GPRs::new_kit< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-gpr.html#SP4" class = "function-link" > < span class = "function-syntax" > GPRs::add_original_var< / span > < / a > < span class = "plain-syntax" > (& < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-gpr.html#SP4" class = "function-link" > < span class = "function-syntax" > GPRs::add_standard_vars< / span > < / a > < span class = "plain-syntax" > (& < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-gpr.html#SP4" class = "function-link" > < span class = "function-syntax" > GPRs::add_LP_vars< / span > < / a > < span class = "plain-syntax" > (& < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "7-kg.html#SP4_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Save word number< / span > < span class = "named-paragraph-number" > 4.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "7-kg.html#SP4_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Save word number< / span > < span class = "named-paragraph-number" > 4.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "7-kg.html#SP4_2" class = "named-paragraph-link" > < span class = "named-paragraph" > Match more elaborate grammar for this kind, if there is any< / span > < span class = "named-paragraph-number" > 4.2< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > literal_pattern< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > lp< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > LITERAL_FORMS_LOOP< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > lp< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP13" class = "function-link" > < span class = "function-syntax" > EmitCode::inv< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > STORE_BIP< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::down< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP12" class = "function-link" > < span class = "function-syntax" > EmitCode::ref_symbol< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > .< / span > < span class = "element-syntax" > rv_s< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP13" class = "function-link" > < span class = "function-syntax" > EmitCode::call< / span > < / a > < span class = "plain-syntax" > (< / span > < a href = "5-lp.html#SP2" class = "function-link" > < span class = "function-syntax" > RTLiteralPatterns::parse_fn_iname< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > lp< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::up< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP13" class = "function-link" > < span class = "function-syntax" > EmitCode::inv< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > IF_BIP< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::down< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP13" class = "function-link" > < span class = "function-syntax" > EmitCode::inv< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > EQ_BIP< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::down< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP7" class = "function-link" > < span class = "function-syntax" > EmitCode::val_symbol< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > .< / span > < span class = "element-syntax" > rv_s< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP7" class = "function-link" > < span class = "function-syntax" > EmitCode::val_iname< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < a href = "2-hrr.html#SP11" class = "function-link" > < span class = "function-syntax" > Hierarchy::find< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > GPR_NUMBER_HL< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::up< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP5" class = "function-link" > < span class = "function-syntax" > EmitCode::code< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::down< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP13" class = "function-link" > < span class = "function-syntax" > EmitCode::inv< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > RETURN_BIP< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::down< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP7" class = "function-link" > < span class = "function-syntax" > EmitCode::val_symbol< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > .< / span > < span class = "element-syntax" > rv_s< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::up< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::up< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::up< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "7-kg.html#SP4_3" class = "named-paragraph-link" > < span class = "named-paragraph" > Reset word number< / span > < span class = "named-paragraph-number" > 4.3< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "7-kg.html#SP4_4" class = "named-paragraph-link" > < span class = "named-paragraph" > Completely fail< / span > < span class = "named-paragraph-number" > 4.4< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Functions::end< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > save< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
< p class = "commentary firstcommentary" > < a id = "SP4_1" class = "paragraph-anchor" > < / a > < b > § 4.1. < / b > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Save word number< / span > < span class = "named-paragraph-number" > 4.1< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP13" class = "function-link" > < span class = "function-syntax" > EmitCode::inv< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > STORE_BIP< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::down< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP12" class = "function-link" > < span class = "function-syntax" > EmitCode::ref_symbol< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > .< / span > < span class = "element-syntax" > original_wn_s< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP7" class = "function-link" > < span class = "function-syntax" > EmitCode::val_iname< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < a href = "2-hrr.html#SP11" class = "function-link" > < span class = "function-syntax" > Hierarchy::find< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > WN_HL< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::up< / span > < / a > < span class = "plain-syntax" > ();< / span >
< / pre >
< ul class = "endnotetexts" > < li > This code is used in < a href = "7-kg.html#SP4" > § 4< / a > (twice), < a href = "7-kg.html#SP5_1" > § 5.1< / a > , < a href = "7-kg.html#SP5_2" > § 5.2< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP4_2" class = "paragraph-anchor" > < / a > < b > § 4.2. < / b > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Match more elaborate grammar for this kind, if there is any< / span > < span class = "named-paragraph-number" > 4.2< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > command_grammar< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > cg< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > CommandGrammars::get_parsing_grammar< / 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" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > cg< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < a href = "7-cg.html#SP12" class = "function-link" > < span class = "function-syntax" > RTCommandGrammars::compile_for_value_GPR< / span > < / a > < span class = "plain-syntax" > (& < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > cg< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "7-kg.html#SP4_3" class = "named-paragraph-link" > < span class = "named-paragraph" > Reset word number< / span > < span class = "named-paragraph-number" > 4.3< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
< ul class = "endnotetexts" > < li > This code is used in < a href = "7-kg.html#SP4" > § 4< / a > , < a href = "7-kg.html#SP5_1" > § 5.1< / a > , < a href = "7-kg.html#SP5_2" > § 5.2< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP4_3" class = "paragraph-anchor" > < / a > < b > § 4.3. < / b > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Reset word number< / span > < span class = "named-paragraph-number" > 4.3< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP13" class = "function-link" > < span class = "function-syntax" > EmitCode::inv< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > STORE_BIP< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::down< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP12" class = "function-link" > < span class = "function-syntax" > EmitCode::ref_iname< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < a href = "2-hrr.html#SP11" class = "function-link" > < span class = "function-syntax" > Hierarchy::find< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > WN_HL< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP7" class = "function-link" > < span class = "function-syntax" > EmitCode::val_symbol< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > .< / span > < span class = "element-syntax" > original_wn_s< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::up< / span > < / a > < span class = "plain-syntax" > ();< / span >
< / pre >
< ul class = "endnotetexts" > < li > This code is used in < a href = "7-kg.html#SP4" > § 4< / a > , < a href = "7-kg.html#SP4_2" > § 4.2< / a > , < a href = "7-kg.html#SP5_1_1" > § 5.1.1< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP4_4" class = "paragraph-anchor" > < / a > < b > § 4.4. < / b > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Completely fail< / span > < span class = "named-paragraph-number" > 4.4< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP13" class = "function-link" > < span class = "function-syntax" > EmitCode::inv< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > RETURN_BIP< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::down< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP7" class = "function-link" > < span class = "function-syntax" > EmitCode::val_iname< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < a href = "2-hrr.html#SP11" class = "function-link" > < span class = "function-syntax" > Hierarchy::find< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > GPR_FAIL_HL< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::up< / span > < / a > < span class = "plain-syntax" > ();< / span >
< / pre >
< ul class = "endnotetexts" > < li > This code is used in < a href = "7-kg.html#SP4" > § 4< / a > , < a href = "7-kg.html#SP5_1" > § 5.1< / a > , < a href = "7-kg.html#SP5_2" > § 5.2< / a > , < a href = "7-kg.html#SP5_1_1_3" > § 5.1.1.3< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP5" class = "paragraph-anchor" > < / a > < b > § 5. < / b > For an enumeration, we make two functions:
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > KindGPRs::enumeration_agent< / 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" > KindGPRs::enumeration_agent< / span > < / span > :< br / > Kind Constructors - < a href = "5-kc.html#SP7" > § 7< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > compilation_subtask< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > t< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > kind< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > RETRIEVE_POINTER_kind< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > t< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > data< / 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 = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > internal_error< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "miscall"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "7-kg.html#SP5_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Compile the normal GPR< / span > < span class = "named-paragraph-number" > 5.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "7-kg.html#SP5_2" class = "named-paragraph-link" > < span class = "named-paragraph" > Compile the instance GPR< / span > < span class = "named-paragraph-number" > 5.2< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
< p class = "commentary firstcommentary" > < a id = "SP5_1" class = "paragraph-anchor" > < / a > < b > § 5.1. < / b > The first is a straightforward GPR to match any instance name for the kind.
For example, for a kind called "colour", it might match any of "burnt umber",
"cerulean blue" or "sienna".
< / p >
< p class = "commentary" > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Compile the normal GPR< / span > < span class = "named-paragraph-number" > 5.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" > inter_name< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > iname< / span > < span class = "plain-syntax" > = < / span > < a href = "5-kc.html#SP3" class = "function-link" > < span class = "function-syntax" > RTKindConstructors::get_kind_GPR_iname< / span > < / a > < 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" > packaging_state< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > save< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Functions::begin< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > iname< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > gpr_kit< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > = < / span > < a href = "2-gpr.html#SP3" class = "function-link" > < span class = "function-syntax" > GPRs::new_kit< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-gpr.html#SP4" class = "function-link" > < span class = "function-syntax" > GPRs::add_original_var< / span > < / a > < span class = "plain-syntax" > (& < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-gpr.html#SP4" class = "function-link" > < span class = "function-syntax" > GPRs::add_standard_vars< / span > < / a > < span class = "plain-syntax" > (& < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "7-kg.html#SP4_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Save word number< / span > < span class = "named-paragraph-number" > 4.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "7-kg.html#SP4_2" class = "named-paragraph-link" > < span class = "named-paragraph" > Match more elaborate grammar for this kind, if there is any< / span > < span class = "named-paragraph-number" > 4.2< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "7-kg.html#SP5_1_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Match instances in decreasing name length order< / span > < span class = "named-paragraph-number" > 5.1.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "7-kg.html#SP4_4" class = "named-paragraph-link" > < span class = "named-paragraph" > Completely fail< / span > < span class = "named-paragraph-number" > 4.4< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Functions::end< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > save< / span > < span class = "plain-syntax" > );< / span >
< / pre >
< ul class = "endnotetexts" > < li > This code is used in < a href = "7-kg.html#SP5" > § 5< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP5_2" class = "paragraph-anchor" > < / a > < b > § 5.2. < / b > The second is not quite a standard GPR, because it takes a call parameter,
< span class = "extract" > < span class = "extract-syntax" > instance< / span > < / span > . The GPR matches only the name of that one instance; thus, if called
with < span class = "extract" > < span class = "extract-syntax" > I_burnt_umber< / span > < / span > , it would match only "burnt umber".
< / p >
< p class = "commentary" > Why is this needed? The answer is that whereas objects can have individual
< span class = "extract" > < span class = "extract-syntax" > parse_name< / span > < / span > functions, allowing authors to customise the recognised names for
them, instances of non-object enumerations do not have a < span class = "extract" > < span class = "extract-syntax" > parse_name< / span > < / span > . So this
is the only way to allow, say, "Understand "sooty" as burnt umber." to work —
the grammar holding "sooty" comes out only in the following function.
< / p >
< p class = "commentary" > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Compile the instance GPR< / span > < span class = "named-paragraph-number" > 5.2< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_name< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > iname< / span > < span class = "plain-syntax" > = < / span > < a href = "5-kc.html#SP3" class = "function-link" > < span class = "function-syntax" > RTKindConstructors::get_instance_GPR_iname< / span > < / a > < 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" > packaging_state< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > save< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Functions::begin< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > iname< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > gpr_kit< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > = < / span > < a href = "2-gpr.html#SP3" class = "function-link" > < span class = "function-syntax" > GPRs::new_kit< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-gpr.html#SP4" class = "function-link" > < span class = "function-syntax" > GPRs::add_instance_var< / span > < / a > < span class = "plain-syntax" > (& < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-gpr.html#SP4" class = "function-link" > < span class = "function-syntax" > GPRs::add_original_var< / span > < / a > < span class = "plain-syntax" > (& < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-gpr.html#SP4" class = "function-link" > < span class = "function-syntax" > GPRs::add_standard_vars< / span > < / a > < span class = "plain-syntax" > (& < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > .< / span > < span class = "element-syntax" > GV_IS_VALUE_instance_mode< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > TRUE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "7-kg.html#SP4_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Save word number< / span > < span class = "named-paragraph-number" > 4.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "7-kg.html#SP4_2" class = "named-paragraph-link" > < span class = "named-paragraph" > Match more elaborate grammar for this kind, if there is any< / span > < span class = "named-paragraph-number" > 4.2< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "7-kg.html#SP5_1_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Match instances in decreasing name length order< / span > < span class = "named-paragraph-number" > 5.1.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "7-kg.html#SP4_4" class = "named-paragraph-link" > < span class = "named-paragraph" > Completely fail< / span > < span class = "named-paragraph-number" > 4.4< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Functions::end< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > save< / span > < span class = "plain-syntax" > );< / span >
< / pre >
< ul class = "endnotetexts" > < li > This code is used in < a href = "7-kg.html#SP5" > § 5< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP5_1_1" class = "paragraph-anchor" > < / a > < b > § 5.1.1. < / b > We try longer names first so that if the enumeration contains both "yellow"
and "yellow chromium" then we match YELLOW CHROMIUM against the longer option.
< / p >
< p class = "commentary" > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Match instances in decreasing name length order< / span > < span class = "named-paragraph-number" > 5.1.1< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > next_label< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > 1< / 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" > longest< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > instance< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > I< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > LOOP_OVER_INSTANCES< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > I< / 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" > wording< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > NW< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Instances::get_name_in_play< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > I< / 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" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > L< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Wordings::length< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > NW< / 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" > L< / span > < span class = "plain-syntax" > > < / span > < span class = "identifier-syntax" > longest< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > longest< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > L< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > for< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > len< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > longest< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > len< / span > < span class = "plain-syntax" > > = < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > len< / span > < span class = "plain-syntax" > --) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > LOOP_OVER_INSTANCES< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > I< / 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" > wording< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > NW< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Instances::get_name_in_play< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > I< / 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" > Wordings::length< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > NW< / span > < span class = "plain-syntax" > ) == < / span > < span class = "identifier-syntax" > len< / 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" > kit< / span > < span class = "plain-syntax" > .< / span > < span class = "element-syntax" > GV_IS_VALUE_instance_mode< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "7-kg.html#SP5_1_1_2" class = "named-paragraph-link" > < span class = "named-paragraph" > Test if this is the right instance< / span > < span class = "named-paragraph-number" > 5.1.1.2< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "7-kg.html#SP5_1_1_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Match the instance I< / span > < span class = "named-paragraph-number" > 5.1.1.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "7-kg.html#SP5_1_1_3" class = "named-paragraph-link" > < span class = "named-paragraph" > Close test if this is the right instance< / span > < span class = "named-paragraph-number" > 5.1.1.3< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > {< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "7-kg.html#SP5_1_1_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Match the instance I< / span > < span class = "named-paragraph-number" > 5.1.1.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "7-kg.html#SP4_3" class = "named-paragraph-link" > < span class = "named-paragraph" > Reset word number< / span > < span class = "named-paragraph-number" > 4.3< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
< ul class = "endnotetexts" > < li > This code is used in < a href = "7-kg.html#SP5_1" > § 5.1< / a > , < a href = "7-kg.html#SP5_2" > § 5.2< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP5_1_1_1" class = "paragraph-anchor" > < / a > < b > § 5.1.1.1. < / b > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Match the instance I< / span > < span class = "named-paragraph-number" > 5.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" > TEMPORARY_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > L< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE_TO< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > L< / span > < span class = "plain-syntax" > , < / span > < span class = "string-syntax" > ".Failed_%d"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > next_label< / 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" > failure_label< / span > < span class = "plain-syntax" > = < / span > < a href = "2-ec.html#SP16" class = "function-link" > < span class = "function-syntax" > EmitCode::reserve_label< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > L< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > DISCARD_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > L< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > LOOP_THROUGH_WORDING< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > k< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > NW< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP13" class = "function-link" > < span class = "function-syntax" > EmitCode::inv< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > IF_BIP< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::down< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP13" class = "function-link" > < span class = "function-syntax" > EmitCode::inv< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > NE_BIP< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::down< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP13" class = "function-link" > < span class = "function-syntax" > EmitCode::call< / span > < / a > < span class = "plain-syntax" > (< / span > < a href = "2-hrr.html#SP11" class = "function-link" > < span class = "function-syntax" > Hierarchy::find< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > NEXTWORDSTOPPED_HL< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > TEMPORARY_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE_TO< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > , < / span > < span class = "string-syntax" > "%N"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > k< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP7" class = "function-link" > < span class = "function-syntax" > EmitCode::val_dword< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > DISCARD_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::up< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP5" class = "function-link" > < span class = "function-syntax" > EmitCode::code< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::down< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP13" class = "function-link" > < span class = "function-syntax" > EmitCode::inv< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > JUMP_BIP< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::down< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP16" class = "function-link" > < span class = "function-syntax" > EmitCode::lab< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > failure_label< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::up< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::up< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::up< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP13" class = "function-link" > < span class = "function-syntax" > EmitCode::inv< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > STORE_BIP< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::down< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP12" class = "function-link" > < span class = "function-syntax" > EmitCode::ref_iname< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < a href = "2-hrr.html#SP11" class = "function-link" > < span class = "function-syntax" > Hierarchy::find< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > PARSED_NUMBER_HL< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP7" class = "function-link" > < span class = "function-syntax" > EmitCode::val_iname< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < a href = "5-ins.html#SP1" class = "function-link" > < span class = "function-syntax" > RTInstances::value_iname< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > I< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::up< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP13" class = "function-link" > < span class = "function-syntax" > EmitCode::inv< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > RETURN_BIP< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::down< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP7" class = "function-link" > < span class = "function-syntax" > EmitCode::val_iname< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < a href = "2-hrr.html#SP11" class = "function-link" > < span class = "function-syntax" > Hierarchy::find< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > GPR_NUMBER_HL< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::up< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP16" class = "function-link" > < span class = "function-syntax" > EmitCode::place_label< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > failure_label< / span > < span class = "plain-syntax" > );< / span >
< / pre >
< ul class = "endnotetexts" > < li > This code is used in < a href = "7-kg.html#SP5_1_1" > § 5.1.1< / a > (twice).< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP5_1_1_2" class = "paragraph-anchor" > < / a > < b > § 5.1.1.2. < / b > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Test if this is the right instance< / span > < span class = "named-paragraph-number" > 5.1.1.2< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP13" class = "function-link" > < span class = "function-syntax" > EmitCode::inv< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > IF_BIP< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::down< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP13" class = "function-link" > < span class = "function-syntax" > EmitCode::inv< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > EQ_BIP< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::down< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP7" class = "function-link" > < span class = "function-syntax" > EmitCode::val_symbol< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > kit< / span > < span class = "plain-syntax" > .< / span > < span class = "element-syntax" > instance_s< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP7" class = "function-link" > < span class = "function-syntax" > EmitCode::val_iname< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > , < / span > < a href = "5-ins.html#SP1" class = "function-link" > < span class = "function-syntax" > RTInstances::value_iname< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > I< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::up< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP5" class = "function-link" > < span class = "function-syntax" > EmitCode::code< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::down< / span > < / a > < span class = "plain-syntax" > ();< / span >
< / pre >
< ul class = "endnotetexts" > < li > This code is used in < a href = "7-kg.html#SP5_1_1" > § 5.1.1< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP5_1_1_3" class = "paragraph-anchor" > < / a > < b > § 5.1.1.3. < / b > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Close test if this is the right instance< / span > < span class = "named-paragraph-number" > 5.1.1.3< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "7-kg.html#SP4_4" class = "named-paragraph-link" > < span class = "named-paragraph" > Completely fail< / span > < span class = "named-paragraph-number" > 4.4< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::up< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ec.html#SP3" class = "function-link" > < span class = "function-syntax" > EmitCode::up< / span > < / a > < span class = "plain-syntax" > ();< / span >
< / pre >
< ul class = "endnotetexts" > < li > This code is used in < a href = "7-kg.html#SP5_1_1" > § 5.1.1< / a > .< / li > < / ul >
< nav role = "progress" > < div class = "progresscontainer" >
2021-05-30 16:52:19 +03:00
< ul class = "progressbar" > < li class = "progressprev" > < a href = "7-cgt.html" > ❮ < / a > < / li > < li class = "progresschapter" > < a href = "P-wtmd.html" > P< / a > < / li > < li class = "progresschapter" > < a href = "1-rm.html" > 1< / a > < / li > < li class = "progresschapter" > < a href = "2-hrr.html" > 2< / a > < / li > < li class = "progresschapter" > < a href = "3-gm.html" > 3< / a > < / li > < li class = "progresschapter" > < a href = "4-enc.html" > 4< / a > < / li > < li class = "progresschapter" > < a href = "5-act.html" > 5< / a > < / li > < li class = "progresschapter" > < a href = "6-bd.html" > 6< / a > < / li > < li class = "progresscurrentchapter" > 7< / li > < li class = "progresssection" > < a href = "7-cg.html" > cg< / a > < / li > < li class = "progresssection" > < a href = "7-cgl.html" > cgl< / a > < / li > < li class = "progresssection" > < a href = "7-cgt.html" > cgt< / a > < / li > < li class = "progresscurrent" > kg< / li > < li class = "progresssection" > < a href = "7-nft.html" > nft< / a > < / li > < li class = "progresssection" > < a href = "7-np.html" > np< / a > < / li > < li class = "progresssection" > < a href = "7-pnp.html" > pnp< / a > < / li > < li class = "progressnext" > < a href = "7-nft.html" > ❯ < / a > < / li > < / ul > < / div >
2021-05-30 16:42:29 +03:00
< / nav > <!-- End of weave -->
< / main >
< / body >
< / html >