2019-06-28 20:25:50 +03:00
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
< html >
< head >
2020-04-14 19:56:54 +03:00
< title > Constants and Literals< / title >
2020-05-03 03:20:55 +03:00
< link href = "../docs-assets/Breadcrumbs.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
2020-03-19 02:11:25 +02:00
< meta name = "viewport" content = "width=device-width initial-scale=1" >
2019-06-28 20:25:50 +03:00
< meta http-equiv = "Content-Type" content = "text/html; charset=utf-8" >
< meta http-equiv = "Content-Language" content = "en-gb" >
2020-05-03 03:01:21 +03:00
2020-05-03 03:20:55 +03:00
< link href = "../docs-assets/Contents.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Progress.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Navigation.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Fonts.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Base.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
2020-05-03 03:01:21 +03:00
< script >
function togglePopup(material_id) {
var popup = document.getElementById(material_id);
popup.classList.toggle("show");
}
< / script >
2020-05-03 03:20:55 +03:00
< link href = "../docs-assets/Popups.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Colours.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
2020-04-14 19:56:54 +03:00
2019-06-28 20:25:50 +03:00
< / head >
2020-05-03 03:01:21 +03:00
< body class = "commentary-font" >
2020-03-19 02:11:25 +02:00
< nav role = "navigation" >
2020-04-14 19:56:54 +03:00
< h1 > < a href = "../index.html" >
2020-05-03 18:34:53 +03:00
< img src = "../docs-assets/Inform.png" height = 72" >
2020-04-14 19:56:54 +03:00
< / a > < / h1 >
< ul > < li > < a href = "../compiler.html" > compiler tools< / a > < / li >
2020-03-19 02:11:25 +02:00
< li > < a href = "../other.html" > other tools< / a > < / li >
< li > < a href = "../extensions.html" > extensions and kits< / a > < / li >
< li > < a href = "../units.html" > unit test tools< / a > < / li >
2020-04-14 19:56:54 +03:00
< / ul > < h2 > Compiler Webs< / h2 > < ul >
2020-03-19 02:11:25 +02:00
< li > < a href = "../inbuild/index.html" > inbuild< / a > < / li >
< li > < a href = "../inform7/index.html" > inform7< / a > < / li >
< li > < a href = "../inter/index.html" > inter< / a > < / li >
2020-04-14 19:56:54 +03:00
< / ul > < h2 > Inbuild Modules< / h2 > < ul >
< li > < a href = "../supervisor-module/index.html" > supervisor< / a > < / li >
< / ul > < h2 > Inform7 Modules< / h2 > < ul >
2020-03-19 02:11:25 +02:00
< li > < a href = "../core-module/index.html" > core< / a > < / li >
2020-08-27 17:50:24 +03:00
< 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 = "../runtime-module/index.html" > runtime< / a > < / li >
2020-03-19 02:11:25 +02:00
< li > < a href = "../if-module/index.html" > if< / a > < / li >
< li > < a href = "../multimedia-module/index.html" > multimedia< / a > < / li >
< li > < a href = "../index-module/index.html" > index< / a > < / li >
2020-04-14 19:56:54 +03:00
< / ul > < h2 > Inter Modules< / h2 > < ul >
< li > < a href = "../bytecode-module/index.html" > bytecode< / a > < / li >
2020-03-19 02:11:25 +02:00
< li > < a href = "../building-module/index.html" > building< / a > < / li >
2021-08-10 13:01:03 +03:00
< li > < a href = "../pipeline-module/index.html" > pipeline< / a > < / li >
< li > < a href = "index.html" > < span class = "selectedlink" > final< / span > < / a > < / li >
2020-05-20 02:02:28 +03:00
< / ul > < h2 > Services< / h2 > < ul >
2020-04-14 19:56:54 +03:00
< li > < a href = "../arch-module/index.html" > arch< / a > < / li >
2020-08-27 17:50:24 +03:00
< li > < a href = "../calculus-module/index.html" > calculus< / a > < / li >
2020-04-14 19:56:54 +03:00
< li > < a href = "../html-module/index.html" > html< / a > < / li >
2020-05-20 02:02:28 +03:00
< li > < a href = "../inflections-module/index.html" > inflections< / a > < / li >
2020-08-27 17:50:24 +03:00
< li > < a href = "../kinds-module/index.html" > kinds< / a > < / li >
2020-05-20 02:02:28 +03:00
< li > < a href = "../linguistics-module/index.html" > linguistics< / a > < / li >
< li > < a href = "../problems-module/index.html" > problems< / a > < / li >
2020-08-27 17:50:24 +03:00
< li > < a href = "../syntax-module/index.html" > syntax< / a > < / li >
< li > < a href = "../words-module/index.html" > words< / a > < / li >
2020-03-19 02:11:25 +02:00
< li > < a href = "../../../inweb/docs/foundation-module/index.html" > foundation< / a > < / li >
2020-04-14 19:56:54 +03:00
< / ul >
2020-03-19 02:11:25 +02:00
< / nav >
< main role = "main" >
2020-05-03 03:01:21 +03:00
<!-- Weave of 'Constants and Literals' generated by Inweb -->
< div class = "breadcrumbs" >
2021-08-10 13:01:03 +03:00
< ul class = "crumbs" > < li > < a href = "../index.html" > Home< / a > < / li > < li > < a href = "../compiler.html" > Inter Modules< / a > < / li > < li > < a href = "index.html" > final< / a > < / li > < li > < a href = "index.html#2" > Chapter 2: Mechanism< / a > < / li > < li > < b > Constants and Literals< / b > < / li > < / ul > < / div >
2020-05-03 03:01:21 +03:00
< p class = "purpose" > To generate final code for constants, including arrays.< / p >
2020-08-27 17:50:24 +03:00
< p class = "commentary firstcommentary" > < a id = "SP1" class = "paragraph-anchor" > < / a > < b > § 1. < / b > < / p >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > the_quartet_found< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > box_mode< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > printing_mode< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
2021-08-10 13:01:03 +03:00
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CodeGen::CL::prepare< / 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" > CodeGen::CL::prepare< / span > < / span > :< br / > Code Generation - < a href = "2-cg.html#SP8_1" > § 8.1< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > code_generation< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > ) {< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > the_quartet_found< / 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" > box_mode< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > printing_mode< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > InterTree::traverse< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > from< / span > < span class = "plain-syntax" > , < / span > < a href = "2-cal.html#SP1" class = "function-link" > < span class = "function-syntax" > CodeGen::CL::quartet_visitor< / span > < / a > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > CONSTANT_IST< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > }< / span >
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CodeGen::CL::quartet_visitor< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > inter_tree< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > I< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > inter_tree_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > state< / span > < span class = "plain-syntax" > ) {< / span >
2021-04-15 00:57:48 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_symbol< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > InterSymbolsTables::symbol_from_frame_data< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > DEFN_CONST_IFLD< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > Str::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > symbol_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > I< / span > < span class = "string-syntax" > "thedark"< / span > < span class = "plain-syntax" > )) ||< / span >
< span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Str::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > symbol_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > I< / span > < span class = "string-syntax" > "InformLibrary"< / span > < span class = "plain-syntax" > )) ||< / span >
< span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Str::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > symbol_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > I< / span > < span class = "string-syntax" > "InformParser"< / span > < span class = "plain-syntax" > )) ||< / span >
< span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Str::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > symbol_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > I< / span > < span class = "string-syntax" > "Compass"< / span > < span class = "plain-syntax" > )))< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > the_quartet_found< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > TRUE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2021-08-10 13:01:03 +03:00
< span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CodeGen::CL::quartet_present< / 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" > CodeGen::CL::quartet_present< / span > < / span > :< br / > Instances and Properties - < a href = "2-iap.html#SP1" > § 1< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > ) {< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > the_quartet_found< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2019-06-29 15:17:29 +03:00
< / pre >
2021-04-25 10:03:14 +03:00
< p class = "commentary firstcommentary" > < a id = "SP2" class = "paragraph-anchor" > < / a > < b > § 2. < / b > There's a contrivance here to get around an awkward point of I6 syntax:
2019-06-28 20:25:50 +03:00
an array written in the form
< / p >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > Array< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > X< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > table< / span > < span class = "plain-syntax" > < / span > < span class = "constant-syntax" > 20< / span > < span class = "plain-syntax" > ;< / span >
2019-06-28 20:25:50 +03:00
< / pre >
2020-05-03 03:01:21 +03:00
< p class = "commentary" > makes a table with 20 entries, not a table with one entry whose initial value
2019-06-28 20:25:50 +03:00
is 20. We instead compile this as
< / p >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > Array< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > X< / span > < span class = "plain-syntax" > --> < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > < / span > < span class = "constant-syntax" > 20< / span > < span class = "plain-syntax" > ;< / span >
2020-04-14 19:56:54 +03:00
< / pre >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
2021-08-10 13:01:03 +03:00
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CodeGen::CL::constant< / 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" > CodeGen::CL::constant< / span > < / span > :< br / > Frame Control - < a href = "2-fc.html#SP1" > § 1< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > code_generation< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > inter_tree_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > P< / 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" > OUT< / span > < span class = "plain-syntax" > = < / span > < a href = "2-cg.html#SP7" class = "function-link" > < span class = "function-syntax" > CodeGen::current< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > );< / span >
2021-04-15 00:57:48 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_symbol< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > InterSymbolsTables::symbol_from_frame_data< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > DEFN_CONST_IFLD< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Inter::Symbols::read_annotation< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > INLINE_ARRAY_IANN< / span > < span class = "plain-syntax" > ) == < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > ) < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Inter::Symbols::read_annotation< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > ACTION_IANN< / span > < span class = "plain-syntax" > ) == < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > ) < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Inter::Symbols::read_annotation< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > FAKE_ACTION_IANN< / span > < span class = "plain-syntax" > ) == < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > fa< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Str::duplicate< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > symbol_name< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Str::delete_first_character< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > fa< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Str::delete_first_character< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > fa< / span > < span class = "plain-syntax" > );< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-ft.html#SP19" class = "function-link" > < span class = "function-syntax" > CodeGen::Targets::new_fake_action< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > fa< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > ifndef_me< / 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" > Inter::Symbols::read_annotation< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > VENEER_IANN< / span > < span class = "plain-syntax" > ) > < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > ) < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > Str::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > symbol_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > I< / span > < span class = "string-syntax" > "WORDSIZE"< / span > < span class = "plain-syntax" > )) ||< / span >
< span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Str::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > symbol_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > I< / span > < span class = "string-syntax" > "TARGET_ZCODE"< / span > < span class = "plain-syntax" > )) ||< / span >
< span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Str::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > symbol_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > I< / span > < span class = "string-syntax" > "INDIV_PROP_START"< / span > < span class = "plain-syntax" > )) ||< / span >
< span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Str::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > symbol_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > I< / span > < span class = "string-syntax" > "TARGET_GLULX"< / span > < span class = "plain-syntax" > )) ||< / span >
< span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Str::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > symbol_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > I< / span > < span class = "string-syntax" > "DICT_WORD_SIZE"< / span > < span class = "plain-syntax" > )) ||< / span >
< span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Str::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > symbol_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > I< / span > < span class = "string-syntax" > "DEBUG"< / span > < span class = "plain-syntax" > )) ||< / span >
< span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Str::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > symbol_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > I< / span > < span class = "string-syntax" > "cap_short_name"< / span > < span class = "plain-syntax" > )))< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > ifndef_me< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > TRUE< / 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" > Inter::Symbols::read_annotation< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > OBJECT_IANN< / span > < span class = "plain-syntax" > ) > < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > ) < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Str::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > symbol_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > I< / span > < span class = "string-syntax" > "Release"< / span > < span class = "plain-syntax" > )) {< / span >
2020-07-01 02:58:55 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_ti< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > DATA_CONST_IFLD< / span > < span class = "plain-syntax" > ];< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_ti< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > val2< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > DATA_CONST_IFLD< / span > < span class = "plain-syntax" > + < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > ];< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "Release "< / span > < span class = "plain-syntax" > );< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-cal.html#SP2" class = "function-link" > < span class = "function-syntax" > CodeGen::CL::literal< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > Inter::Packages::scope_of< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > val2< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > ";\n"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Str::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > symbol_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > I< / span > < span class = "string-syntax" > "Story"< / span > < span class = "plain-syntax" > )) {< / span >
2020-07-01 02:58:55 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_ti< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > DATA_CONST_IFLD< / span > < span class = "plain-syntax" > ];< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_ti< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > val2< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > DATA_CONST_IFLD< / span > < span class = "plain-syntax" > + < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > ];< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "Global Story = "< / span > < span class = "plain-syntax" > );< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-cal.html#SP2" class = "function-link" > < span class = "function-syntax" > CodeGen::CL::literal< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > Inter::Packages::scope_of< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > val2< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > ";\n"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Str::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > symbol_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > I< / span > < span class = "string-syntax" > "Serial"< / span > < span class = "plain-syntax" > )) {< / span >
2020-07-01 02:58:55 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_ti< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > DATA_CONST_IFLD< / span > < span class = "plain-syntax" > ];< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_ti< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > val2< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > DATA_CONST_IFLD< / span > < span class = "plain-syntax" > + < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > ];< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "Serial "< / span > < span class = "plain-syntax" > );< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-cal.html#SP2" class = "function-link" > < span class = "function-syntax" > CodeGen::CL::literal< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > Inter::Packages::scope_of< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > val2< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > ";\n"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Str::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > symbol_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > I< / span > < span class = "string-syntax" > "UUID_ARRAY"< / span > < span class = "plain-syntax" > )) {< / span >
2020-07-01 02:58:55 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_ti< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > ID< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > DATA_CONST_IFLD< / span > < span class = "plain-syntax" > ];< / span >
2020-05-11 17:21:29 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > S< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Inode::ID_to_text< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > ID< / span > < span class = "plain-syntax" > );< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-ft.html#SP18" class = "function-link" > < span class = "function-syntax" > CodeGen::Targets::begin_array< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > I< / span > < span class = "string-syntax" > "UUID_ARRAY"< / span > < span class = "plain-syntax" > , < / span > < span class = "constant-syntax" > BYTE_ARRAY_FORMAT< / span > < span class = "plain-syntax" > );< / span >
2021-08-01 01:44:47 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > TEMPORARY_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > content< / 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" > content< / span > < span class = "plain-syntax" > , < / span > < span class = "string-syntax" > "UUID:< / span > < span class = "comment-syntax" > ");< / span >
< span class = "string-syntax" > for (int i=0, L=Str::len(S); i< L; i++) WRITE_TO(content, "< / span > < span class = "plain-syntax" > %< / span > < span class = "identifier-syntax" > c< / span > < span class = "string-syntax" > ", Characters::toupper(Str::get_at(S, i)));< / span >
< span class = "string-syntax" > WRITE_TO(content, "< / span > < span class = "plain-syntax" > //< / span > < span class = "string-syntax" > ");< / span >
2021-08-01 11:59:30 +03:00
< span class = "string-syntax" > TEMPORARY_TEXT(length)< / span >
< span class = "string-syntax" > WRITE_TO(length, "< / span > < span class = "plain-syntax" > %< / span > < span class = "identifier-syntax" > d< / span > < span class = "string-syntax" > ", (int) Str::len(content));< / span >
< span class = "string-syntax" > CodeGen::Targets::array_entry(gen, length, BYTE_ARRAY_FORMAT);< / span >
< span class = "string-syntax" > DISCARD_TEXT(length)< / span >
2021-08-01 01:44:47 +03:00
< span class = "string-syntax" > LOOP_THROUGH_TEXT(pos, content) {< / span >
< span class = "string-syntax" > TEMPORARY_TEXT(ch)< / span >
2021-08-01 11:59:30 +03:00
< span class = "string-syntax" > WRITE_TO(ch, "< / span > < span class = "character-syntax" > '%c'< / span > < span class = "string-syntax" > ", Str::get(pos));< / span >
< span class = "string-syntax" > CodeGen::Targets::array_entry(gen, ch, BYTE_ARRAY_FORMAT);< / span >
2021-08-01 01:44:47 +03:00
< span class = "string-syntax" > DISCARD_TEXT(ch)< / span >
< span class = "string-syntax" > }< / span >
< span class = "string-syntax" > DISCARD_TEXT(content)< / span >
2021-08-01 11:59:30 +03:00
< span class = "string-syntax" > CodeGen::Targets::end_array(gen, BYTE_ARRAY_FORMAT);< / span >
2021-08-01 01:44:47 +03:00
< span class = "string-syntax" > return;< / span >
< span class = "string-syntax" > }< / span >
2020-05-03 03:01:21 +03:00
2021-08-01 01:44:47 +03:00
< span class = "string-syntax" > if (Inter::Constant::is_routine(con_name)) {< / span >
< span class = "string-syntax" > inter_package *code_block = Inter::Constant::code_block(con_name);< / span >
2021-08-06 21:48:18 +03:00
< span class = "string-syntax" > CodeGen::Targets::begin_function(2, gen, con_name);< / span >
2021-08-01 01:44:47 +03:00
< span class = "string-syntax" > void_level = Inter::Defn::get_level(P) + 2;< / span >
< span class = "string-syntax" > inter_tree_node *D = Inter::Packages::definition(code_block);< / span >
< span class = "string-syntax" > CodeGen::FC::frame(gen, D);< / span >
2021-08-07 17:44:01 +03:00
< span class = "string-syntax" > CodeGen::Targets::end_function(2, gen, con_name);< / span >
2021-08-01 01:44:47 +03:00
< span class = "string-syntax" > return;< / span >
< span class = "string-syntax" > }< / span >
< span class = "string-syntax" > switch (P-> W.data[FORMAT_CONST_IFLD]) {< / span >
< span class = "string-syntax" > case CONSTANT_INDIRECT_TEXT: {< / span >
< span class = "string-syntax" > inter_ti ID = P-> W.data[DATA_CONST_IFLD];< / span >
< span class = "string-syntax" > text_stream *S = Inode::ID_to_text(P, ID);< / span >
2021-08-07 17:44:01 +03:00
< span class = "string-syntax" > CodeGen::Targets::begin_constant(gen, CodeGen::CL::name(con_name), TRUE, FALSE);< / span >
2021-08-01 01:44:47 +03:00
< span class = "string-syntax" > WRITE("< / span > < span class = "plain-syntax" > \< / span > < span class = "string-syntax" > "%S\""< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > S< / span > < span class = "plain-syntax" > );< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-ft.html#SP14" class = "function-link" > < span class = "function-syntax" > CodeGen::Targets::end_constant< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < a href = "2-cal.html#SP2" class = "function-link" > < span class = "function-syntax" > CodeGen::CL::name< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > break< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > case< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > CONSTANT_INDIRECT_LIST:< / span > < span class = "plain-syntax" > {< / span >
2021-08-01 01:44:47 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > format< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > WORD_ARRAY_FORMAT< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > hang_one< / 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" > do_not_bracket< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > unsub< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > X< / span > < span class = "plain-syntax" > = (< / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > extent< / span > < span class = "plain-syntax" > - < / span > < span class = "identifier-syntax" > DATA_CONST_IFLD< / span > < span class = "plain-syntax" > )/2;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > X< / span > < span class = "plain-syntax" > == < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > do_not_bracket< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > TRUE< / span > < span class = "plain-syntax" > ;< / span >
2021-08-01 01:44:47 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Inter::Symbols::read_annotation< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > BYTEARRAY_IANN< / span > < span class = "plain-syntax" > ) == < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > format< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > BYTE_ARRAY_FORMAT< / span > < span class = "plain-syntax" > ;< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Inter::Symbols::read_annotation< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > TABLEARRAY_IANN< / span > < span class = "plain-syntax" > ) == < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > ) {< / span >
2021-08-01 01:44:47 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > format< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > TABLE_ARRAY_FORMAT< / 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" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > extent< / span > < span class = "plain-syntax" > - < / span > < span class = "identifier-syntax" > DATA_CONST_IFLD< / span > < span class = "plain-syntax" > == < / span > < span class = "constant-syntax" > 2< / span > < span class = "plain-syntax" > ) { < / span > < span class = "identifier-syntax" > format< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > WORD_ARRAY_FORMAT< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > hang_one< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > TRUE< / span > < span class = "plain-syntax" > ; }< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > }< / span >
2021-08-01 11:59:30 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Inter::Symbols::read_annotation< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > BUFFERARRAY_IANN< / span > < span class = "plain-syntax" > ) == < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > format< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > BUFFER_ARRAY_FORMAT< / span > < span class = "plain-syntax" > ;< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Inter::Symbols::read_annotation< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > VERBARRAY_IANN< / span > < span class = "plain-syntax" > ) == < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "Verb "< / span > < span class = "plain-syntax" > ); < / span > < span class = "identifier-syntax" > do_not_bracket< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > TRUE< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > unsub< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > TRUE< / 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" > Inter::Symbols::read_annotation< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > METAVERB_IANN< / span > < span class = "plain-syntax" > ) == < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "meta "< / span > < span class = "plain-syntax" > );< / span >
2021-08-01 01:44:47 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > for< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > =< / span > < span class = "identifier-syntax" > DATA_CONST_IFLD< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > i< / span > < span class = "function-syntax" > < P-> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > extent< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > =< / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > +2) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > " "< / span > < span class = "plain-syntax" > );< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-cal.html#SP2" class = "function-link" > < span class = "function-syntax" > CodeGen::CL::literal< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > Inter::Packages::scope_of< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > ], < / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > +1], < / span > < span class = "identifier-syntax" > unsub< / span > < span class = "plain-syntax" > );< / span >
2021-08-01 01:44:47 +03:00
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > ";"< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > {< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-ft.html#SP18" class = "function-link" > < span class = "function-syntax" > CodeGen::Targets::begin_array< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < a href = "2-cal.html#SP2" class = "function-link" > < span class = "function-syntax" > CodeGen::CL::name< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > format< / 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" > hang_one< / span > < span class = "plain-syntax" > ) < / span > < a href = "2-ft.html#SP18" class = "function-link" > < span class = "function-syntax" > CodeGen::Targets::array_entry< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > I< / span > < span class = "string-syntax" > "1"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > format< / span > < span class = "plain-syntax" > );< / span >
2021-08-01 01:44:47 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > for< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > =< / span > < span class = "identifier-syntax" > DATA_CONST_IFLD< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > i< / span > < span class = "function-syntax" > < P-> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > extent< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > =< / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > +2) {< / 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" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > ] != < / span > < span class = "identifier-syntax" > DIVIDER_IVAL< / 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" > entry< / span > < span class = "plain-syntax" > )< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-cg.html#SP6" class = "function-link" > < span class = "function-syntax" > CodeGen::select_temporary< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > entry< / span > < span class = "plain-syntax" > );< / span >
2021-08-01 01:44:47 +03:00
< span class = "plain-syntax" > < / span > < span class = "comment-syntax" > if ((do_not_bracket == FALSE) & & (P-> W.data[i] != DIVIDER_IVAL)) WRITE("(");< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-cal.html#SP2" class = "function-link" > < span class = "function-syntax" > CodeGen::CL::literal< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > Inter::Packages::scope_of< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > ], < / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > +1], < / span > < span class = "identifier-syntax" > unsub< / span > < span class = "plain-syntax" > );< / span >
2021-08-01 01:44:47 +03:00
< span class = "plain-syntax" > < / span > < span class = "comment-syntax" > if ((do_not_bracket == FALSE) & & (P-> W.data[i] != DIVIDER_IVAL)) WRITE(")");< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-cg.html#SP6" class = "function-link" > < span class = "function-syntax" > CodeGen::deselect_temporary< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ft.html#SP18" class = "function-link" > < span class = "function-syntax" > CodeGen::Targets::array_entry< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > entry< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > format< / span > < span class = "plain-syntax" > );< / span >
2021-08-01 01:44:47 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > DISCARD_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > entry< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-ft.html#SP18" class = "function-link" > < span class = "function-syntax" > CodeGen::Targets::end_array< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > format< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > }< / span >
2021-08-01 01:44:47 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "\n"< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > break< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > case< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > CONSTANT_SUM_LIST:< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > case< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > CONSTANT_PRODUCT_LIST:< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > case< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > CONSTANT_DIFFERENCE_LIST:< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > case< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > CONSTANT_QUOTIENT_LIST:< / span > < span class = "plain-syntax" > {< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > depth< / span > < span class = "plain-syntax" > = < / span > < a href = "2-cal.html#SP2" class = "function-link" > < span class = "function-syntax" > CodeGen::CL::constant_depth< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > depth< / span > < span class = "plain-syntax" > > < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > LOGIF< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > CONSTANT_DEPTH_CALCULATION< / span > < span class = "plain-syntax" > ,< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "Con %S has depth %d\n"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > symbol_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > depth< / span > < span class = "plain-syntax" > );< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-cal.html#SP2" class = "function-link" > < span class = "function-syntax" > CodeGen::CL::constant_depth< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > }< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > generated_segment< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > saved< / span > < span class = "plain-syntax" > = < / span > < a href = "2-cg.html#SP5" class = "function-link" > < span class = "function-syntax" > CodeGen::select< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < a href = "2-ft.html#SP4" class = "function-link" > < span class = "function-syntax" > CodeGen::Targets::basic_constant_segment< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > depth< / 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" > OUT< / span > < span class = "plain-syntax" > = < / span > < a href = "2-cg.html#SP7" class = "function-link" > < span class = "function-syntax" > CodeGen::current< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ft.html#SP14" class = "function-link" > < span class = "function-syntax" > CodeGen::Targets::begin_constant< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < a href = "2-cal.html#SP2" class = "function-link" > < span class = "function-syntax" > CodeGen::CL::name< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > TRUE< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > );< / span >
2020-05-09 15:07:39 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > for< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > =< / span > < span class = "identifier-syntax" > DATA_CONST_IFLD< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > i< / span > < span class = "function-syntax" > < P-> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > extent< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > =< / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > +2) {< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > > < / span > < span class = "identifier-syntax" > DATA_CONST_IFLD< / 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" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > FORMAT_CONST_IFLD< / span > < span class = "plain-syntax" > ] == < / span > < span class = "identifier-syntax" > CONSTANT_SUM_LIST< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-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" > P< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > FORMAT_CONST_IFLD< / span > < span class = "plain-syntax" > ] == < / span > < span class = "identifier-syntax" > CONSTANT_PRODUCT_LIST< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-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" > P< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > FORMAT_CONST_IFLD< / span > < span class = "plain-syntax" > ] == < / span > < span class = "identifier-syntax" > CONSTANT_DIFFERENCE_LIST< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-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" > P< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > FORMAT_CONST_IFLD< / span > < span class = "plain-syntax" > ] == < / span > < span class = "identifier-syntax" > CONSTANT_QUOTIENT_LIST< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > " / "< / span > < span class = "plain-syntax" > );< / 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" > bracket< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > TRUE< / 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" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > ] == < / span > < span class = "identifier-syntax" > LITERAL_IVAL< / span > < span class = "plain-syntax" > ) || (< / span > < span class = "identifier-syntax" > Inter::Symbols::is_stored_in_data< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > ], < / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > +1]))) < / span > < span class = "identifier-syntax" > bracket< / 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" > bracket< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "("< / span > < span class = "plain-syntax" > );< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-cal.html#SP2" class = "function-link" > < span class = "function-syntax" > CodeGen::CL::literal< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > Inter::Packages::scope_of< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > ], < / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > +1], < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > bracket< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > ")"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-ft.html#SP14" class = "function-link" > < span class = "function-syntax" > CodeGen::Targets::end_constant< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < a href = "2-cal.html#SP2" class = "function-link" > < span class = "function-syntax" > CodeGen::CL::name< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-cg.html#SP5" class = "function-link" > < span class = "function-syntax" > CodeGen::deselect< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > saved< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > break< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > case< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > CONSTANT_DIRECT:< / span > < span class = "plain-syntax" > {< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > depth< / span > < span class = "plain-syntax" > = < / span > < a href = "2-cal.html#SP2" class = "function-link" > < span class = "function-syntax" > CodeGen::CL::constant_depth< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > depth< / span > < span class = "plain-syntax" > > < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > LOGIF< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > CONSTANT_DEPTH_CALCULATION< / span > < span class = "plain-syntax" > ,< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "Con %S has depth %d\n"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > symbol_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > depth< / span > < span class = "plain-syntax" > );< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > generated_segment< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > saved< / span > < span class = "plain-syntax" > = < / span > < a href = "2-cg.html#SP5" class = "function-link" > < span class = "function-syntax" > CodeGen::select< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < a href = "2-ft.html#SP4" class = "function-link" > < span class = "function-syntax" > CodeGen::Targets::basic_constant_segment< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > depth< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ft.html#SP14" class = "function-link" > < span class = "function-syntax" > CodeGen::Targets::begin_constant< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < a href = "2-cal.html#SP2" class = "function-link" > < span class = "function-syntax" > CodeGen::CL::name< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > TRUE< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > ifndef_me< / span > < span class = "plain-syntax" > );< / span >
2020-07-01 02:58:55 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_ti< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > DATA_CONST_IFLD< / span > < span class = "plain-syntax" > ];< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_ti< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > val2< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > DATA_CONST_IFLD< / span > < span class = "plain-syntax" > + < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > ];< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-cal.html#SP2" class = "function-link" > < span class = "function-syntax" > CodeGen::CL::literal< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > Inter::Packages::scope_of< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > val2< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-ft.html#SP14" class = "function-link" > < span class = "function-syntax" > CodeGen::Targets::end_constant< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < a href = "2-cal.html#SP2" class = "function-link" > < span class = "function-syntax" > CodeGen::CL::name< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > ifndef_me< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-cg.html#SP5" class = "function-link" > < span class = "function-syntax" > CodeGen::deselect< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > saved< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > break< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "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" > "ungenerated constant format"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
< span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CodeGen::CL::constant_depth< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > inter_symbol< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > con< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > LOG_INDENT< / span > < span class = "plain-syntax" > ;< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > d< / span > < span class = "plain-syntax" > = < / span > < a href = "2-cal.html#SP2" class = "function-link" > < span class = "function-syntax" > CodeGen::CL::constant_depth_inner< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > LOGIF< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > CONSTANT_DEPTH_CALCULATION< / span > < span class = "plain-syntax" > , < / span > < span class = "string-syntax" > "%S has depth %d\n"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > con< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > symbol_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > d< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > LOG_OUTDENT< / 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" > d< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CodeGen::CL::constant_depth_inner< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > inter_symbol< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > con< / 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" > con< / 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 = "constant-syntax" > 1< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_tree_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > D< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Inter::Symbols::definition< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > con< / 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" > D< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > ID_IFLD< / span > < span class = "plain-syntax" > ] != < / span > < span class = "identifier-syntax" > CONSTANT_IST< / span > < span class = "plain-syntax" > ) < / span > < span class = "reserved-syntax" > return< / 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" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > D< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > FORMAT_CONST_IFLD< / span > < span class = "plain-syntax" > ] == < / span > < span class = "identifier-syntax" > CONSTANT_DIRECT< / span > < span class = "plain-syntax" > ) {< / span >
2020-07-01 02:58:55 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_ti< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > D< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > DATA_CONST_IFLD< / span > < span class = "plain-syntax" > ];< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_ti< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > val2< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > D< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > DATA_CONST_IFLD< / span > < span class = "plain-syntax" > + < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > ];< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > ALIAS_IVAL< / 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" > alias< / span > < span class = "plain-syntax" > =< / span >
2021-04-15 00:57:48 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > InterSymbolsTables::symbol_from_data_pair_and_table< / span > < span class = "plain-syntax" > (< / span >
2021-06-27 18:04:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > val2< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > Inter::Packages::scope< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > D< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > package< / span > < span class = "plain-syntax" > ));< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < a href = "2-cal.html#SP2" class = "function-link" > < span class = "function-syntax" > CodeGen::CL::constant_depth< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > alias< / span > < span class = "plain-syntax" > ) + < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > ;< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "constant-syntax" > 1< / 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" > D< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > FORMAT_CONST_IFLD< / span > < span class = "plain-syntax" > ] == < / span > < span class = "identifier-syntax" > CONSTANT_SUM_LIST< / span > < span class = "plain-syntax" > ) ||< / span >
< span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > D< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > FORMAT_CONST_IFLD< / span > < span class = "plain-syntax" > ] == < / span > < span class = "identifier-syntax" > CONSTANT_PRODUCT_LIST< / span > < span class = "plain-syntax" > ) ||< / span >
< span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > D< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > FORMAT_CONST_IFLD< / span > < span class = "plain-syntax" > ] == < / span > < span class = "identifier-syntax" > CONSTANT_DIFFERENCE_LIST< / span > < span class = "plain-syntax" > ) ||< / span >
< span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > D< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > FORMAT_CONST_IFLD< / span > < span class = "plain-syntax" > ] == < / span > < span class = "identifier-syntax" > CONSTANT_QUOTIENT_LIST< / 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" > total< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > ;< / span >
2020-05-09 15:07:39 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > for< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > =< / span > < span class = "identifier-syntax" > DATA_CONST_IFLD< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > i< / span > < span class = "function-syntax" > < D-> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > extent< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > =< / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > +2) {< / span >
2020-07-01 02:58:55 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_ti< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > D< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / 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" > inter_ti< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > val2< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > D< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > data< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > + < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > ];< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > ALIAS_IVAL< / 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" > alias< / span > < span class = "plain-syntax" > =< / span >
2021-04-15 00:57:48 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > InterSymbolsTables::symbol_from_data_pair_and_table< / span > < span class = "plain-syntax" > (< / span >
2021-06-27 18:04:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > val2< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > Inter::Packages::scope< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > D< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > package< / span > < span class = "plain-syntax" > ));< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > total< / span > < span class = "plain-syntax" > += < / span > < a href = "2-cal.html#SP2" class = "function-link" > < span class = "function-syntax" > CodeGen::CL::constant_depth< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > alias< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > total< / span > < span class = "plain-syntax" > ++;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > + < / span > < span class = "identifier-syntax" > total< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "reserved-syntax" > typedef< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_literal_holder< / span > < span class = "plain-syntax" > {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > definition_code< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > literal_content< / span > < span class = "plain-syntax" > ;< / span >
2020-05-09 15:07:39 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > CLASS_DEFINITION< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > text_literal_holder< / span > < span class = "plain-syntax" > ;< / span >
2021-08-10 13:01:03 +03:00
< span class = "identifier-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "function-syntax" > CodeGen::CL::literal_text_at< / 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" > CodeGen::CL::literal_text_at< / span > < / span > :< br / > Frame Control - < a href = "2-fc.html#SP1" > § 1< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > code_generation< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > S< / span > < span class = "plain-syntax" > ) {< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_literal_holder< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > tlh< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > CREATE< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > text_literal_holder< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > tlh< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > definition_code< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Str::new< / span > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > tlh< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > literal_content< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > S< / 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" > tlh< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > definition_code< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CodeGen::CL::compare_tlh< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > const< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > elem1< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > const< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > elem2< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > const< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_literal_holder< / span > < span class = "plain-syntax" > **< / span > < span class = "identifier-syntax" > e1< / span > < span class = "plain-syntax" > = (< / span > < span class = "reserved-syntax" > const< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_literal_holder< / span > < span class = "plain-syntax" > **) < / span > < span class = "identifier-syntax" > elem1< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > const< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_literal_holder< / span > < span class = "plain-syntax" > **< / span > < span class = "identifier-syntax" > e2< / span > < span class = "plain-syntax" > = (< / span > < span class = "reserved-syntax" > const< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_literal_holder< / span > < span class = "plain-syntax" > **) < / span > < span class = "identifier-syntax" > elem2< / 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" > e1< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ) || (*< / span > < span class = "identifier-syntax" > e2< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > NULL< / 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" > "Disaster while sorting text literals"< / 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" > s1< / span > < span class = "plain-syntax" > = (*< / span > < span class = "identifier-syntax" > e1< / span > < span class = "plain-syntax" > )-> < / span > < span class = "element-syntax" > literal_content< / 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" > s2< / span > < span class = "plain-syntax" > = (*< / span > < span class = "identifier-syntax" > e2< / span > < span class = "plain-syntax" > )-> < / span > < span class = "element-syntax" > literal_content< / 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" > Str::cmp< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > s1< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > s2< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
2021-08-10 13:01:03 +03:00
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CodeGen::CL::sort_literals< / span > < button class = "popup" onclick = "togglePopup('usagePopup5')" > < span class = "comment-syntax" > ?< / span > < span class = "popuptext" id = "usagePopup5" > Usage of < span class = "code-font" > < span class = "function-syntax" > CodeGen::CL::sort_literals< / span > < / span > :< br / > Code Generation - < a href = "2-cg.html#SP8_3" > § 8.3< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > code_generation< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > ) {< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > no_tlh< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > NUMBER_CREATED< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > text_literal_holder< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_literal_holder< / span > < span class = "plain-syntax" > **< / span > < span class = "identifier-syntax" > sorted< / span > < span class = "plain-syntax" > = (< / span > < span class = "reserved-syntax" > text_literal_holder< / span > < span class = "plain-syntax" > **)< / span >
< span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Memory::calloc< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > no_tlh< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > sizeof< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > text_literal_holder< / span > < span class = "plain-syntax" > *), < / span > < span class = "constant-syntax" > CODE_GENERATION_MREASON< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_literal_holder< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > tlh< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > LOOP_OVER< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > tlh< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > text_literal_holder< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > sorted< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > ++] = < / span > < span class = "identifier-syntax" > tlh< / span > < span class = "plain-syntax" > ;< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > qsort< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > sorted< / span > < span class = "plain-syntax" > , (< / span > < span class = "identifier-syntax" > size_t< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > no_tlh< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > sizeof< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > text_literal_holder< / span > < span class = "plain-syntax" > *), < / span > < a href = "2-cal.html#SP2" class = "function-link" > < span class = "function-syntax" > CodeGen::CL::compare_tlh< / span > < / a > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > for< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > =0; < / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > < < / span > < span class = "identifier-syntax" > no_tlh< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > ++) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_literal_holder< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > tlh< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > sorted< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > ];< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > generated_segment< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > saved< / span > < span class = "plain-syntax" > = < / span > < a href = "2-cg.html#SP5" class = "function-link" > < span class = "function-syntax" > CodeGen::select< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < a href = "2-ft.html#SP4" class = "function-link" > < span class = "function-syntax" > CodeGen::Targets::tl_segment< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / 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" > TO< / span > < span class = "plain-syntax" > = < / span > < a href = "2-cg.html#SP7" class = "function-link" > < span class = "function-syntax" > CodeGen::current< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE_TO< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > TO< / span > < span class = "plain-syntax" > , < / span > < span class = "string-syntax" > "%S"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > tlh< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > definition_code< / span > < span class = "plain-syntax" > );< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-cg.html#SP5" class = "function-link" > < span class = "function-syntax" > CodeGen::deselect< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > saved< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
2021-08-10 13:01:03 +03:00
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CodeGen::CL::enter_box_mode< / span > < button class = "popup" onclick = "togglePopup('usagePopup6')" > < span class = "comment-syntax" > ?< / span > < span class = "popuptext" id = "usagePopup6" > Usage of < span class = "code-font" > < span class = "function-syntax" > CodeGen::CL::enter_box_mode< / span > < / span > :< br / > Frame Control - < a href = "2-fc.html#SP3" > § 3< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > ) {< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > box_mode< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > TRUE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2021-08-10 13:01:03 +03:00
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CodeGen::CL::exit_box_mode< / span > < button class = "popup" onclick = "togglePopup('usagePopup7')" > < span class = "comment-syntax" > ?< / span > < span class = "popuptext" id = "usagePopup7" > Usage of < span class = "code-font" > < span class = "function-syntax" > CodeGen::CL::exit_box_mode< / span > < / span > :< br / > Frame Control - < a href = "2-fc.html#SP3" > § 3< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > ) {< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > box_mode< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2021-08-10 13:01:03 +03:00
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CodeGen::CL::enter_print_mode< / span > < button class = "popup" onclick = "togglePopup('usagePopup8')" > < span class = "comment-syntax" > ?< / span > < span class = "popuptext" id = "usagePopup8" > Usage of < span class = "code-font" > < span class = "function-syntax" > CodeGen::CL::enter_print_mode< / span > < / span > :< br / > Frame Control - < a href = "2-fc.html#SP3" > § 3< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > ) {< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > printing_mode< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > TRUE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2021-08-10 13:01:03 +03:00
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CodeGen::CL::exit_print_mode< / span > < button class = "popup" onclick = "togglePopup('usagePopup9')" > < span class = "comment-syntax" > ?< / span > < span class = "popuptext" id = "usagePopup9" > Usage of < span class = "code-font" > < span class = "function-syntax" > CodeGen::CL::exit_print_mode< / span > < / span > :< br / > Frame Control - < a href = "2-fc.html#SP3" > § 3< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > ) {< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > printing_mode< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2021-08-12 01:49:36 +03:00
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CodeGen::CL::literal< / span > < button class = "popup" onclick = "togglePopup('usagePopup10')" > < span class = "comment-syntax" > ?< / span > < span class = "popuptext" id = "usagePopup10" > Usage of < span class = "code-font" > < span class = "function-syntax" > CodeGen::CL::literal< / span > < / span > :< br / > Frame Control - < a href = "2-fc.html#SP2" > § 2< / a > < br / > Instances and Properties - < a href = "2-iap.html#SP5_8_5_1_1" > § 5.8.5.1.1< / a > , < a href = "2-iap.html#SP8" > § 8< / a > < br / > Generating Inform 6 - < a href = "4-fi6.html#SP8" > § 8< / a > < br / > C Implementation - < a href = "5-cim.html#SP7" > § 7< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > code_generation< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > inter_symbol< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > inter_symbols_table< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > T< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > inter_ti< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > inter_ti< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > val2< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > unsub< / span > < span class = "plain-syntax" > ) {< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_tree< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > I< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > from< / span > < span class = "plain-syntax" > ;< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > OUT< / span > < span class = "plain-syntax" > = < / span > < a href = "2-cg.html#SP7" class = "function-link" > < span class = "function-syntax" > CodeGen::current< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > LITERAL_IVAL< / 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" > hex< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
2021-08-01 01:44:47 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > ) & & (< / span > < span class = "identifier-syntax" > Inter::Annotations::find< / span > < span class = "plain-syntax" > (& (< / span > < span class = "identifier-syntax" > con_name< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > ann_set< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > HEX_IANN< / span > < span class = "plain-syntax" > ))) < / span > < span class = "identifier-syntax" > hex< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > TRUE< / span > < span class = "plain-syntax" > ;< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-ft.html#SP8" class = "function-link" > < span class = "function-syntax" > CodeGen::Targets::compile_literal_number< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > val2< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > hex< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Inter::Symbols::is_stored_in_data< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > val2< / span > < span class = "plain-syntax" > )) {< / span >
2021-04-15 00:57:48 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_symbol< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > aliased< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > InterSymbolsTables::symbol_from_data_pair_and_table< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > val2< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > T< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > aliased< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > internal_error< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "bad aliased symbol"< / 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" > aliased< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > verb_directive_divider_symbol< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "\n\t*"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > aliased< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > verb_directive_reverse_symbol< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "reverse"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > aliased< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > verb_directive_slash_symbol< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "/"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > aliased< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > verb_directive_result_symbol< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "-> "< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > aliased< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > verb_directive_special_symbol< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "special"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > aliased< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > verb_directive_number_symbol< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "number"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > aliased< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > verb_directive_noun_symbol< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "noun"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > aliased< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > verb_directive_multi_symbol< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "multi"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > aliased< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > verb_directive_multiinside_symbol< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "multiinside"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > aliased< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > verb_directive_multiheld_symbol< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "multiheld"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > aliased< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > verb_directive_held_symbol< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "held"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > aliased< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > verb_directive_creature_symbol< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "creature"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > aliased< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > verb_directive_topic_symbol< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "topic"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > aliased< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > verb_directive_multiexcept_symbol< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "multiexcept"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > unsub< / span > < span class = "plain-syntax" > ) & & (< / span > < span class = "identifier-syntax" > Inter::Symbols::read_annotation< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > aliased< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > SCOPE_FILTER_IANN< / span > < span class = "plain-syntax" > ) == < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > ))< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "scope="< / 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" > unsub< / span > < span class = "plain-syntax" > ) & & (< / span > < span class = "identifier-syntax" > Inter::Symbols::read_annotation< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > aliased< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > NOUN_FILTER_IANN< / span > < span class = "plain-syntax" > ) == < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > ))< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "noun="< / span > < span class = "plain-syntax" > );< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > S< / span > < span class = "plain-syntax" > = < / span > < a href = "2-cal.html#SP2" class = "function-link" > < span class = "function-syntax" > CodeGen::CL::name< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > aliased< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > unsub< / span > < span class = "plain-syntax" > ) & & (< / span > < span class = "identifier-syntax" > Str::begins_with_wide_string< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > S< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > L< / span > < span class = "string-syntax" > "##"< / span > < span class = "plain-syntax" > ))) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > LOOP_THROUGH_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pos< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > S< / 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" > pos< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > index< / span > < span class = "plain-syntax" > > = < / span > < span class = "constant-syntax" > 2< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > PUT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Str::get< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pos< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > {< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-ft.html#SP5" class = "function-link" > < span class = "function-syntax" > CodeGen::Targets::mangle< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > OUT< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > S< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > DIVIDER_IVAL< / span > < span class = "plain-syntax" > ) {< / span >
2021-04-16 00:42:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > divider_text< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Inter::Warehouse::get_text< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > InterTree::warehouse< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > I< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > val2< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > " ! %S\n\t"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > divider_text< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > REAL_IVAL< / span > < span class = "plain-syntax" > ) {< / span >
2021-04-16 00:42:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > glob_text< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Inter::Warehouse::get_text< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > InterTree::warehouse< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > I< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > val2< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "$%S"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > glob_text< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > DWORD_IVAL< / span > < span class = "plain-syntax" > ) {< / span >
2021-04-16 00:42:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > glob_text< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Inter::Warehouse::get_text< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > InterTree::warehouse< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > I< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > val2< / span > < span class = "plain-syntax" > );< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-ft.html#SP7" class = "function-link" > < span class = "function-syntax" > CodeGen::Targets::compile_dictionary_word< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > glob_text< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > PDWORD_IVAL< / span > < span class = "plain-syntax" > ) {< / span >
2021-04-16 00:42:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > glob_text< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Inter::Warehouse::get_text< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > InterTree::warehouse< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > I< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > val2< / span > < span class = "plain-syntax" > );< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-ft.html#SP7" class = "function-link" > < span class = "function-syntax" > CodeGen::Targets::compile_dictionary_word< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > glob_text< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > TRUE< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > LITERAL_TEXT_IVAL< / span > < span class = "plain-syntax" > ) {< / span >
2021-04-16 00:42:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > glob_text< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Inter::Warehouse::get_text< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > InterTree::warehouse< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > I< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > val2< / span > < span class = "plain-syntax" > );< / span >
2021-08-10 13:01:03 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-ft.html#SP9" class = "function-link" > < span class = "function-syntax" > CodeGen::Targets::compile_literal_text< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > gen< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > glob_text< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > printing_mode< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > box_mode< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > val1< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > GLOB_IVAL< / span > < span class = "plain-syntax" > ) {< / span >
2021-04-16 00:42:28 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > glob_text< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Inter::Warehouse::get_text< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > InterTree::warehouse< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > I< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > val2< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "%S"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > glob_text< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > internal_error< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "unimplemented direct constant"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
2021-08-12 01:49:36 +03:00
< span class = "identifier-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "function-syntax" > CodeGen::CL::name< / span > < button class = "popup" onclick = "togglePopup('usagePopup11')" > < span class = "comment-syntax" > ?< / span > < span class = "popuptext" id = "usagePopup11" > Usage of < span class = "code-font" > < span class = "function-syntax" > CodeGen::CL::name< / span > < / span > :< br / > Frame Control - < a href = "2-fc.html#SP2" > § 2< / a > < br / > Instances and Properties - < a href = "2-iap.html#SP4_5" > § 4.5< / a > , < a href = "2-iap.html#SP4_6" > § 4.6< / a > , < a href = "2-iap.html#SP5_5" > § 5.5< / a > , < a href = "2-iap.html#SP5_7" > § 5.7< / a > , < a href = "2-iap.html#SP5_8_4" > § 5.8.4< / a > , < a href = "2-iap.html#SP5_9" > § 5.9< / a > , < a href = "2-iap.html#SP5_11" > § 5.11< / a > , < a href = "2-iap.html#SP5_11_2" > § 5.11.2< / a > , < a href = "2-iap.html#SP5_11_2_1" > § 5.11.2.1< / a > , < a href = "2-iap.html#SP5_11_2_2" > § 5.11.2.2< / a > , < a href = "2-iap.html#SP6" > § 6< / a > , < a href = "2-iap.html#SP8" > § 8< / a > < br / > Generating Inform 6 - < a href = "4-fi6.html#SP7" > § 7< / a > , < a href = "4-fi6.html#SP8" > § 8< / a > < br / > C Implementation - < a href = "5-cim.html#SP7" > § 7< / a > < br / > C Object Model - < a href = "5-com.html#SP6" > § 6< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > inter_symbol< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > symb< / span > < span class = "plain-syntax" > ) {< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > symb< / 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" > NULL< / 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" > Inter::Symbols::get_translate< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > symb< / span > < span class = "plain-syntax" > )) < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Inter::Symbols::get_translate< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > symb< / 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" > symb< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > symbol_name< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2019-06-28 20:25:50 +03:00
< / pre >
2020-05-03 03:01:21 +03:00
< ul class = "endnotetexts" > < li > The structure text_literal_holder is private to this section.< / li > < / ul >
< nav role = "progress" > < div class = "progresscontainer" >
2021-08-10 13:01:03 +03:00
< ul class = "progressbar" > < li class = "progressprev" > < a href = "2-fc.html" > ❮ < / a > < / li > < li class = "progresschapter" > < a href = "1-fm.html" > 1< / a > < / li > < li class = "progresscurrentchapter" > 2< / li > < li class = "progresssection" > < a href = "2-cg.html" > cg< / a > < / li > < li class = "progresssection" > < a href = "2-fc.html" > fc< / a > < / li > < li class = "progresscurrent" > cal< / li > < li class = "progresssection" > < a href = "2-iap.html" > iap< / a > < / li > < li class = "progresssection" > < a href = "2-vrb.html" > vrb< / a > < / li > < li class = "progresssection" > < a href = "2-ft.html" > ft< / a > < / li > < li class = "progresschapter" > < a href = "3-fti.html" > 3< / a > < / li > < li class = "progresschapter" > < a href = "4-fi6.html" > 4< / a > < / li > < li class = "progresschapter" > < a href = "5-fnc.html" > 5< / a > < / li > < li class = "progressnext" > < a href = "2-iap.html" > ❯ < / a > < / li > < / ul > < / div >
2020-05-03 03:01:21 +03:00
< / nav > <!-- End of weave -->
2019-06-28 20:25:50 +03:00
2020-03-19 02:11:25 +02:00
< / main >
2019-06-28 20:25:50 +03:00
< / body >
< / html >