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-08-01 13:35:56 +03:00
< title > Compilation Units< / 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-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 >
2020-08-26 12:52:50 +03:00
< li > < a href = "../core-module/index.html" > core< / a > < / li >
< li > < a href = "../assertions-module/index.html" > assertions< / a > < / li >
< li > < a href = "../values-module/index.html" > values< / a > < / li >
< li > < a href = "../knowledge-module/index.html" > knowledge< / a > < / li >
< li > < a href = "../imperative-module/index.html" > imperative< / a > < / li >
< li > < a href = "index.html" > < span class = "selectedlink" > runtime< / span > < / a > < / li >
2020-03-19 02:11:25 +02:00
< li > < a href = "../if-module/index.html" > if< / a > < / li >
< li > < a href = "../multimedia-module/index.html" > multimedia< / a > < / li >
< li > < a href = "../index-module/index.html" > index< / a > < / li >
2020-04-14 19:56:54 +03:00
< / ul > < h2 > Inter Modules< / h2 > < ul >
< li > < a href = "../bytecode-module/index.html" > bytecode< / a > < / li >
2020-03-19 02:11:25 +02:00
< li > < a href = "../building-module/index.html" > building< / a > < / li >
< li > < a href = "../codegen-module/index.html" > codegen< / 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-20 01:36:18 +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-20 01:36:18 +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-20 01:36:18 +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-08-01 13:35:56 +03:00
<!-- Weave of 'Compilation Units' generated by Inweb -->
2020-05-03 03:01:21 +03:00
< div class = "breadcrumbs" >
2021-02-06 20:00:34 +02:00
< ul class = "crumbs" > < li > < a href = "../index.html" > Home< / a > < / li > < li > < a href = "../compiler.html" > Inform7< / a > < / li > < li > < a href = "index.html" > runtime< / a > < / li > < li > < a href = "index.html#2" > Chapter 2: Emission< / a > < / li > < li > < b > Compilation Units< / b > < / li > < / ul > < / div >
2020-05-03 03:01:21 +03:00
< p class = "purpose" > To identify which parts of the source text come from which source (the main source text, the Standard Rules, or another extension).< / p >
2019-04-22 17:06:29 +03:00
2020-08-26 12:52:50 +03:00
< ul class = "toc" > < li > < a href = "2-cu.html#SP6" > § 6. Current unit< / a > < / li > < li > < a href = "2-cu.html#SP7" > § 7. Relating to Inter< / a > < / li > < / ul > < hr class = "tocbar" >
2019-04-22 17:06:29 +03:00
2020-08-18 00:57:45 +03:00
< p class = "commentary firstcommentary" > < a id = "SP1" class = "paragraph-anchor" > < / a > < b > § 1. < / b > Inform is a language in which it is semantically relevant which source file the
2020-05-03 03:01:21 +03:00
source text is coming from: unlike, say, C, where < span class = "extract" > < span class = "extract-syntax" > #include< / span > < / span > allows files to include
2019-04-22 17:06:29 +03:00
each other in arbitrary ways. In Inform, all source text comes from one of the
following places:
< / p >
< ul class = "items" > < li > (a) The main source text, as shown in the Source panel of the UI app;
< / li > < li > (b) An extension file, including the Standard Rules extension;
< / li > < li > (c) Invented text created by the compiler itself.
< / li > < / ul >
2020-08-01 13:35:56 +03:00
< p class = "commentary" > The Inter hierarchy also splits, with named units representing each possibility
in (a) or (b) above. This section of code determines to which unit any new
2019-04-22 17:06:29 +03:00
definition (of, say, a property or kind) belongs.
< / 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" >
2020-08-01 13:35:56 +03:00
< span class = "identifier-syntax" > compilation_unit< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > source_text_unit< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ; < / span > < span class = "comment-syntax" > the one for the main text< / span >
2019-03-17 14:40:57 +02:00
< / pre >
2020-08-18 00:57:45 +03:00
< p class = "commentary firstcommentary" > < a id = "SP2" class = "paragraph-anchor" > < / a > < b > § 2. < / b > We find these by performing a traverse of the parse tree, and looking for
2019-04-22 17:06:29 +03:00
level-0 headings, which are the nodes from which these blocks of source text hang:
< / 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" >
2020-08-26 12:52:50 +03:00
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CompilationUnits::determine< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > SyntaxTree::traverse< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Task::syntax_tree< / span > < span class = "plain-syntax" > (), < / span > < a href = "2-cu.html#SP2" class = "function-link" > < span class = "function-syntax" > CompilationUnits::look_for_cu< / span > < / a > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > }< / span >
2020-08-01 13:35:56 +03:00
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CompilationUnits::look_for_cu< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > parse_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > p< / span > < span class = "plain-syntax" > ) {< / span >
2020-05-11 17:21:29 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Node::get_type< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > p< / span > < span class = "plain-syntax" > ) == < / span > < span class = "identifier-syntax" > HEADING_NT< / span > < span class = "plain-syntax" > ) {< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > heading< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > h< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Headings::from_node< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > p< / span > < span class = "plain-syntax" > );< / span >
2020-08-26 12:52:50 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > h< / span > < span class = "plain-syntax" > ) & & (< / span > < span class = "identifier-syntax" > h< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > level< / span > < span class = "plain-syntax" > == < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > )) < / span > < a href = "2-cu.html#SP2" class = "function-link" > < span class = "function-syntax" > CompilationUnits::new< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > p< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
2020-08-01 13:35:56 +03:00
< span class = "identifier-syntax" > compilation_unit< / span > < span class = "plain-syntax" > *< / span > < span class = "function-syntax" > CompilationUnits::new< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > parse_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > from< / span > < span class = "plain-syntax" > ) {< / span >
2020-05-11 17:21:29 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > source_location< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > sl< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Wordings::location< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Node::get_text< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > from< / span > < span class = "plain-syntax" > ));< / span >
2020-05-07 18:44:07 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > sl< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > file_of_origin< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ) < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ;< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inform_extension< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > owner< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Extensions::corresponding_to< / span > < span class = "plain-syntax" > (< / span >
2020-05-11 17:21:29 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Lexer::file_of_origin< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Wordings::first_wn< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Node::get_text< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > from< / span > < span class = "plain-syntax" > ))));< / span >
2020-05-03 03:01:21 +03:00
2020-08-01 13:35:56 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > compilation_unit< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > C< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Packaging::new_cu< / span > < span class = "plain-syntax" > ();< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > C< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > hanging_from< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > from< / span > < span class = "plain-syntax" > ;< / span >
2020-08-01 13:35:56 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Node::set_unit< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > from< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > C< / span > < span class = "plain-syntax" > );< / span >
2020-08-26 12:52:50 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-cu.html#SP4" class = "function-link" > < span class = "function-syntax" > CompilationUnits::propagate_downwards< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > from< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > down< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > C< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
2020-06-28 01:18:54 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > TEMPORARY_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pname< / span > < span class = "plain-syntax" > )< / span >
2020-08-26 12:52:50 +03:00
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "2-cu.html#SP2_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Compose a name for the unit package this will lead to< / span > < span class = "named-paragraph-number" > 2.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > C< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > inter_presence< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Packaging::get_unit< / span > < span class = "plain-syntax" > (< / span > < a href = "2-emt.html#SP2" class = "function-link" > < span class = "function-syntax" > Emit::tree< / span > < / a > < span class = "plain-syntax" > (), < / span > < span class = "identifier-syntax" > pname< / span > < span class = "plain-syntax" > );< / span >
2020-06-28 01:18:54 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > DISCARD_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pname< / span > < span class = "plain-syntax" > )< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > owner< / span > < span class = "plain-syntax" > ) {< / span >
2020-08-26 12:52:50 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-hrr.html#SP4" class = "function-link" > < span class = "function-syntax" > Hierarchy::markup< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > C< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > inter_presence< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > the_package< / span > < span class = "plain-syntax" > , < / span > < span class = "constant-syntax" > EXT_AUTHOR_HMD< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > owner< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > as_copy< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > edition< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > work< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > raw_author_name< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "2-hrr.html#SP4" class = "function-link" > < span class = "function-syntax" > Hierarchy::markup< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > C< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > inter_presence< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > the_package< / span > < span class = "plain-syntax" > , < / span > < span class = "constant-syntax" > EXT_TITLE_HMD< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > owner< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > as_copy< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > edition< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > work< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > raw_title< / span > < span class = "plain-syntax" > );< / span >
2020-06-28 01:18:54 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > TEMPORARY_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > V< / span > < span class = "plain-syntax" > )< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > semantic_version_number< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > owner< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > as_copy< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > edition< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > version< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE_TO< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > V< / span > < span class = "plain-syntax" > , < / span > < span class = "string-syntax" > "%v"< / span > < span class = "plain-syntax" > , & < / span > < span class = "identifier-syntax" > N< / span > < span class = "plain-syntax" > );< / span >
2020-08-26 12:52:50 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-hrr.html#SP4" class = "function-link" > < span class = "function-syntax" > Hierarchy::markup< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > C< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > inter_presence< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > the_package< / span > < span class = "plain-syntax" > , < / span > < span class = "constant-syntax" > EXT_VERSION_HMD< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > V< / span > < span class = "plain-syntax" > );< / span >
2020-06-28 01:18:54 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > DISCARD_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > V< / span > < span class = "plain-syntax" > )< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > }< / span >
2020-08-01 13:35:56 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > owner< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > source_text_unit< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > C< / span > < span class = "plain-syntax" > ;< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > C< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2019-04-22 17:06:29 +03:00
< / pre >
2020-08-18 00:57:45 +03:00
< p class = "commentary firstcommentary" > < a id = "SP2_1" class = "paragraph-anchor" > < / a > < b > § 2.1. < / b > Here we must find a unique name, valid as an Inter identifier: the code
2020-08-01 13:35:56 +03:00
compiled from the compilation unit will go into a package of that name.
2019-04-22 17:06:29 +03:00
< / p >
2020-08-01 13:35:56 +03:00
< p class = "commentary" > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Compose a name for the unit package this will lead to< / span > < span class = "named-paragraph-number" > 2.1< / span > < / span > < span class = "comment-syntax" > =< / span >
2020-05-03 03:01:21 +03:00
< / p >
2019-04-22 17:06:29 +03: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" > Extensions::is_standard< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > owner< / span > < span class = "plain-syntax" > )) < / span > < span class = "identifier-syntax" > WRITE_TO< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pname< / span > < span class = "plain-syntax" > , < / span > < span class = "string-syntax" > "standard_rules"< / 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" > owner< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > WRITE_TO< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pname< / span > < span class = "plain-syntax" > , < / span > < span class = "string-syntax" > "source_text"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE_TO< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pname< / span > < span class = "plain-syntax" > , < / span > < span class = "string-syntax" > "%X"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > owner< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > as_copy< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > edition< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > work< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > LOOP_THROUGH_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pos< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > pname< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Str::get< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pos< / span > < span class = "plain-syntax" > ) == < / span > < span class = "character-syntax" > ' '< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Str::put< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pos< / span > < span class = "plain-syntax" > , < / span > < span class = "character-syntax" > '_'< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Str::put< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pos< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > Characters::tolower< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Str::get< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > pos< / span > < span class = "plain-syntax" > )));< / span >
< span class = "plain-syntax" > }< / span >
2019-04-22 17:06:29 +03:00
< / pre >
2020-08-26 12:52:50 +03:00
< ul class = "endnotetexts" > < li > This code is used in < a href = "2-cu.html#SP2" > § 2< / a > .< / li > < / ul >
2020-08-18 00:57:45 +03:00
< p class = "commentary firstcommentary" > < a id = "SP3" class = "paragraph-anchor" > < / a > < b > § 3. < / b > We are eventually going to need to be able to look at a given node in the parse
2020-08-01 13:35:56 +03:00
tree and say which compilation unit it belongs to. If there were a fast way
2019-04-22 17:06:29 +03:00
to go up in the tree, that would be easy — we could simply run upward until we
reach a level-0 heading. But the node links all run downwards. Instead, we'll
2020-08-01 13:35:56 +03:00
"mark" nodes in the tree, annotating them with the compilation unit which owns
2019-04-25 11:44:40 +03:00
them. This is done by "propagating downwards", as follows.
2019-04-22 17:06:29 +03:00
< / p >
2020-08-18 00:57:45 +03:00
< p class = "commentary firstcommentary" > < a id = "SP4" class = "paragraph-anchor" > < / a > < b > § 4. < / b > < / 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" >
2020-08-26 12:52:50 +03:00
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CompilationUnits::propagate_downwards< / 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" > CompilationUnits::propagate_downwards< / span > < / span > :< br / > < a href = "2-cu.html#SP2" > § 2< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > parse_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > compilation_unit< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > C< / span > < span class = "plain-syntax" > ) {< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > while< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > ) {< / span >
2020-08-01 13:35:56 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Node::set_unit< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > C< / span > < span class = "plain-syntax" > );< / span >
2020-08-26 12:52:50 +03:00
< span class = "plain-syntax" > < / span > < a href = "2-cu.html#SP4" class = "function-link" > < span class = "function-syntax" > CompilationUnits::propagate_downwards< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > down< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > C< / span > < span class = "plain-syntax" > );< / span >
2021-02-20 01:20:09 +02:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > next< / span > < span class = "plain-syntax" > ;< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
2019-04-22 17:06:29 +03:00
< / pre >
2020-08-18 00:57:45 +03:00
< p class = "commentary firstcommentary" > < a id = "SP5" class = "paragraph-anchor" > < / a > < b > § 5. < / b > As promised, then, given a parse node, we have to return its compilation unit:
2019-04-22 17:06:29 +03:00
but that's now easy, as we just have to read off the annotation made above —
< / p >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
2021-04-11 23:41:26 +03:00
< span class = "identifier-syntax" > compilation_unit< / span > < span class = "plain-syntax" > *< / span > < span class = "function-syntax" > CompilationUnits::find< / 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" > CompilationUnits::find< / span > < / span > :< br / > < a href = "2-cu.html#SP6" > § 6< / a > < br / > Hierarchy - < a href = "2-hrr.html#SP4" > § 4< / a > < br / > Variables - < a href = "5-vrb.html#SP6" > § 6< / a > < br / > Properties - < a href = "5-prp.html#SP1" > § 1< / a > < br / > Verbs at Run Time - < a href = "5-vart.html#SP2" > § 2< / a > < br / > Relations at Run Time - < a href = "5-rart.html#SP1" > § 1< / a > < br / > Runtime Support for Tables - < a href = "5-rsft.html#SP3" > § 3< / a > < br / > General Parsing Routines - < a href = "8-gpr.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" > from< / span > < span class = "plain-syntax" > ) {< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > from< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ) < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ;< / span >
2020-08-01 13:35:56 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Node::get_unit< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > from< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > }< / span >
2019-04-22 17:06:29 +03:00
< / pre >
2020-08-18 00:57:45 +03:00
< p class = "commentary firstcommentary" > < a id = "SP6" class = "paragraph-anchor" > < / a > < b > § 6. Current unit. < / b > Inform has a concept of the "current unit" it's working on, much as it has
2019-04-22 17:06:29 +03:00
a concept of "current sentence".
< / p >
2020-05-03 03:01:21 +03:00
< pre class = "displayed-code all-displayed-code code-font" >
2020-08-01 13:35:56 +03:00
< span class = "identifier-syntax" > compilation_unit< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > current_CM< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ;< / span >
2019-03-17 14:40:57 +02:00
2021-04-11 18:42:37 +03:00
< span class = "identifier-syntax" > compilation_unit< / span > < span class = "plain-syntax" > *< / span > < span class = "function-syntax" > CompilationUnits::current< / 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" > CompilationUnits::current< / span > < / span > :< br / > Text Substitutions - < a href = "4-ts.html#SP4" > § 4< / a > , < a href = "4-ts.html#SP11_1" > § 11.1< / a > < br / > Measurements - < a href = "5-msr.html#SP1" > § 1< / a > < br / > Adjectives - < a href = "5-adj.html#SP2" > § 2< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > ) {< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > current_CM< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2019-03-17 14:40:57 +02:00
2021-04-11 18:42:37 +03:00
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CompilationUnits::set_current_to< / 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" > CompilationUnits::set_current_to< / span > < / span > :< br / > Text Substitutions - < a href = "4-ts.html#SP11_1" > § 11.1< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > compilation_unit< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > CM< / span > < span class = "plain-syntax" > ) {< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > current_CM< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > CM< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2019-03-17 14:40:57 +02:00
2021-04-10 21:15:15 +03:00
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > CompilationUnits::set_current< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > parse_node< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > ) {< / span >
2020-08-26 12:52:50 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > current_CM< / span > < span class = "plain-syntax" > = < / span > < a href = "2-cu.html#SP5" class = "function-link" > < span class = "function-syntax" > CompilationUnits::find< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > current_CM< / 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-08-18 00:57:45 +03:00
< p class = "commentary firstcommentary" > < a id = "SP7" class = "paragraph-anchor" > < / a > < b > § 7. Relating to Inter. < / b > Creating the necessary package, of type < span class = "extract" > < span class = "extract-syntax" > _module< / span > < / span > , is the work of the
2019-04-22 17:06:29 +03:00
Packaging code.
< / 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" >
2020-08-01 13:35:56 +03:00
< span class = "identifier-syntax" > module_package< / span > < span class = "plain-syntax" > *< / span > < span class = "function-syntax" > CompilationUnits::inter_presence< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > compilation_unit< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > C< / 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" > C< / 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" > "no unit"< / span > < span class = "plain-syntax" > );< / span >
2020-05-03 03:01:21 +03:00
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > C< / span > < span class = "plain-syntax" > -> < / span > < span class = "identifier-syntax" > inter_presence< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
2019-04-22 17:06:29 +03:00
< / pre >
2020-05-03 03:01:21 +03:00
< nav role = "progress" > < div class = "progresscontainer" >
2021-04-11 23:41:26 +03:00
< ul class = "progressbar" > < li class = "progressprev" > < a href = "2-hrr.html" > ❮ < / a > < / li > < li class = "progresschapter" > < a href = "P-wtmd.html" > P< / a > < / li > < li class = "progresschapter" > < a href = "1-rm.html" > 1< / a > < / li > < li class = "progresscurrentchapter" > 2< / li > < li class = "progresssection" > < a href = "2-hrr.html" > hrr< / a > < / li > < li class = "progresscurrent" > cu< / li > < li class = "progresssection" > < a href = "2-emt.html" > emt< / a > < / li > < li class = "progresschapter" > < a href = "3-fc.html" > 3< / a > < / li > < li class = "progresschapter" > < a href = "4-lpart.html" > 4< / a > < / li > < li class = "progresschapter" > < a href = "5-rsfk.html" > 5< / a > < / li > < li class = "progresschapter" > < a href = "6-nmn.html" > 6< / a > < / li > < li class = "progresschapter" > < a href = "7-act.html" > 7< / a > < / li > < li class = "progresschapter" > < a href = "8-prs.html" > 8< / a > < / li > < li class = "progresschapter" > < a href = "9-fgr.html" > 9< / a > < / li > < li class = "progresschapter" > < a href = "10-sc.html" > 10< / a > < / li > < li class = "progressnext" > < a href = "2-emt.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 >
