2019-03-17 14:40:57 +02: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 > List Constants< / 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-03-17 14:40:57 +02: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-05-09 01:13:45 +03:00
< link href = "../docs-assets/Preform-Colours.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
2020-04-14 19:56:54 +03:00
2019-03-17 14:40:57 +02: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 >
< li > < a href = "index.html" > < span class = "selectedlink" > core< / span > < / a > < / li >
2020-03-19 02:11:25 +02:00
< li > < a href = "../inflections-module/index.html" > inflections< / a > < / li >
< li > < a href = "../linguistics-module/index.html" > linguistics< / a > < / li >
< li > < a href = "../kinds-module/index.html" > kinds< / a > < / li >
< li > < a href = "../if-module/index.html" > if< / a > < / li >
< li > < a href = "../multimedia-module/index.html" > multimedia< / a > < / li >
2020-04-14 19:56:54 +03:00
< li > < a href = "../problems-module/index.html" > problems< / a > < / li >
2020-03-19 02:11:25 +02:00
< 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 >
< li > < a href = "../codegen-module/index.html" > codegen< / a > < / li >
2020-04-14 19:56:54 +03:00
< / ul > < h2 > Shared Modules< / h2 > < ul >
< li > < a href = "../arch-module/index.html" > arch< / a > < / li >
< li > < a href = "../syntax-module/index.html" > syntax< / a > < / li >
< li > < a href = "../words-module/index.html" > words< / a > < / li >
< li > < a href = "../html-module/index.html" > html< / 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 'List Constants' generated by Inweb -->
< div class = "breadcrumbs" >
< ul class = "crumbs" > < li > < a href = "../index.html" > Home< / a > < / li > < li > < a href = "../compiler.html" > Inform7 Modules< / a > < / li > < li > < a href = "index.html" > core< / a > < / li > < li > < a href = "index.html#18" > Chapter 18: List Data< / a > < / li > < li > < b > List Constants< / b > < / li > < / ul > < / div >
< p class = "purpose" > In this section we compile I6 arrays for constant lists arising from braced literals.< / p >
2019-03-17 14:40:57 +02:00
2020-04-16 01:49:59 +03:00
< ul class = "toc" > < li > < a href = "18-lc.html#SP1" > § 1. Definitions< / a > < / li > < / ul > < hr class = "tocbar" >
2019-03-17 14:40:57 +02:00
2020-05-03 03:01:21 +03:00
< p class = "commentary firstcommentary" > < a id = "SP1" > < / a > < b > § 1. Definitions. < / b > < / p >
2019-03-17 14:40:57 +02:00
2020-05-03 03:01:21 +03:00
< p class = "commentary firstcommentary" > < a id = "SP2" > < / a > < b > § 2. < / b > Every literal list in the source text, such as
2019-03-17 14:40:57 +02:00
< / p >
< blockquote >
< p > {2, 12, 13}< / p >
< / blockquote >
2020-05-03 03:01:21 +03:00
< p class = "commentary" > is parsed into an instance of the following structure. There are two rules:
2019-03-17 14:40:57 +02:00
< / p >
< ul class = "items" > < li > (1) every LL structure represents a syntactically well-formed list, in which
braces and commas balance; and
< / li > < li > (2) there can be at most one LL structure at any word position.
< / li > < / ul >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > typedef< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > literal_list< / span > < span class = "plain-syntax" > {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > wording< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > unbraced_text< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment-syntax" > position in the source of quoted text, excluding braces< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > parse_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > list_text< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment-syntax" > used for problem reporting only< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > listed_within_code< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment-syntax" > appears within a phrase, rather than (say) a table entry?< / span >
2019-03-17 14:40:57 +02:00
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > kind< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > entry_kind< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment-syntax" > i.e., of the entries, not the list< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > kinds_known_to_be_inconsistent< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment-syntax" > problem(s) thrown when parsing these< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > llist_entry< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > first_llist_entry< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment-syntax" > linked list of contents< / span >
2019-03-17 14:40:57 +02:00
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > package_request< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > ll_package< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment-syntax" > which will be the enclosure for...< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_name< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > ll_iname< / span > < span class = "plain-syntax" > ;< / span >
2019-03-17 14:40:57 +02:00
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" > list_compiled< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment-syntax" > lists are compiled at several different points: has this one been done?< / span >
2019-03-17 14:40:57 +02:00
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" > literal_list< / span > < span class = "plain-syntax" > ;< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-05-03 03:01:21 +03:00
< ul class = "endnotetexts" > < li > The structure literal_list is accessed in 27/em and here.< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP3" > < / a > < b > § 3. < / b > I believe "llath" is the Welsh word for "mile": not sure about "llist".
2019-03-17 14:40:57 +02:00
< / p >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > typedef< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > llist_entry< / 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" > parse_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > llist_entry_value< / 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" > llist_entry< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > next_llist_entry< / 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" > llist_entry< / span > < span class = "plain-syntax" > ;< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-05-03 03:01:21 +03:00
< ul class = "endnotetexts" > < li > The structure llist_entry is private to this section.< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP4" > < / a > < b > § 4. < / b > One of the few pieces of Inform syntax which wouldn't look out of place in
2019-03-17 14:40:57 +02:00
a conventional programming language; list constants are series of values,
2020-05-03 03:01:21 +03:00
separated by commas, and enclosed in braces. The empty list < span class = "extract" > < span class = "extract-syntax" > { }< / span > < / span > is valid
2019-03-17 14:40:57 +02:00
as a constant.
< / p >
2020-05-03 03:01:21 +03:00
< p class = "commentary" > The values are in fact eventually required to be constants, and to have
2019-03-17 14:40:57 +02:00
mutually consistent kinds, but that checking is done after parsing, so it
isn't expressed in this grammar.
< / p >
2020-05-09 01:13:45 +03:00
< pre class = "Preform-displayed-code all-displayed-code code-font" >
< span class = "Preform-function-syntax" > < s-literal-list> < / span > < span class = "Preform-plain-syntax" > < / span > < span class = "Preform-reserved-syntax" > ::=< / span >
< span class = "Preform-plain-syntax" > < / span > < span class = "Preform-constant-syntax" > \{< / span > < span class = "Preform-plain-syntax" > < / span > < span class = "Preform-constant-syntax" > \}< / span > < span class = "Preform-plain-syntax" > < / span > < span class = "Preform-reserved-syntax" > |< / span > < span class = "Preform-plain-syntax" > < / span > < span class = "Preform-reserved-syntax" > ==> < / span > < span class = "Preform-plain-syntax" > Rvalues::from_wording_of_list(Lists::kind_of_ll(Lists::empty_literal_list(Wordings::last_word(W)), FALSE), W)< / span >
< span class = "Preform-plain-syntax" > < / span > < span class = "Preform-constant-syntax" > \{< / span > < span class = "Preform-plain-syntax" > < / span > < span class = "Preform-function-syntax" > < literal-list-contents> < / span > < span class = "Preform-plain-syntax" > < / span > < span class = "Preform-constant-syntax" > \}< / span > < span class = "Preform-plain-syntax" > < / span > < span class = "Preform-reserved-syntax" > ==> < / span > < span class = "Preform-plain-syntax" > Rvalues::from_wording_of_list(Lists::kind_of_ll(RP[1], FALSE), W)< / span >
2019-03-17 14:40:57 +02:00
2020-05-09 01:13:45 +03:00
< span class = "Preform-function-syntax" > < literal-list-contents> < / span > < span class = "Preform-plain-syntax" > < / span > < span class = "Preform-reserved-syntax" > ::=< / span >
< span class = "Preform-plain-syntax" > < / span > < span class = "Preform-function-syntax" > < literal-list-entry> < / span > < span class = "Preform-plain-syntax" > < / span > < span class = "Preform-constant-syntax" > ,< / span > < span class = "Preform-plain-syntax" > < / span > < span class = "Preform-function-syntax" > < literal-list-contents> < / span > < span class = "Preform-plain-syntax" > < / span > < span class = "Preform-reserved-syntax" > |< / span > < span class = "Preform-plain-syntax" > < / span > < span class = "Preform-reserved-syntax" > ==> < / span > < span class = "Preform-plain-syntax" > 0; *XP = Lists::add_to_ll(RP[1], RP[2], W, R[1])< / span >
< span class = "Preform-plain-syntax" > < / span > < span class = "Preform-function-syntax" > < literal-list-entry> < / span > < span class = "Preform-plain-syntax" > < / span > < span class = "Preform-reserved-syntax" > ==> < / span > < span class = "Preform-plain-syntax" > 0; *XP = Lists::add_to_ll(RP[1], Lists::empty_literal_list(W), W, R[1])< / span >
2019-03-17 14:40:57 +02:00
2020-05-09 01:13:45 +03:00
< span class = "Preform-function-syntax" > < literal-list-entry> < / span > < span class = "Preform-plain-syntax" > < / span > < span class = "Preform-reserved-syntax" > ::=< / span >
< span class = "Preform-plain-syntax" > < / span > < span class = "Preform-function-syntax" > < s-value> < / span > < span class = "Preform-plain-syntax" > < / span > < span class = "Preform-reserved-syntax" > |< / span > < span class = "Preform-plain-syntax" > < / span > < span class = "Preform-reserved-syntax" > ==> < / span > < span class = "Preform-plain-syntax" > FALSE; *XP = RP[1]< / span >
< span class = "Preform-plain-syntax" > < / span > < span class = "Preform-reserved-syntax" > ......< / span > < span class = "Preform-plain-syntax" > < / span > < span class = "Preform-reserved-syntax" > ==> < / span > < span class = "Preform-plain-syntax" > TRUE; *XP = Specifications::new_UNKNOWN(W)< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-05-09 01:13:45 +03:00
< ul class = "endnotetexts" > < li > This is < a href = "../words-module/4-prf.html" class = "internal" > Preform grammar< / a > , not regular C code.< / li > < / ul >
2020-05-03 03:01:21 +03:00
< p class = "commentary firstcommentary" > < a id = "SP5" > < / a > < b > § 5. < / b > The grammar above builds our list structures from the bottom up. They begin
2019-03-17 14:40:57 +02:00
with a call to:
< / p >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > literal_list< / span > < span class = "plain-syntax" > *< / span > < span class = "function-syntax" > Lists::empty_literal_list< / 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" > Lists::empty_literal_list< / span > < / span > :< br / > < a href = "18-lc.html#SP4" > § 4< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > wording< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > literal_list< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > = < / span > < a href = "18-lc.html#SP6" class = "function-link" > < span class = "function-syntax" > Lists::find_list_at< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Wordings::first_wn< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > CREATE< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > literal_list< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list_compiled< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > unbraced_text< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > entry_kind< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > listed_within_code< / 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" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > kinds_known_to_be_inconsistent< / 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" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > ll_iname< / 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" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > first_llist_entry< / 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" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list_text< / 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" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > ll_package< / span > < span class = "plain-syntax" > = < / span > < a href = "27-em.html#SP4" class = "function-link" > < span class = "function-syntax" > Emit::current_enclosure< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < a href = "13-rsfk.html#SP17" class = "function-link" > < span class = "function-syntax" > Kinds::RunTime::ensure_basic_heap_present< / span > < / a > < 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" > ll< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-05-03 03:01:21 +03:00
< p class = "commentary firstcommentary" > < a id = "SP6" > < / a > < b > § 6. < / b > Parsing is quadratic in the number of constant lists in the source text,
2019-03-17 14:40:57 +02:00
which is in principle a bad thing, but in practice the following causes no
speed problems even on large-scale tests. If it becomes a problem, we can
easily trade the time spent here for memory, by attaching a pointer to
each word in the source text, or for complexity, by constructing some kind
of binary search tree.
< / p >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > literal_list< / span > < span class = "plain-syntax" > *< / span > < span class = "function-syntax" > Lists::find_list_at< / 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" > Lists::find_list_at< / span > < / span > :< br / > < a href = "18-lc.html#SP5" > § 5< / a > , < a href = "18-lc.html#SP7" > § 7< / a > , < a href = "18-lc.html#SP9" > § 9< / a > , < a href = "18-lc.html#SP11" > § 11< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > incipit< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > literal_list< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > LOOP_OVER< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > literal_list< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Wordings::first_wn< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > unbraced_text< / span > < span class = "plain-syntax" > ) == < / span > < span class = "identifier-syntax" > incipit< / 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" > ll< / 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 >
2019-03-17 14:40:57 +02:00
< / pre >
2020-05-03 03:01:21 +03:00
< p class = "commentary firstcommentary" > < a id = "SP7" > < / a > < b > § 7. < / b > Note that the entry kind is initially unknown, and it's not even decided
2019-03-17 14:40:57 +02:00
for sure when we add the first entry. Here's how each entry is added,
recursing right to left (i.e., reversing the direction of reading):
< / p >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > literal_list< / span > < span class = "plain-syntax" > *< / span > < span class = "function-syntax" > Lists::add_to_ll< / 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" > Lists::add_to_ll< / span > < / span > :< br / > < a href = "18-lc.html#SP4" > § 4< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > parse_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > literal_list< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > wording< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > bad< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > llist_entry< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > lle< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > CREATE< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > llist_entry< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > lle< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > next_llist_entry< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > first_llist_entry< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > first_llist_entry< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > lle< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > lle< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > llist_entry_value< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > literal_list< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > ll2< / span > < span class = "plain-syntax" > = < / span > < a href = "18-lc.html#SP6" class = "function-link" > < span class = "function-syntax" > Lists::find_list_at< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Wordings::first_wn< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ll2< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > ll2< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > unbraced_text< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > bad< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > kinds_known_to_be_inconsistent< / 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" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-05-03 03:01:21 +03:00
< p class = "commentary firstcommentary" > < a id = "SP8" > < / a > < b > § 8. < / b > With all the entries in place, we now have to reconcile their kinds, if
2019-03-17 14:40:57 +02:00
that's possible. Problems are only issued on request, and with the current
sentence cut down to just the list itself — since otherwise we might be
printing out an entire huge table to report a problem in a single entry
which happens to be a malformed list.
< / p >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "identifier-syntax" > kind< / span > < span class = "plain-syntax" > *< / span > < span class = "function-syntax" > Lists::kind_of_ll< / 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" > Lists::kind_of_ll< / span > < / span > :< br / > < a href = "18-lc.html#SP4" > § 4< / a > , < a href = "18-lc.html#SP9" > § 9< / a > , < a href = "18-lc.html#SP10" > § 10< / a > , < a href = "18-lc.html#SP11" > § 11< / a > , < a href = "18-lc.html#SP12" > § 12< / a > , < a href = "18-lc.html#SP12_1" > § 12.1< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > literal_list< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > issue_problems< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > parse_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > cs< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > current_sentence< / 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" > issue_problems< / 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" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list_text< / 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" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list_text< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > NounPhrases::new_raw< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > unbraced_text< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > current_sentence< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list_text< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > kind< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > llist_entry< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > lle< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > for< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > lle< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > first_llist_entry< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > lle< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > lle< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > lle< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > next_llist_entry< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > parse_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > lle< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > llist_entry_value< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (!< / span > < span class = "identifier-syntax" > ParseTree::is< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > , < / span > < span class = "constant-syntax" > UNKNOWN_NT< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < a href = "14-cn.html#SP10" class = "function-link" > < span class = "function-syntax" > Conditions::is_TEST_ACTION< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > ))< / span >
< span class = "plain-syntax" > < / span > < a href = "14-ds2.html#SP9" class = "function-link" > < span class = "function-syntax" > Dash::check_value_silently< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K_stored_action< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span >
< span class = "plain-syntax" > < / span > < a href = "14-ds2.html#SP9" class = "function-link" > < span class = "function-syntax" > Dash::check_value_silently< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > = < / span > < a href = "5-nv.html#SP23" class = "function-link" > < span class = "function-syntax" > NonlocalVariables::substitute_constants< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > kind< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > E< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "18-lc.html#SP8_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Work out the entry kind E< / span > < span class = "named-paragraph-number" > 8.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Kinds::Compare::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > )) < / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > E< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "18-lc.html#SP8_2" class = "named-paragraph-link" > < span class = "named-paragraph" > Revise K in the light of E< / span > < span class = "named-paragraph-number" > 8.2< / span > < / a > < / 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" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > kinds_known_to_be_inconsistent< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > entry_kind< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > current_sentence< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > cs< / 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" > Kinds::unary_construction< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > CON_list_of< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-05-03 03:01:21 +03:00
< p class = "commentary firstcommentary" > < a id = "SP8_1" > < / a > < b > § 8.1. < / b > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Work out the entry kind E< / span > < span class = "named-paragraph-number" > 8.1< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
2019-03-17 14:40:57 +02:00
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" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ParseTree::is< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > , < / span > < span class = "constant-syntax" > UNKNOWN_NT< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > issue_problems< / span > < span class = "plain-syntax" > ) < / span > < span class = "named-paragraph-container code-font" > < a href = "18-lc.html#SP8_1_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Issue a bad list entry problem< / span > < span class = "named-paragraph-number" > 8.1.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > kinds_known_to_be_inconsistent< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > TRUE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > E< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > ParseTree::is< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > , < / span > < span class = "constant-syntax" > CONSTANT_NT< / span > < span class = "plain-syntax" > ) == < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ) & & < / span >
< span class = "plain-syntax" > (< / span > < a href = "14-lv.html#SP8" class = "function-link" > < span class = "function-syntax" > Lvalues::is_constant_NONLOCAL_VARIABLE< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > ) == < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > issue_problems< / span > < span class = "plain-syntax" > ) < / span > < span class = "named-paragraph-container code-font" > < a href = "18-lc.html#SP8_1_2" class = "named-paragraph-link" > < span class = "named-paragraph" > Issue a nonconstant list entry problem< / span > < span class = "named-paragraph-number" > 8.1.2< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > kinds_known_to_be_inconsistent< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > TRUE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > E< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > E< / span > < span class = "plain-syntax" > = < / span > < a href = "14-sp.html#SP1" class = "function-link" > < span class = "function-syntax" > Specifications::to_kind< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > E< / 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" > issue_problems< / span > < span class = "plain-syntax" > ) < / span > < span class = "named-paragraph-container code-font" > < a href = "18-lc.html#SP8_1_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Issue a bad list entry problem< / span > < span class = "named-paragraph-number" > 8.1.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > kinds_known_to_be_inconsistent< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > TRUE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-05-03 03:01:21 +03:00
< ul class = "endnotetexts" > < li > This code is used in < a href = "18-lc.html#SP8" > § 8< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP8_2" > < / a > < b > § 8.2. < / b > The following broadens K to include E, if necessary, but never narrows K.
2019-03-17 14:40:57 +02:00
Thus a list containing a person, a woman and a door will see K become
successively "person", "person" (E being narrower), then "thing" (E being
incomparable, and "thing" being the max of "person" and "door").
< / p >
2020-05-03 03:01:21 +03:00
< p class = "commentary" > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Revise K in the light of E< / span > < span class = "named-paragraph-number" > 8.2< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
2019-03-17 14:40:57 +02:00
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > kind< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > previous_K< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Kinds::Compare::max< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > E< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Kinds::Compare::eq< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > issue_problems< / span > < span class = "plain-syntax" > ) < / span > < span class = "named-paragraph-container code-font" > < a href = "18-lc.html#SP8_2_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Issue a list entry kind mismatch problem< / span > < span class = "named-paragraph-number" > 8.2.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > kinds_known_to_be_inconsistent< / 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" > break< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-05-03 03:01:21 +03:00
< ul class = "endnotetexts" > < li > This code is used in < a href = "18-lc.html#SP8" > § 8< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP8_1_1" > < / a > < b > § 8.1.1. < / b > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Issue a bad list entry problem< / span > < span class = "named-paragraph-number" > 8.1.1< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
2019-03-17 14:40:57 +02:00
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Problems::quote_source< / span > < span class = "plain-syntax" > (1, < / span > < span class = "identifier-syntax" > current_sentence< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Problems::quote_wording< / span > < span class = "plain-syntax" > (2, < / span > < span class = "identifier-syntax" > ParseTree::get_text< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Problems::Issue::handmade_problem< / span > < span class = "plain-syntax" > (< / span > < a href = "1-wtc.html#SP5" class = "function-link" > < span class = "function-syntax" > Task::syntax_tree< / span > < / a > < span class = "plain-syntax" > (), < / span > < span class = "identifier-syntax" > _p_< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > PM_BadConstantListEntry< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Problems::issue_problem_segment< / span > < span class = "plain-syntax" > (< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "The constant list %1 contains an entry '%2' which isn't any "< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "form of constant I'm able to read."< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Problems::issue_problem_segment< / span > < span class = "plain-syntax" > (< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "%PNote that lists have to be written with spaces after commas, "< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "so I like '{2, 4}' but not '{2,4}', for instance."< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Problems::issue_problem_end< / span > < span class = "plain-syntax" > ();< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-05-03 03:01:21 +03:00
< ul class = "endnotetexts" > < li > This code is used in < a href = "18-lc.html#SP8_1" > § 8.1< / a > (twice).< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP8_1_2" > < / a > < b > § 8.1.2. < / b > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Issue a nonconstant list entry problem< / span > < span class = "named-paragraph-number" > 8.1.2< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
2019-03-17 14:40:57 +02:00
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Problems::quote_source< / span > < span class = "plain-syntax" > (1, < / span > < span class = "identifier-syntax" > current_sentence< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Problems::quote_wording< / span > < span class = "plain-syntax" > (2, < / span > < span class = "identifier-syntax" > ParseTree::get_text< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < a href = "2-sq.html#SP1" class = "function-link" > < span class = "function-syntax" > Problems::quote_spec< / span > < / a > < span class = "plain-syntax" > (3, < / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Problems::Issue::handmade_problem< / span > < span class = "plain-syntax" > (< / span > < a href = "1-wtc.html#SP5" class = "function-link" > < span class = "function-syntax" > Task::syntax_tree< / span > < / a > < span class = "plain-syntax" > (), < / span > < span class = "identifier-syntax" > _p_< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > PM_NonconstantConstantListEntry< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Problems::issue_problem_segment< / span > < span class = "plain-syntax" > (< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "The constant list %1 contains an entry '%2' which does make sense, "< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "but isn't a constant (it's %3). Only constants can appear as entries in "< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "constant lists, i.e., in lists written in braces '{' and '}'."< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Problems::issue_problem_end< / span > < span class = "plain-syntax" > ();< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-05-03 03:01:21 +03:00
< ul class = "endnotetexts" > < li > This code is used in < a href = "18-lc.html#SP8_1" > § 8.1< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP8_2_1" > < / a > < b > § 8.2.1. < / b > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Issue a list entry kind mismatch problem< / span > < span class = "named-paragraph-number" > 8.2.1< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
2019-03-17 14:40:57 +02:00
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Problems::quote_source< / span > < span class = "plain-syntax" > (1, < / span > < span class = "identifier-syntax" > current_sentence< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Problems::quote_wording< / span > < span class = "plain-syntax" > (2, < / span > < span class = "identifier-syntax" > ParseTree::get_text< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > spec< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < a href = "2-sq.html#SP3" class = "function-link" > < span class = "function-syntax" > Problems::quote_kind< / span > < / a > < span class = "plain-syntax" > (3, < / span > < span class = "identifier-syntax" > E< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-sq.html#SP3" class = "function-link" > < span class = "function-syntax" > Problems::quote_kind< / span > < / a > < span class = "plain-syntax" > (4, < / span > < span class = "identifier-syntax" > previous_K< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Problems::Issue::handmade_problem< / span > < span class = "plain-syntax" > (< / span > < a href = "1-wtc.html#SP5" class = "function-link" > < span class = "function-syntax" > Task::syntax_tree< / span > < / a > < span class = "plain-syntax" > (), < / span > < span class = "identifier-syntax" > _p_< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > PM_IncompatibleConstantListEntry< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Problems::issue_problem_segment< / span > < span class = "plain-syntax" > (< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "The constant list %1 contains an entry '%2' whose kind is '%3', but "< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "that's not compatible with the kind I had established from looking at "< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "earlier entries ('%4')."< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Problems::issue_problem_end< / span > < span class = "plain-syntax" > ();< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-05-03 03:01:21 +03:00
< ul class = "endnotetexts" > < li > This code is used in < a href = "18-lc.html#SP8_2" > § 8.2< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP9" > < / a > < b > § 9. < / b > The following allow other parts of Inform to find the kind of a constant
2019-03-17 14:40:57 +02:00
list at a given word position; either to discover the answer, or to force
problem messages out into the open —
< / p >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "identifier-syntax" > kind< / span > < span class = "plain-syntax" > *< / span > < span class = "function-syntax" > Lists::kind_of_list_at< / 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" > Lists::kind_of_list_at< / span > < / span > :< br / > RValues - < a href = "14-rv.html#SP23_4" > § 23.4< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > wording< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > incipit< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Wordings::first_wn< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > literal_list< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > = < / span > < a href = "18-lc.html#SP6" class = "function-link" > < span class = "function-syntax" > Lists::find_list_at< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > incipit< / span > < span class = "plain-syntax" > +1);< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > ) < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < a href = "18-lc.html#SP8" class = "function-link" > < span class = "function-syntax" > Lists::kind_of_ll< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ll< / 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" > 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" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > Lists::check_one< / 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" > Lists::check_one< / span > < / span > :< br / > Dash - < a href = "14-ds2.html#SP14_1_1_2" > § 14.1.1.2< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > wording< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > incipit< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Wordings::first_wn< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > literal_list< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > = < / span > < a href = "18-lc.html#SP6" class = "function-link" > < span class = "function-syntax" > Lists::find_list_at< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > incipit< / span > < span class = "plain-syntax" > +1);< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > ) < / span > < a href = "18-lc.html#SP8" class = "function-link" > < span class = "function-syntax" > Lists::kind_of_ll< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > TRUE< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-05-03 03:01:21 +03:00
< p class = "commentary firstcommentary" > < a id = "SP10" > < / a > < b > § 10. < / b > And this checks every list, with problem messages on:
2019-03-17 14:40:57 +02:00
< / p >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > Lists::check< / 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" > Lists::check< / span > < / span > :< br / > How To Compile - < a href = "1-htc.html#SP2_8" > § 2.8< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > void< / 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" > problem_count< / 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" > literal_list< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > LOOP_OVER< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > literal_list< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < a href = "18-lc.html#SP8" class = "function-link" > < span class = "function-syntax" > Lists::kind_of_ll< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > TRUE< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-05-03 03:01:21 +03:00
< p class = "commentary firstcommentary" > < a id = "SP11" > < / a > < b > § 11. < / b > That leaves just the compilation of lists at run-time. This used to be a
2019-03-17 14:40:57 +02:00
complex dance with initialisation code interleaved with heap construction,
so there was once a two-page explanation here, but it is now blessedly simple.
< / p >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "identifier-syntax" > inter_name< / span > < span class = "plain-syntax" > *< / span > < span class = "function-syntax" > Lists::compile_literal_list< / 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" > Lists::compile_literal_list< / span > < / span > :< br / > RValues - < a href = "14-rv.html#SP24_3" > § 24.3< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > wording< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > incipit< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Wordings::first_wn< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > W< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > literal_list< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > = < / span > < a href = "18-lc.html#SP6" class = "function-link" > < span class = "function-syntax" > Lists::find_list_at< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > incipit< / span > < span class = "plain-syntax" > +1);< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < a href = "18-lc.html#SP8" class = "function-link" > < span class = "function-syntax" > Lists::kind_of_ll< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ll< / 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" > package_request< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > PR< / span > < span class = "plain-syntax" > = < / span > < a href = "27-hr.html#SP4" class = "function-link" > < span class = "function-syntax" > Hierarchy::package_in_enclosure< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "constant-syntax" > BLOCK_CONSTANTS_HAP< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inter_name< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > = < / span > < a href = "27-hr.html#SP4" class = "function-link" > < span class = "function-syntax" > Hierarchy::make_iname_in< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "constant-syntax" > BLOCK_CONSTANT_HL< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > PR< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > packaging_state< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > save< / span > < span class = "plain-syntax" > = < / span > < a href = "27-em.html#SP3" class = "function-link" > < span class = "function-syntax" > Emit::named_late_array_begin< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "27-em.html#SP3" class = "function-link" > < span class = "function-syntax" > Emit::array_iname_entry< / span > < / a > < span class = "plain-syntax" > (< / span > < a href = "18-lc.html#SP11" class = "function-link" > < span class = "function-syntax" > Lists::iname< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < a href = "27-em.html#SP3" class = "function-link" > < span class = "function-syntax" > Emit::array_numeric_entry< / span > < / a > < span class = "plain-syntax" > (0);< / span >
< span class = "plain-syntax" > < / span > < a href = "27-em.html#SP3" class = "function-link" > < span class = "function-syntax" > Emit::array_end< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > save< / 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" > N< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "identifier-syntax" > inter_name< / span > < span class = "plain-syntax" > *< / span > < span class = "function-syntax" > Lists::iname< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > literal_list< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > ll_iname< / 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" > package_request< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > PR< / span > < span class = "plain-syntax" > = < / span > < a href = "27-hr.html#SP4" class = "function-link" > < span class = "function-syntax" > Hierarchy::package_in_enclosure< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "constant-syntax" > LITERALS_HAP< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > ll_iname< / span > < span class = "plain-syntax" > = < / span > < a href = "27-hr.html#SP4" class = "function-link" > < span class = "function-syntax" > Hierarchy::make_iname_in< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "constant-syntax" > LIST_LITERAL_HL< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > PR< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > ll_iname< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-05-03 03:01:21 +03:00
< p class = "commentary firstcommentary" > < a id = "SP12" > < / a > < b > § 12. < / b > Using:
2019-03-17 14:40:57 +02:00
< / p >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > Lists::compile< / 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" > Lists::compile< / span > < / span > :< br / > How To Compile - < a href = "1-htc.html#SP2_8" > § 2.8< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > literal_list< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > problem_count< / span > < span class = "plain-syntax" > == < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > LOOP_OVER< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > literal_list< / 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" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list_compiled< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ) & & (< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > ll_iname< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list_compiled< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > TRUE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > current_sentence< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list_text< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < a href = "18-lc.html#SP8" class = "function-link" > < span class = "function-syntax" > Lists::kind_of_ll< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ll< / 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" > problem_count< / span > < span class = "plain-syntax" > == < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > ) < / span > < span class = "named-paragraph-container code-font" > < a href = "18-lc.html#SP12_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Actually compile the list array< / span > < span class = "named-paragraph-number" > 12.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-05-03 03:01:21 +03:00
< p class = "commentary firstcommentary" > < a id = "SP12_1" > < / a > < b > § 12.1. < / b > These are I6 word arrays, with the contents:
2019-03-17 14:40:57 +02:00
< / p >
< ul class = "items" > < li > (a) a zero word, used as a flag at run-time;
< / li > < li > (b) the strong kind ID of the kind of entry the list holds (not the kind of
the list!);
< / li > < li > (c) the number of entries in the list; and
< / li > < li > (d) that number of values, each representing one entry.
< / li > < / ul >
2020-05-03 03:01:21 +03:00
< p class = "commentary" > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Actually compile the list array< / span > < span class = "named-paragraph-number" > 12.1< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
2019-03-17 14:40:57 +02:00
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > packaging_state< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > save< / span > < span class = "plain-syntax" > = < / span > < a href = "27-em.html#SP3" class = "function-link" > < span class = "function-syntax" > Emit::named_array_begin< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > ll_iname< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > llist_entry< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > lle< / 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" > n< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > for< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > lle< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > first_llist_entry< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > lle< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > lle< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > lle< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > next_llist_entry< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > n< / span > < span class = "plain-syntax" > ++;< / span >
2019-03-17 14:40:57 +02:00
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < a href = "13-rsfk.html#SP20" class = "function-link" > < span class = "function-syntax" > Kinds::RunTime::emit_block_value_header< / span > < / a > < span class = "plain-syntax" > (< / span > < a href = "18-lc.html#SP8" class = "function-link" > < span class = "function-syntax" > Lists::kind_of_ll< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > FALSE< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > TRUE< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > n< / span > < span class = "plain-syntax" > +2);< / span >
2019-03-17 14:40:57 +02:00
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < a href = "13-rsfk.html#SP12" class = "function-link" > < span class = "function-syntax" > Kinds::RunTime::emit_strong_id< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > entry_kind< / span > < span class = "plain-syntax" > );< / span >
2019-03-17 14:40:57 +02:00
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < a href = "27-em.html#SP3" class = "function-link" > < span class = "function-syntax" > Emit::array_numeric_entry< / span > < / a > < span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > inter_t< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > n< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > for< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > lle< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > first_llist_entry< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > lle< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > lle< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > lle< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > next_llist_entry< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < a href = "14-cfs.html#SP9" class = "function-link" > < span class = "function-syntax" > Specifications::Compiler::emit_constant_to_kind< / span > < / a > < span class = "plain-syntax" > (< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > lle< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > llist_entry_value< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > ll< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > entry_kind< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "27-em.html#SP3" class = "function-link" > < span class = "function-syntax" > Emit::array_end< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > save< / span > < span class = "plain-syntax" > );< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-05-03 03:01:21 +03:00
< ul class = "endnotetexts" > < li > This code is used in < a href = "18-lc.html#SP12" > § 12< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP13" > < / a > < b > § 13. < / b > The default list of any given kind is empty.
2019-03-17 14:40:57 +02:00
< / p >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > Lists::compile_default_list< / 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" > Lists::compile_default_list< / span > < / span > :< br / > Runtime Support for Kinds - < a href = "13-rsfk.html#SP16_2" > § 16.2< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > inter_name< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > identifier< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > kind< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > packaging_state< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > save< / span > < span class = "plain-syntax" > = < / span > < a href = "27-em.html#SP3" class = "function-link" > < span class = "function-syntax" > Emit::named_array_begin< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > identifier< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > K_value< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "13-rsfk.html#SP20" class = "function-link" > < span class = "function-syntax" > Kinds::RunTime::emit_block_value_header< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > TRUE< / span > < span class = "plain-syntax" > , < / span > < span class = "constant-syntax" > 2< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "13-rsfk.html#SP12" class = "function-link" > < span class = "function-syntax" > Kinds::RunTime::emit_strong_id< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Kinds::unary_construction_material< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > K< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < a href = "27-em.html#SP3" class = "function-link" > < span class = "function-syntax" > Emit::array_numeric_entry< / span > < / a > < span class = "plain-syntax" > (0);< / span >
< span class = "plain-syntax" > < / span > < a href = "27-em.html#SP3" class = "function-link" > < span class = "function-syntax" > Emit::array_end< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > save< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-05-03 03:01:21 +03:00
< nav role = "progress" > < div class = "progresscontainer" >
2020-05-03 18:34:53 +03:00
< ul class = "progressbar" > < li class = "progressprev" > < a href = "17-rs.html" > ❮ < / a > < / li > < li class = "progresschapter" > < a href = "P-wtmd.html" > P< / a > < / li > < li class = "progresschapter" > < a href = "1-cm.html" > 1< / a > < / li > < li class = "progresschapter" > < a href = "2-up.html" > 2< / a > < / li > < li class = "progresschapter" > < a href = "3-nl.html" > 3< / a > < / li > < li class = "progresschapter" > < a href = "4-its.html" > 4< / a > < / li > < li class = "progresschapter" > < a href = "5-lp.html" > 5< / a > < / li > < li class = "progresschapter" > < a href = "6-bp.html" > 6< / a > < / li > < li class = "progresschapter" > < a href = "7-ptu.html" > 7< / a > < / li > < li class = "progresschapter" > < a href = "8-ef.html" > 8< / a > < / li > < li class = "progresschapter" > < a href = "9-ita.html" > 9< / a > < / li > < li class = "progresschapter" > < a href = "10-aots.html" > 10< / a > < / li > < li class = "progresschapter" > < a href = "11-itpc.html" > 11< / a > < / li > < li class = "progresschapter" > < a href = "12-ter.html" > 12< / a > < / li > < li class = "progresschapter" > < a href = "13-kak.html" > 13< / a > < / li > < li class = "progresschapter" > < a href = "14-sp.html" > 14< / a > < / li > < li class = "progresschapter" > < a href = "15-pr.html" > 15< / a > < / li > < li class = "progresschapter" > < a href = "16-is.html" > 16< / a > < / li > < li class = "progresschapter" > < a href = "17-tl.html" > 17< / a > < / li > < li class = "progresscurrentchapter" > 18< / li > < li class = "progresscurrent" > lc< / li > < li class = "progresschapter" > < a href = "19-tc.html" > 19< / a > < / li > < li class = "progresschapter" > < a href = "20-eq.html" > 20< / a > < / li > < li class = "progresschapter" > < a href = "21-rl.html" > 21< / a > < / li > < li class = "progresschapter" > < a href = "22-itp.html" > 22< / a > < / li > < li class = "progresschapter" > < a href = "23-ad.html" > 23< / a > < / li > < li class = "progresschapter" > < a href = "24-lv.html" > 24< / a > < / li > < li class = "progresschapter" > < a href = "25-in.html" > 25< / a > < / li > < li class = "progresschapter" > < a href = "26-fc.html" > 26< / a > < / li > < li class = "progresschapter" > < a href = "27-hr.html" > 27< / a > < / li > < li class = "progressnext" > < a href = "19-tc.html" > ❯ < / a > < / li > < / ul > < / div >
2020-05-03 03:01:21 +03:00
< / nav > <!-- End of weave -->
2019-03-17 14:40:57 +02:00
2020-03-19 02:11:25 +02:00
< / main >
2019-03-17 14:40:57 +02:00
< / body >
< / html >
