2019-07-25 12:19:54 +03:00
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
< html >
< head >
2020-04-14 19:56:54 +03:00
< title > Inter Node Lists< / 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-07-25 12:19:54 +03:00
< meta http-equiv = "Content-Type" content = "text/html; charset=utf-8" >
< meta http-equiv = "Content-Language" content = "en-gb" >
2020-05-03 03:01:21 +03:00
2020-05-03 03:20:55 +03:00
< link href = "../docs-assets/Contents.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Progress.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Navigation.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Fonts.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Base.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
2020-05-03 03:01:21 +03:00
< script >
function togglePopup(material_id) {
var popup = document.getElementById(material_id);
popup.classList.toggle("show");
}
< / script >
2020-05-03 03:20:55 +03:00
< link href = "../docs-assets/Popups.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Colours.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
2020-04-14 19:56:54 +03:00
2019-07-25 12:19:54 +03:00
< / head >
2020-05-03 03:01:21 +03:00
< body class = "commentary-font" >
2020-03-19 02:11:25 +02:00
< nav role = "navigation" >
2020-04-14 19:56:54 +03:00
< h1 > < a href = "../index.html" >
2020-05-03 18:34:53 +03:00
< img src = "../docs-assets/Inform.png" height = 72" >
2020-04-14 19:56:54 +03:00
< / a > < / h1 >
< ul > < li > < a href = "../compiler.html" > compiler tools< / a > < / li >
2020-03-19 02:11:25 +02:00
< li > < a href = "../other.html" > other tools< / a > < / li >
< li > < a href = "../extensions.html" > extensions and kits< / a > < / li >
< li > < a href = "../units.html" > unit test tools< / a > < / li >
2020-04-14 19:56:54 +03:00
< / ul > < h2 > Compiler Webs< / h2 > < ul >
2020-03-19 02:11:25 +02:00
< li > < a href = "../inbuild/index.html" > inbuild< / a > < / li >
< li > < a href = "../inform7/index.html" > inform7< / a > < / li >
< li > < a href = "../inter/index.html" > inter< / a > < / li >
2020-04-14 19:56:54 +03:00
< / ul > < h2 > Inbuild Modules< / h2 > < ul >
< li > < a href = "../supervisor-module/index.html" > supervisor< / a > < / li >
< / ul > < h2 > Inform7 Modules< / h2 > < ul >
2020-03-19 02:11:25 +02:00
< li > < a href = "../core-module/index.html" > core< / a > < / li >
2020-08-27 17:50:24 +03:00
< li > < a href = "../assertions-module/index.html" > assertions< / a > < / li >
< li > < a href = "../values-module/index.html" > values< / a > < / li >
< li > < a href = "../knowledge-module/index.html" > knowledge< / a > < / li >
< li > < a href = "../imperative-module/index.html" > imperative< / a > < / li >
< li > < a href = "../runtime-module/index.html" > runtime< / a > < / li >
2020-03-19 02:11:25 +02:00
< li > < a href = "../if-module/index.html" > if< / a > < / li >
< li > < a href = "../multimedia-module/index.html" > multimedia< / a > < / li >
< li > < a href = "../index-module/index.html" > index< / a > < / li >
2020-04-14 19:56:54 +03:00
< / ul > < h2 > Inter Modules< / h2 > < ul >
< li > < a href = "index.html" > < span class = "selectedlink" > bytecode< / span > < / a > < / li >
2020-03-19 02:11:25 +02:00
< li > < a href = "../building-module/index.html" > building< / a > < / li >
2021-08-10 13:01:03 +03:00
< li > < a href = "../pipeline-module/index.html" > pipeline< / a > < / li >
< li > < a href = "../final-module/index.html" > final< / a > < / li >
2020-05-20 02:02:28 +03:00
< / ul > < h2 > Services< / h2 > < ul >
2020-04-14 19:56:54 +03:00
< li > < a href = "../arch-module/index.html" > arch< / a > < / li >
2020-08-27 17:50:24 +03:00
< li > < a href = "../calculus-module/index.html" > calculus< / a > < / li >
2020-04-14 19:56:54 +03:00
< li > < a href = "../html-module/index.html" > html< / a > < / li >
2020-05-20 02:02:28 +03:00
< li > < a href = "../inflections-module/index.html" > inflections< / a > < / li >
2020-08-27 17:50:24 +03:00
< li > < a href = "../kinds-module/index.html" > kinds< / a > < / li >
2020-05-20 02:02:28 +03:00
< li > < a href = "../linguistics-module/index.html" > linguistics< / a > < / li >
< li > < a href = "../problems-module/index.html" > problems< / a > < / li >
2020-08-27 17:50:24 +03:00
< li > < a href = "../syntax-module/index.html" > syntax< / a > < / li >
< li > < a href = "../words-module/index.html" > words< / a > < / li >
2020-03-19 02:11:25 +02:00
< li > < a href = "../../../inweb/docs/foundation-module/index.html" > foundation< / a > < / li >
2020-04-14 19:56:54 +03:00
< / ul >
2020-03-19 02:11:25 +02:00
< / nav >
< main role = "main" >
2020-05-03 03:01:21 +03:00
<!-- Weave of 'Inter Node Lists' generated by Inweb -->
< div class = "breadcrumbs" >
2022-02-07 00:33:07 +02:00
< ul class = "crumbs" > < li > < a href = "../index.html" > Home< / a > < / li > < li > < a href = "../compiler.html" > Inter Modules< / a > < / li > < li > < a href = "index.html" > bytecode< / a > < / li > < li > < a href = "index.html#2" > Chapter 2: The Trees< / a > < / li > < li > < b > Inter Node Lists< / b > < / li > < / ul > < / div >
2022-02-03 01:35:38 +02:00
< p class = "purpose" > Utility functions to store lists of nodes, either as linked lists or flexibly-sized arrays.< / p >
2020-05-03 03:01:21 +03:00
2022-02-03 01:35:38 +02:00
< ul class = "toc" > < li > < a href = "2-inl.html#SP1" > § 1. Unsortable lists< / a > < / li > < li > < a href = "2-inl.html#SP3" > § 3. Sortable lists< / a > < / li > < / ul > < hr class = "tocbar" >
< p class = "commentary firstcommentary" > < a id = "SP1" class = "paragraph-anchor" > < / a > < b > § 1. Unsortable lists. < / b > Well, these are short and sweet. An < a href = "2-inl.html#SP1" class = "internal" > inter_node_list< / a > is just an efficiently
stored linked list of //inter_tree_node//s.
< / 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" > inter_node_list< / span > < span class = "plain-syntax" > {< / span >
2022-02-03 01:35:38 +02:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > linked_list< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > the_nodes< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment-syntax" > of < / span > < span class = "extract" > < span class = "extract-syntax" > inter_tree_node< / span > < / 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" > inter_node_list< / span > < span class = "plain-syntax" > ;< / span >
2022-02-14 01:44:50 +02:00
< span class = "reserved-syntax" > inter_node_list< / span > < span class = "plain-syntax" > *< / span > < span class = "function-syntax" > InterNodeList::new< / 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" > InterNodeList::new< / span > < / span > :< br / > The Warehouse - < a href = "2-tw.html#SP10" > § 10< / a > < br / > Inter in Binary Files - < a href = "3-iibf.html#SP9_1_3_2_4" > § 9.1.3.2.4< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > ) {< / span >
2022-02-03 01:35:38 +02:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > inter_node_list< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > ifl< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > CREATE< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > inter_node_list< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > ifl< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > the_nodes< / 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" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > ifl< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2022-03-11 13:15:11 +02:00
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > InterNodeList::add< / 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" > InterNodeList::add< / span > < / span > :< br / > The Permission Construct - < a href = "4-tpc3.html#SP3" > § 3< / a > < br / > The PropertyValue Construct - < a href = "4-tpc7.html#SP2" > § 2< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > inter_node_list< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > FL< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > inter_tree_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > F< / span > < span class = "plain-syntax" > ) {< / span >
2022-02-03 01:35:38 +02:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > F< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > internal_error< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "linked invalid node"< / 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" > FL< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > internal_error< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "bad node 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" > FL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > the_nodes< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > FL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > the_nodes< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > NEW_LINKED_LIST< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > inter_tree_node< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > ADD_TO_LINKED_LIST< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > F< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > inter_tree_node< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > FL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > the_nodes< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
2019-07-25 12:19:54 +03:00
< / pre >
2022-02-03 01:35:38 +02:00
< ul class = "endnotetexts" > < li > The structure inter_node_list is private to this section.< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP2" class = "paragraph-anchor" > < / a > < b > § 2. < / b > We can do two things with these: test them for emptiness, and loop through
them. And that's it.
< / p >
2019-07-25 12:19:54 +03:00
2020-05-03 03:01:21 +03:00
< pre class = "definitions code-font" > < span class = "definition-keyword" > define< / span > < span class = "identifier-syntax" > LOOP_THROUGH_INTER_NODE_LIST< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > F< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > ifl< / span > < span class = "plain-syntax" > )< / span >
2022-02-03 01:35:38 +02:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > ifl< / span > < span class = "plain-syntax" > ) & & (< / span > < span class = "identifier-syntax" > ifl< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > the_nodes< / span > < span class = "plain-syntax" > ))< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > LOOP_OVER_LINKED_LIST< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > F< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > inter_tree_node< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > ifl< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > the_nodes< / span > < span class = "plain-syntax" > )< / span >
2019-07-25 12:19:54 +03:00
< / pre >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
2022-02-03 01:35:38 +02:00
< span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > InterNodeList::empty< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > inter_node_list< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > FL< / 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" > FL< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ) < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > 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" > LinkedLists::len< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > FL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > the_nodes< / span > < span class = "plain-syntax" > ) == < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > ) < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "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" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
< p class = "commentary firstcommentary" > < a id = "SP3" class = "paragraph-anchor" > < / a > < b > § 3. Sortable lists. < / b > Unlike an < a href = "2-inl.html#SP1" class = "internal" > inter_node_list< / a > , an < a href = "2-inl.html#SP3" class = "internal" > inter_node_array< / a > has entries which are
accessible in O(1) time, and can easily be sorted; but it takes more memory.
< / p >
< 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" > inter_node_array< / 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" > list_extent< / 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" > list_used< / 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" > ina_entry< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > list< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > CLASS_DEFINITION< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > inter_node_array< / span > < span class = "plain-syntax" > ;< / span >
< span class = "reserved-syntax" > typedef< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > ina_entry< / 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" > sort_key< / 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" > inter_tree_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > node< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > ina_entry< / span > < span class = "plain-syntax" > ;< / span >
< / pre >
< ul class = "endnotetexts" > < li > The structure inter_node_array is private to this section.< / li > < li > The structure ina_entry is private to this section.< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP4" class = "paragraph-anchor" > < / a > < b > § 4. < / b > < / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > inter_node_array< / span > < span class = "plain-syntax" > *< / span > < span class = "function-syntax" > InterNodeList::new_array< / span > < 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" > inter_node_array< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > NL< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > CREATE< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > inter_node_array< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > NL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list_extent< / 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" > NL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list_used< / 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" > NL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list< / 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" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > NL< / span > < span class = "plain-syntax" > ;< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > }< / span >
2022-02-03 01:35:38 +02:00
< span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > InterNodeList::array_len< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > inter_node_array< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > NL< / 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" > NL< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > internal_error< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "null inter_node_array"< / 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" > NL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list_used< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
< p class = "commentary firstcommentary" > < a id = "SP5" class = "paragraph-anchor" > < / a > < b > § 5. < / b > These are expected to be fairly large, so the capacity starts out at 128 and
quadruples each time this is exhausted:
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > InterNodeList::array_add< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > inter_node_array< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > NL< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > inter_tree_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > NL< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > internal_error< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "null inter_node_array"< / 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" > NL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list_extent< / 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" > NL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list_extent< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > 256< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > NL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list< / span > < span class = "plain-syntax" > = (< / span > < span class = "reserved-syntax" > ina_entry< / span > < span class = "plain-syntax" > *)< / span >
< span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Memory::calloc< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > NL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list_extent< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > sizeof< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > ina_entry< / span > < span class = "plain-syntax" > ), < / span > < span class = "constant-syntax" > TREE_LIST_MREASON< / 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" > NL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list_used< / span > < span class = "plain-syntax" > > = < / span > < span class = "identifier-syntax" > NL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list_extent< / 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" > old_extent< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > NL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list_extent< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > NL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list_extent< / span > < span class = "plain-syntax" > *= < / span > < span class = "constant-syntax" > 4< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > ina_entry< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > new_list< / span > < span class = "plain-syntax" > = (< / span > < span class = "reserved-syntax" > ina_entry< / span > < span class = "plain-syntax" > *)< / span >
< span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Memory::calloc< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > NL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list_extent< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > sizeof< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > ina_entry< / span > < span class = "plain-syntax" > ), < / span > < span class = "constant-syntax" > TREE_LIST_MREASON< / span > < span class = "plain-syntax" > ));< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > for< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > =0; < / span > < span class = "identifier-syntax" > i< / span > < span class = "function-syntax" > < NL-> < / span > < span class = "element-syntax" > list_used< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > ++)< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > new_list< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > ] = < / span > < span class = "identifier-syntax" > NL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > i< / span > < span class = "plain-syntax" > ];< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Memory::I7_free< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > NL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list< / span > < span class = "plain-syntax" > , < / span > < span class = "constant-syntax" > TREE_LIST_MREASON< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > old_extent< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > NL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > new_list< / span > < span class = "plain-syntax" > ;< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > }< / span >
2022-02-03 01:35:38 +02:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > NL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > NL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list_used< / span > < span class = "plain-syntax" > ].< / span > < span class = "element-syntax" > sort_key< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > NL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list_used< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > NL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list< / span > < span class = "plain-syntax" > [< / span > < span class = "identifier-syntax" > NL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list_used< / span > < span class = "plain-syntax" > ++].< / span > < span class = "element-syntax" > node< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
< p class = "commentary firstcommentary" > < a id = "SP6" class = "paragraph-anchor" > < / a > < b > § 6. < / b > Note that this defers to the sorting method supplied in < span class = "extract" > < span class = "extract-syntax" > cmp< / span > < / span > ; that might
choose to use the < span class = "extract" > < span class = "extract-syntax" > sort_key< / span > < / span > value, or might not. < span class = "extract" > < span class = "extract-syntax" > sort_key< / span > < / span > is initialised to
be the original position in the array, because that can then be used as a last
resort to ensure that the sorting algorithm is stable; most implementations
of < span class = "extract" > < span class = "extract-syntax" > qsort< / span > < / span > in the C standard library are variations on quicksort and are unstable.
< / p >
2020-05-03 03:01:21 +03:00
2022-02-03 01:35:38 +02: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" > InterNodeList::array_sort< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > inter_node_array< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > NL< / 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" > cmp< / span > < span class = "plain-syntax" > )(< / span > < span class = "reserved-syntax" > const< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > *, < / span > < span class = "reserved-syntax" > const< / span > < 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" > NL< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > internal_error< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "null inter_node_array"< / 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" > NL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list_used< / 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" > qsort< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > NL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list< / span > < span class = "plain-syntax" > , (< / span > < span class = "identifier-syntax" > size_t< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > NL< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > list_used< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > sizeof< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > ina_entry< / span > < span class = "plain-syntax" > ), < / span > < span class = "identifier-syntax" > cmp< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > }< / span >
2019-07-25 12:19:54 +03:00
< / pre >
2020-05-03 03:01:21 +03:00
< nav role = "progress" > < div class = "progresscontainer" >
2022-03-08 01:06:30 +02:00
< ul class = "progressbar" > < li class = "progressprev" > < a href = "2-pck.html" > ❮ < / a > < / li > < li class = "progresschapter" > < a href = "P-wtmd.html" > P< / a > < / li > < li class = "progresschapter" > < a href = "1-bm.html" > 1< / a > < / li > < li class = "progresscurrentchapter" > 2< / li > < li class = "progresssection" > < a href = "2-it.html" > it< / a > < / li > < li class = "progresssection" > < a href = "2-in.html" > in< / a > < / li > < li class = "progresssection" > < a href = "2-bkm.html" > bkm< / a > < / li > < li class = "progresssection" > < a href = "2-np.html" > np< / a > < / li > < li class = "progresssection" > < a href = "2-tw.html" > tw< / a > < / li > < li class = "progresssection" > < a href = "2-pck.html" > pck< / a > < / li > < li class = "progresscurrent" > inl< / li > < li class = "progresssection" > < a href = "2-st.html" > st< / a > < / li > < li class = "progresssection" > < a href = "2-sym.html" > sym< / a > < / li > < li class = "progresssection" > < a href = "2-ann.html" > ann< / a > < / li > < li class = "progresssection" > < a href = "2-tw2.html" > tw2< / a > < / li > < li class = "progresssection" > < a href = "2-trn.html" > trn< / a > < / li > < li class = "progresschapter" > < a href = "3-ic.html" > 3< / a > < / li > < li class = "progresschapter" > < a href = "4-tac.html" > 4< / a > < / li > < li class = "progresschapter" > < a href = "5-tac.html" > 5< / a > < / li > < li class = "progresschapter" > < a href = "6-tpc.html" > 6< / a > < / li > < li class = "progressnext" > < a href = "2-st.html" > ❯ < / a > < / li > < / ul > < / div >
2020-05-03 03:01:21 +03:00
< / nav > <!-- End of weave -->
2019-07-25 12:19:54 +03:00
2020-03-19 02:11:25 +02:00
< / main >
2019-07-25 12:19:54 +03:00
< / body >
< / html >