2020-04-10 15:23:50 +00:00
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
< html >
< head >
2020-04-11 22:43:27 +00:00
< title > Types and Functions< / title >
2020-04-20 22:26:08 +00:00
< link href = "../docs-assets/Breadcrumbs.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
2020-04-10 15:23:50 +00:00
< meta name = "viewport" content = "width=device-width initial-scale=1" >
< meta http-equiv = "Content-Type" content = "text/html; charset=utf-8" >
< meta http-equiv = "Content-Language" content = "en-gb" >
2020-04-20 22:26:08 +00:00
< link href = "../docs-assets/Base.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< script >
function togglePopup(material_id) {
var popup = document.getElementById(material_id);
popup.classList.toggle("show");
}
< / script >
< link href = "../docs-assets/Popups.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
2020-04-21 16:55:17 +00:00
< link href = "../docs-assets/Colours.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
2020-04-20 22:26:08 +00:00
2020-04-10 15:23:50 +00:00
< / head >
< body >
< nav role = "navigation" >
2020-04-13 16:06:45 +00:00
< h1 > < a href = "../index.html" >
2020-04-20 22:26:08 +00:00
< img src = "../docs-assets/Octagram.png" width = 72 height = 72" >
2020-04-13 16:06:45 +00:00
< / a > < / h1 >
< ul > < li > < a href = "index.html" > < span class = "selectedlink" > inweb< / span > < / a > < / li >
< / ul > < h2 > Foundation Module< / h2 > < ul >
< li > < a href = "../foundation-module/index.html" > foundation< / a > < / li >
2020-04-10 15:23:50 +00:00
< li > < a href = "../foundation-test/index.html" > foundation-test< / a > < / li >
2020-04-13 16:06:45 +00:00
< / ul > < h2 > Example Webs< / h2 > < ul >
2020-04-12 16:24:23 +00:00
< li > < a href = "../goldbach/index.html" > goldbach< / a > < / li >
< li > < a href = "../twinprimes/twinprimes.html" > twinprimes< / a > < / li >
2020-04-15 22:45:08 +00:00
< li > < a href = "../eastertide/index.html" > eastertide< / a > < / li >
2020-04-14 17:36:42 +00:00
< / ul > < h2 > Repository< / h2 > < ul >
2020-04-20 22:34:44 +00:00
< li > < a href = "https://github.com/ganelson/inweb" > < img src = "../docs-assets/github.png" height = 18 > github< / a > < / li >
2020-04-14 17:36:42 +00:00
< / ul > < h2 > Related Projects< / h2 > < ul >
< li > < a href = "../../../inform/docs/index.html" > inform< / a > < / li >
< li > < a href = "../../../intest/docs/index.html" > intest< / a > < / li >
2020-04-10 15:23:50 +00:00
2020-04-13 16:06:45 +00:00
< / ul >
2020-04-10 15:23:50 +00:00
< / nav >
< main role = "main" >
2020-04-16 22:51:03 +00:00
<!-- Weave of 'Types and Functions' generated by Inweb -->
2020-04-13 16:06:45 +00:00
< ul class = "crumbs" > < li > < a href = "../index.html" > Home< / a > < / li > < li > < a href = "index.html" > inweb< / a > < / li > < li > < a href = "index.html#4" > Chapter 4: Languages< / a > < / li > < li > < b > Types and Functions< / b > < / li > < / ul > < p class = "purpose" > Basic support for languages to recognise structure and function declarations.< / p >
2020-04-10 15:23:50 +00:00
2020-04-15 22:45:08 +00:00
< ul class = "toc" > < li > < a href = "4-taf.html#SP6" > § 6. Functions< / a > < / li > < li > < a href = "4-taf.html#SP8" > § 8. Cataloguing< / a > < / li > < / ul > < hr class = "tocbar" >
2020-04-10 15:23:50 +00:00
2020-04-22 22:57:09 +00:00
< p class = "inwebparagraph" > < a id = "SP1" > < / a > < b > § 1. < / b > For each < span class = "extract" > < span class = "extract-syntax" > typedef struct< / span > < / span > we find, we will make one of these:
2020-04-10 15:23:50 +00:00
< / p >
2020-04-21 16:55:17 +00:00
< pre class = "displayed-code all-displayed-code" >
< 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" > language_type< / span > < span class = "plain-syntax" > {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > structure_name< / 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" > tangled< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment" > whether the structure definition has been tangled out< / span >
2020-04-22 22:57:09 +00:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > source_line< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > structure_header_at< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment" > opening line of < / span > < span class = "extract" > < span class = "extract-syntax" > typedef< / span > < / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > source_line< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > typedef_ends< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment" > closing line, where < / span > < span class = "extract" > < span class = "extract-syntax" > }< / span > < / span > < span class = "comment" > appears< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > linked_list< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > incorporates< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment" > of < / span > < span class = "extract" > < span class = "extract-syntax" > language_type< / span > < / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > linked_list< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > elements< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment" > of < / span > < span class = "extract" > < span class = "extract-syntax" > structure_element< / span > < / span >
2020-04-21 16:55:17 +00:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > language_type< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > next_cst_alphabetically< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "constant-syntax" > MEMORY_MANAGEMENT< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > language_type< / span > < span class = "plain-syntax" > ;< / span >
< / pre > < ul class = "endnotetexts" > < li > The structure language_type is accessed in 3/tw, 4/as, 4/cl, 6/cln and here.< / li > < / ul > < p class = "inwebparagraph" > < a id = "SP2" > < / a > < b > § 2. < / b > < / p >
2020-04-10 15:23:50 +00:00
2020-04-21 16:55:17 +00:00
< pre class = "displayed-code all-displayed-code" >
< span class = "reserved-syntax" > language_type< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > first_cst_alphabetically< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ;< / span >
2020-04-20 22:26:08 +00:00
2020-04-21 16:55:17 +00:00
< span class = "reserved-syntax" > language_type< / span > < span class = "plain-syntax" > *< / span > < span class = "function-syntax" > Functions::new_struct< / span > < button class = "popup" onclick = "togglePopup('usagePopup1')" > ...< span class = "popuptext" id = "usagePopup1" > Usage of < b > Functions::new_struct< / b > :< br > C-Like Languages - < a href = "4-cl.html#SP2_1" > § 2.1< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > web< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > name< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > source_line< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > L< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > language_type< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > CREATE< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > language_type< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < < span class = "named-paragraph" > Initialise the language type structure< / span > < span class = "named-paragraph-number" > 2.1< / span > > < span class = "plain-syntax" > ;< / span >
2020-04-21 23:52:25 +00:00
< span class = "plain-syntax" > < / span > < a href = "3-ta.html#SP10" class = "function-link" > < span class = "function-syntax" > Analyser::mark_reserved_word_at_line< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > L< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > structure_name< / span > < span class = "plain-syntax" > , < / span > < span class = "constant-syntax" > RESERVED_COLOUR< / span > < span class = "plain-syntax" > );< / span >
2020-04-21 16:55:17 +00:00
< span class = "plain-syntax" > < / span > < < span class = "named-paragraph" > Add this to the lists for its web and its paragraph< / span > < span class = "named-paragraph-number" > 2.2< / span > > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < < span class = "named-paragraph" > Insertion-sort this into the alphabetical list of all structures found< / span > < span class = "named-paragraph-number" > 2.3< / 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< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< / pre > < p class = "inwebparagraph" > < a id = "SP2_1" > < / a > < b > § 2.1. < / b > < code class = "display" >
2020-04-20 22:26:08 +00:00
< < span class = "named-paragraph-defn" > Initialise the language type structure< / span > < span class = "named-paragraph-number" > 2.1< / span > > =
2020-04-10 15:23:50 +00:00
< / code > < / p >
2020-04-21 16:55:17 +00:00
< pre class = "displayed-code all-displayed-code" >
2020-04-21 23:52:25 +00:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > structure_name< / span > < span class = "plain-syntax" > = < / span > < a href = "../foundation-module/4-sm.html#SP3" class = "function-link" > < span class = "function-syntax" > Str::duplicate< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > name< / span > < span class = "plain-syntax" > );< / span >
2020-04-21 16:55:17 +00:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > structure_header_at< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > L< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > tangled< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > typedef_ends< / 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" > str< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > incorporates< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > NEW_LINKED_LIST< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > language_type< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > elements< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > NEW_LINKED_LIST< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > structure_element< / span > < span class = "plain-syntax" > );< / span >
< / pre > < ul class = "endnotetexts" > < li > This code is used in < a href = "4-taf.html#SP2" > § 2< / a > .< / li > < / ul > < p class = "inwebparagraph" > < a id = "SP2_2" > < / a > < b > § 2.2. < / b > < code class = "display" >
2020-04-20 22:26:08 +00:00
< < span class = "named-paragraph-defn" > Add this to the lists for its web and its paragraph< / span > < span class = "named-paragraph-number" > 2.2< / span > > =
2020-04-10 15:23:50 +00:00
< / code > < / p >
2020-04-21 16:55:17 +00:00
< pre class = "displayed-code all-displayed-code" >
2020-04-21 23:52:25 +00:00
< span class = "plain-syntax" > < / span > < a href = "2-tgs.html#SP4" class = "function-link" > < span class = "function-syntax" > Tags::add_by_name< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > L< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > owning_paragraph< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > I< / span > < span class = "string-syntax" > "Structures"< / span > < span class = "plain-syntax" > );< / span >
2020-04-21 16:55:17 +00:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > ADD_TO_LINKED_LIST< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > language_type< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > language_types< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > ADD_TO_LINKED_LIST< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > language_type< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > L< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > owning_paragraph< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > structures< / span > < span class = "plain-syntax" > );< / span >
< / pre > < ul class = "endnotetexts" > < li > This code is used in < a href = "4-taf.html#SP2" > § 2< / a > .< / li > < / ul > < p class = "inwebparagraph" > < a id = "SP2_3" > < / a > < b > § 2.3. < / b > < code class = "display" >
2020-04-20 22:26:08 +00:00
< < span class = "named-paragraph-defn" > Insertion-sort this into the alphabetical list of all structures found< / span > < span class = "named-paragraph-number" > 2.3< / span > > =
2020-04-10 15:23:50 +00:00
< / code > < / p >
2020-04-21 16:55:17 +00:00
< pre class = "displayed-code all-displayed-code" >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > next_cst_alphabetically< / 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" > first_cst_alphabetically< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > first_cst_alphabetically< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > placed< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > language_type< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > last< / 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" > for< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > language_type< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > seq< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > first_cst_alphabetically< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > seq< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > seq< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > seq< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > next_cst_alphabetically< / span > < span class = "plain-syntax" > ) {< / span >
2020-04-21 23:52:25 +00:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < a href = "../foundation-module/4-sm.html#SP20" class = "function-link" > < span class = "function-syntax" > Str::cmp< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > structure_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > seq< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > structure_name< / span > < span class = "plain-syntax" > ) < < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > ) {< / span >
2020-04-21 16:55:17 +00:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > seq< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > first_cst_alphabetically< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > next_cst_alphabetically< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > first_cst_alphabetically< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > first_cst_alphabetically< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > last< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > next_cst_alphabetically< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > next_cst_alphabetically< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > seq< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > placed< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > TRUE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > break< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > last< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > seq< / 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" > placed< / span > < span class = "plain-syntax" > == < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > last< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > next_cst_alphabetically< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2020-04-22 22:57:09 +00:00
< / pre > < ul class = "endnotetexts" > < li > This code is used in < a href = "4-taf.html#SP2" > § 2< / a > .< / li > < / ul > < p class = "inwebparagraph" > < a id = "SP3" > < / a > < b > § 3. < / b > A language can also create an instance of < span class = "extract" > < span class = "extract-syntax" > structure_element< / span > < / span > to record the
existence of the element < span class = "extract" > < span class = "extract-syntax" > val< / span > < / span > , and add it to the linked list of elements of
2020-04-10 15:23:50 +00:00
the structure being defined.
< / p >
< p class = "inwebparagraph" > In InC, only, certain element names used often in Inform's source code are
2020-04-22 22:57:09 +00:00
given mildly special treatment. This doesn't amount to much. < span class = "extract" > < span class = "extract-syntax" > allow_sharing< / span > < / span >
2020-04-10 15:23:50 +00:00
has no effect on tangling, so it doesn't change the program. It simply
affects the reports in the woven code about where structures are used.
< / p >
2020-04-21 16:55:17 +00:00
< pre class = "displayed-code all-displayed-code" >
< 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" > structure_element< / span > < span class = "plain-syntax" > {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > element_name< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > source_line< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > element_created_at< / 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" > allow_sharing< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "constant-syntax" > MEMORY_MANAGEMENT< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > structure_element< / span > < span class = "plain-syntax" > ;< / span >
< / pre > < ul class = "endnotetexts" > < li > The structure structure_element is accessed in 3/tw, 4/as and here.< / li > < / ul > < p class = "inwebparagraph" > < a id = "SP4" > < / a > < b > § 4. < / b > < / p >
2020-04-10 15:23:50 +00:00
2020-04-21 16:55:17 +00:00
< pre class = "displayed-code all-displayed-code" >
< span class = "reserved-syntax" > structure_element< / span > < span class = "plain-syntax" > *< / span > < span class = "function-syntax" > Functions::new_element< / span > < button class = "popup" onclick = "togglePopup('usagePopup2')" > ...< span class = "popuptext" id = "usagePopup2" > Usage of < b > Functions::new_element< / b > :< br > C-Like Languages - < a href = "4-cl.html#SP2_1_1" > § 2.1.1< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > language_type< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > elname< / span > < span class = "plain-syntax" > ,< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > source_line< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > L< / span > < span class = "plain-syntax" > ) {< / span >
2020-04-21 23:52:25 +00:00
< span class = "plain-syntax" > < / span > < a href = "3-ta.html#SP10" class = "function-link" > < span class = "function-syntax" > Analyser::mark_reserved_word_at_line< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > L< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > elname< / span > < span class = "plain-syntax" > , < / span > < span class = "constant-syntax" > ELEMENT_COLOUR< / span > < span class = "plain-syntax" > );< / span >
2020-04-21 16:55:17 +00:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > structure_element< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > elt< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > CREATE< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > structure_element< / span > < span class = "plain-syntax" > );< / span >
2020-04-21 23:52:25 +00:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > elt< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > element_name< / span > < span class = "plain-syntax" > = < / span > < a href = "../foundation-module/4-sm.html#SP3" class = "function-link" > < span class = "function-syntax" > Str::duplicate< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > elname< / span > < span class = "plain-syntax" > );< / span >
2020-04-21 16:55:17 +00:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > elt< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > allow_sharing< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > elt< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > element_created_at< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > L< / span > < span class = "plain-syntax" > ;< / span >
2020-04-21 23:52:25 +00:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < a href = "4-lm.html#SP29" class = "function-link" > < span class = "function-syntax" > LanguageMethods::share_element< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > L< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > owning_section< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > sect_language< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > elname< / span > < span class = "plain-syntax" > ))< / span >
2020-04-21 16:55:17 +00:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > elt< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > allow_sharing< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > TRUE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > ADD_TO_LINKED_LIST< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > elt< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > structure_element< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > elements< / 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" > elt< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< / pre > < p class = "inwebparagraph" > < a id = "SP5" > < / a > < b > § 5. < / b > < / p >
2020-04-10 15:23:50 +00:00
2020-04-21 16:55:17 +00:00
< pre class = "displayed-code all-displayed-code" >
< span class = "reserved-syntax" > language_type< / span > < span class = "plain-syntax" > *< / span > < span class = "function-syntax" > Functions::find_structure< / span > < button class = "popup" onclick = "togglePopup('usagePopup3')" > ...< span class = "popuptext" id = "usagePopup3" > Usage of < b > Functions::find_structure< / b > :< br > none< / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > web< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > name< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > language_type< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > LOOP_OVER_LINKED_LIST< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > language_type< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > language_types< / span > < span class = "plain-syntax" > )< / span >
2020-04-21 23:52:25 +00:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < a href = "../foundation-module/4-sm.html#SP19" class = "function-link" > < span class = "function-syntax" > Str::eq< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > structure_name< / span > < span class = "plain-syntax" > ))< / span >
2020-04-21 16:55:17 +00:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< / pre > < p class = "inwebparagraph" > < a id = "SP6" > < / a > < b > § 6. Functions. < / b > Each function definition found results in one of these structures being made:
2020-04-10 15:23:50 +00:00
< / p >
2020-04-21 16:55:17 +00:00
< pre class = "displayed-code all-displayed-code" >
< 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" > language_function< / span > < span class = "plain-syntax" > {< / span >
2020-04-22 22:57:09 +00:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > function_name< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment" > e.g., < / span > < span class = "extract" > < span class = "extract-syntax" > "cultivate"< / span > < / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > function_type< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment" > e.g., < / span > < span class = "extract" > < span class = "extract-syntax" > "tree *"< / span > < / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > function_arguments< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment" > e.g., < / span > < span class = "extract" > < span class = "extract-syntax" > "int rainfall)"< / span > < / span > < span class = "comment" > : note < / span > < span class = "extract" > < span class = "extract-syntax" > )< / span > < / span >
2020-04-21 16:55:17 +00:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > source_line< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > function_header_at< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment" > where the first line of the header begins< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > within_namespace< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment" > written using InC namespace dividers< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > called_from_other_sections< / 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" > call_freely< / 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" > usage_described< / 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" > no_conditionals< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > source_line< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > within_conditionals< / span > < span class = "plain-syntax" > [< / span > < span class = "constant-syntax" > MAX_CONDITIONAL_COMPILATION_STACK< / span > < span class = "plain-syntax" > ];< / span >
< span class = "plain-syntax" > < / span > < span class = "constant-syntax" > MEMORY_MANAGEMENT< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > language_function< / span > < span class = "plain-syntax" > ;< / span >
< / pre > < ul class = "endnotetexts" > < li > The structure language_function is accessed in 3/tw, 3/twot, 4/as, 4/cl, 5/ptf, 5/tf, 5/hf, 5/df, 6/cln and here.< / li > < / ul > < p class = "inwebparagraph" > < a id = "SP7" > < / a > < b > § 7. < / b > < / p >
2020-04-10 15:23:50 +00:00
2020-04-21 16:55:17 +00:00
< pre class = "displayed-code all-displayed-code" >
< span class = "reserved-syntax" > language_function< / span > < span class = "plain-syntax" > *< / span > < span class = "function-syntax" > Functions::new_function< / span > < button class = "popup" onclick = "togglePopup('usagePopup4')" > ...< span class = "popuptext" id = "usagePopup4" > Usage of < b > Functions::new_function< / b > :< br > ACME Support - < a href = "4-as.html#SP4" > § 4< / a > , < a href = "4-as.html#SP5" > § 5< / a > < br> C-Like Languages - < a href = "4-cl.html#SP3_2_2" > § 3.2.2< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > fname< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > source_line< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > L< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > hash_table_entry< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > hte< / span > < span class = "plain-syntax" > =< / span >
2020-04-21 23:52:25 +00:00
< span class = "plain-syntax" > < / span > < a href = "3-ta.html#SP10" class = "function-link" > < span class = "function-syntax" > Analyser::mark_reserved_word_at_line< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > L< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > fname< / span > < span class = "plain-syntax" > , < / span > < span class = "constant-syntax" > FUNCTION_COLOUR< / span > < span class = "plain-syntax" > );< / span >
2020-04-21 16:55:17 +00:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > language_function< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > fn< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > CREATE< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > language_function< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > hte< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > as_function< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > fn< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < < span class = "named-paragraph" > Initialise the function structure< / span > < span class = "named-paragraph-number" > 7.1< / span > > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < < span class = "named-paragraph" > Add the function to its paragraph and line< / span > < span class = "named-paragraph-number" > 7.2< / span > > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > L< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > owning_section< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > sect_language< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > supports_namespaces< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < < span class = "named-paragraph" > Check that the function has its namespace correctly declared< / span > < span class = "named-paragraph-number" > 7.3< / 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" > fn< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< / pre > < p class = "inwebparagraph" > < a id = "SP7_1" > < / a > < b > § 7.1. < / b > Note that we take a snapshot of the conditional compilation stack as
2020-04-10 15:23:50 +00:00
part of the function structure. We'll need it when predeclaring the function.
< / p >
< p class = "macrodefinition" > < code class = "display" >
2020-04-20 22:26:08 +00:00
< < span class = "named-paragraph-defn" > Initialise the function structure< / span > < span class = "named-paragraph-number" > 7.1< / span > > =
2020-04-10 15:23:50 +00:00
< / code > < / p >
2020-04-21 16:55:17 +00:00
< pre class = "displayed-code all-displayed-code" >
2020-04-21 23:52:25 +00:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > fn< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > function_name< / span > < span class = "plain-syntax" > = < / span > < a href = "../foundation-module/4-sm.html#SP3" class = "function-link" > < span class = "function-syntax" > Str::duplicate< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > fname< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > fn< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > function_arguments< / span > < span class = "plain-syntax" > = < / span > < a href = "../foundation-module/4-sm.html#SP2" class = "function-link" > < span class = "function-syntax" > Str::new< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > fn< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > function_type< / span > < span class = "plain-syntax" > = < / span > < a href = "../foundation-module/4-sm.html#SP2" class = "function-link" > < span class = "function-syntax" > Str::new< / span > < / a > < span class = "plain-syntax" > ();< / span >
2020-04-21 16:55:17 +00:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > fn< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > within_namespace< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > fn< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > called_from_other_sections< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > fn< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > call_freely< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > fn< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > function_header_at< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > L< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > fn< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > usage_described< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
2020-04-21 23:52:25 +00:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < a href = "../foundation-module/4-sm.html#SP22" class = "function-link" > < span class = "function-syntax" > Str::eq_wide_string< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > fname< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > L< / span > < span class = "string-syntax" > "main"< / span > < span class = "plain-syntax" > )) & & < / span >
2020-04-21 16:55:17 +00:00
< span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > L< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > owning_section< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > sect_language< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > C_like< / span > < span class = "plain-syntax" > ))< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > fn< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > usage_described< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > TRUE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > fn< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > no_conditionals< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > ;< / span >
< / pre > < ul class = "endnotetexts" > < li > This code is used in < a href = "4-taf.html#SP7" > § 7< / a > .< / li > < / ul > < p class = "inwebparagraph" > < a id = "SP7_2" > < / a > < b > § 7.2. < / b > < code class = "display" >
2020-04-20 22:26:08 +00:00
< < span class = "named-paragraph-defn" > Add the function to its paragraph and line< / span > < span class = "named-paragraph-number" > 7.2< / span > > =
2020-04-10 15:23:50 +00:00
< / code > < / p >
2020-04-21 16:55:17 +00:00
< pre class = "displayed-code all-displayed-code" >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > paragraph< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > L< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > owning_paragraph< / 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" > ADD_TO_LINKED_LIST< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > fn< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > language_function< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > functions< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > L< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > function_defined< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > fn< / span > < span class = "plain-syntax" > ;< / span >
< / pre > < ul class = "endnotetexts" > < li > This code is used in < a href = "4-taf.html#SP7" > § 7< / a > .< / li > < / ul > < p class = "inwebparagraph" > < a id = "SP7_3" > < / a > < b > § 7.3. < / b > < code class = "display" >
2020-04-20 22:26:08 +00:00
< < span class = "named-paragraph-defn" > Check that the function has its namespace correctly declared< / span > < span class = "named-paragraph-number" > 7.3< / span > > =
2020-04-10 15:23:50 +00:00
< / code > < / p >
2020-04-21 16:55:17 +00:00
< pre class = "displayed-code all-displayed-code" >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > declared_namespace< / 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" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > ambient_namespace< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > L< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > owning_section< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > sect_namespace< / span > < span class = "plain-syntax" > ;< / span >
2020-04-21 23:52:25 +00:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > match_results< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > mr< / span > < span class = "plain-syntax" > = < / span > < a href = "../foundation-module/4-pm.html#SP9" class = "function-link" > < span class = "function-syntax" > Regexp::create_mr< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < a href = "../foundation-module/4-pm.html#SP10" class = "function-link" > < span class = "function-syntax" > Regexp::match< / span > < / a > < span class = "plain-syntax" > (& < / span > < span class = "identifier-syntax" > mr< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > fname< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > L< / span > < span class = "string-syntax" > "(%c+::)%c*"< / span > < span class = "plain-syntax" > )) {< / span >
2020-04-21 16:55:17 +00:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > declared_namespace< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > mr< / span > < span class = "plain-syntax" > .< / span > < span class = "element-syntax" > exp< / span > < span class = "plain-syntax" > [0];< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > fn< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > within_namespace< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > TRUE< / span > < span class = "plain-syntax" > ;< / span >
2020-04-21 23:52:25 +00: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 > < a href = "../foundation-module/4-sm.html#SP22" class = "function-link" > < span class = "function-syntax" > Str::eq_wide_string< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > fname< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > L< / span > < span class = "string-syntax" > "main"< / span > < span class = "plain-syntax" > )) & & < / span >
< span class = "plain-syntax" > (< / span > < a href = "../foundation-module/4-sm.html#SP22" class = "function-link" > < span class = "function-syntax" > Str::eq_wide_string< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ambient_namespace< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > L< / span > < span class = "string-syntax" > "Main::"< / span > < span class = "plain-syntax" > )))< / span >
2020-04-21 16:55:17 +00:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > declared_namespace< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > I< / span > < span class = "string-syntax" > "Main::"< / span > < span class = "plain-syntax" > ;< / span >
2020-04-21 23:52:25 +00:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < a href = "../foundation-module/4-sm.html#SP19" class = "function-link" > < span class = "function-syntax" > Str::ne< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > declared_namespace< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > ambient_namespace< / span > < span class = "plain-syntax" > )) & & < / span >
2020-04-21 16:55:17 +00:00
< span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > L< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > owning_paragraph< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > placed_very_early< / span > < span class = "plain-syntax" > == < / span > < span class = "constant-syntax" > FALSE< / 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" > err_mess< / span > < span class = "plain-syntax" > );< / span >
2020-04-21 23:52:25 +00:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < a href = "../foundation-module/4-sm.html#SP8" class = "function-link" > < span class = "function-syntax" > Str::len< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > declared_namespace< / span > < span class = "plain-syntax" > ) == < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > )< / span >
2020-04-21 16:55:17 +00:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE_TO< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > err_mess< / span > < span class = "plain-syntax" > , < / span > < span class = "string-syntax" > "Function '%S' should have namespace prefix '%S'"< / span > < span class = "plain-syntax" > ,< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > fname< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > ambient_namespace< / span > < span class = "plain-syntax" > );< / span >
2020-04-21 23:52:25 +00: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 > < a href = "../foundation-module/4-sm.html#SP8" class = "function-link" > < span class = "function-syntax" > Str::len< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ambient_namespace< / span > < span class = "plain-syntax" > ) == < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > )< / span >
2020-04-21 16:55:17 +00:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE_TO< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > err_mess< / span > < span class = "plain-syntax" > , < / span > < span class = "string-syntax" > "Function '%S' declared in a section with no namespace"< / span > < span class = "plain-syntax" > ,< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > fname< / 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" > WRITE_TO< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > err_mess< / span > < span class = "plain-syntax" > , < / span > < span class = "string-syntax" > "Function '%S' declared in a section with the wrong namespace '%S'"< / span > < span class = "plain-syntax" > ,< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > fname< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > ambient_namespace< / span > < span class = "plain-syntax" > );< / span >
2020-04-21 23:52:25 +00:00
< span class = "plain-syntax" > < / span > < a href = "1-pc.html#SP8" class = "function-link" > < span class = "function-syntax" > Main::error_in_web< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > err_mess< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > L< / span > < span class = "plain-syntax" > );< / span >
2020-04-21 16:55:17 +00:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > DISCARD_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > err_mess< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
2020-04-21 23:52:25 +00:00
< span class = "plain-syntax" > < / span > < a href = "../foundation-module/4-pm.html#SP9" class = "function-link" > < span class = "function-syntax" > Regexp::dispose_of< / span > < / a > < span class = "plain-syntax" > (& < / span > < span class = "identifier-syntax" > mr< / span > < span class = "plain-syntax" > );< / span >
2020-04-22 22:57:09 +00:00
< / pre > < ul class = "endnotetexts" > < li > This code is used in < a href = "4-taf.html#SP7" > § 7< / a > .< / li > < / ul > < p class = "inwebparagraph" > < a id = "SP8" > < / a > < b > § 8. Cataloguing. < / b > This implements the additional information in the < span class = "extract" > < span class = "extract-syntax" > -structures< / span > < / span > and < span class = "extract" > < span class = "extract-syntax" > -functions< / span > < / span >
2020-04-10 15:23:50 +00:00
forms of section catalogue.
< / p >
2020-04-21 16:55:17 +00:00
< pre class = "displayed-code all-displayed-code" >
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > Functions::catalogue< / span > < button class = "popup" onclick = "togglePopup('usagePopup5')" > ...< span class = "popuptext" id = "usagePopup5" > Usage of < b > Functions::catalogue< / b > :< br > The Analyser - < a href = "3-ta.html#SP2" > § 2< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > section< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > S< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > functions_too< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > language_type< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > str< / 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" > str< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > language_type< / 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< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > structure_header_at< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > owning_section< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > S< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > PRINT< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > " %S "< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > str< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > structure_name< / 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" > functions_too< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > language_function< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > fn< / 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" > fn< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > language_function< / 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" > fn< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > function_header_at< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > owning_section< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > S< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > PRINT< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "\n %S"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > fn< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > function_name< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
< / pre > < hr class = "tocbar" >
2020-04-10 15:23:50 +00:00
< ul class = "toc" > < li > < a href = "4-pl.html" > Back to 'Programming Languages'< / a > < / li > < li > < a href = "4-lm.html" > Continue with 'Language Methods'< / a > < / li > < / ul > < hr class = "tocbar" >
<!-- End of weave -->
< / main >
< / body >
< / html >
