2020-01-28 00:51:46 +02:00
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
< html >
< head >
2020-03-22 12:50:19 +02:00
< title > M/ui< / title >
2020-03-19 02:11:25 +02:00
< meta name = "viewport" content = "width=device-width initial-scale=1" >
2020-01-28 00:51:46 +02:00
< meta http-equiv = "Content-Type" content = "text/html; charset=utf-8" >
< meta http-equiv = "Content-Language" content = "en-gb" >
2020-03-19 02:11:25 +02:00
< link href = "../inweb.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
2020-01-28 00:51:46 +02:00
< / head >
< body >
2020-03-19 02:11:25 +02:00
< nav role = "navigation" >
< h1 > < a href = "../webs.html" > Sources< / a > < / h1 >
< ul >
< li > < a href = "../compiler.html" > < b > compiler< / b > < / a > < / li >
< 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 >
< / ul >
< h2 > Compiler Webs< / h2 >
< ul >
< 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 >
< / ul >
< h2 > Inbuild Modules< / h2 >
< ul >
< li > < a href = "../inbuild-module/index.html" > inbuild< / a > < / li >
< li > < a href = "../arch-module/index.html" > arch< / a > < / li >
< li > < a href = "../words-module/index.html" > words< / a > < / li >
< li > < a href = "../syntax-module/index.html" > syntax< / a > < / li >
< li > < a href = "../html-module/index.html" > html< / a > < / li >
< / ul >
< h2 > Inform7 Modules< / h2 >
< ul >
< li > < a href = "../core-module/index.html" > core< / a > < / li >
< li > < a href = "../problems-module/index.html" > problems< / a > < / li >
< 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 >
< li > < a href = "../index-module/index.html" > index< / a > < / li >
< / ul >
< h2 > Inter Modules< / h2 >
< ul >
< li > < a href = "../inter-module/index.html" > inter< / a > < / li >
< li > < a href = "../building-module/index.html" > building< / a > < / li >
< li > < a href = "../codegen-module/index.html" > codegen< / a > < / li >
< / ul >
< h2 > Foundation< / h2 >
< ul >
< li > < a href = "../../../inweb/docs/foundation-module/index.html" > foundation< / a > < / li >
< / ul >
< / nav >
< main role = "main" >
2020-01-28 00:51:46 +02:00
<!-- Weave of '1/mn' generated by 7 -->
2020-03-23 23:42:00 +02:00
< ul class = "crumbs" > < li > < a href = "../webs.html" > Source< / a > < / li > < li > < a href = "../compiler.html" > Compiler Tools< / a > < / li > < li > < a href = "index.html" > inbuild< / a > < / li > < li > < a href = "index.html#1" > Chapter 1: Delegation< / a > < / li > < li > < b > Main< / b > < / li > < / ul > < p class = "purpose" > The top level, which decides what is to be done and then carries this plan out.< / p >
2020-01-28 00:51:46 +02:00
< ul class = "toc" > < li > < a href = "#SP1" > § 1. Main routine< / a > < / li > < / ul > < hr class = "tocbar" >
< p class = "inwebparagraph" > < a id = "SP1" > < / a > < b > § 1. Main routine. < / b > < / p >
< pre class = "definitions" >
< span class = "definitionkeyword" > define< / span > < span class = "constant" > INTOOL_NAME< / span > < span class = "plain" > < / span > < span class = "string" > "inbuild"< / span >
2020-02-27 03:43:11 +02:00
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > INSPECT_TTASK< / span > < span class = "definitionkeyword" > from < / span > < span class = "constant" > 1< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > GRAPH_TTASK< / span >
2020-03-11 02:21:09 +02:00
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > NEEDS_TTASK< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > ARCHIVE_TTASK< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > ARCHIVE_TO_TTASK< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > MISSING_TTASK< / span >
2020-02-27 03:43:11 +02:00
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > BUILD_TTASK< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > REBUILD_TTASK< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > COPY_TO_TTASK< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > SYNC_TO_TTASK< / span >
2020-01-28 00:51:46 +02:00
< / pre >
< pre class = "display" >
2020-02-27 03:43:11 +02:00
< span class = "reserved" > pathname< / span > < span class = "plain" > *< / span > < span class = "identifier" > path_to_inbuild< / span > < span class = "plain" > = < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > pathname< / span > < span class = "plain" > *< / span > < span class = "identifier" > path_to_tools< / span > < span class = "plain" > = < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > inbuild_task< / span > < span class = "plain" > = < / span > < span class = "constant" > INSPECT_TTASK< / span > < span class = "plain" > ;< / span >
2020-03-11 02:21:09 +02:00
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > dry_run_mode< / span > < span class = "plain" > = < / span > < span class = "constant" > FALSE< / span > < span class = "plain" > , < / span > < span class = "identifier" > build_trace_mode< / span > < span class = "plain" > = < / span > < span class = "constant" > FALSE< / span > < span class = "plain" > ;< / span >
2020-02-27 03:43:11 +02:00
< span class = "reserved" > linked_list< / span > < span class = "plain" > *< / span > < span class = "identifier" > targets< / span > < span class = "plain" > = < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ; < / span > < span class = "comment" > of < code class = "display" > < span class = "extract" > inbuild_copy< / span > < / code > < / span >
< span class = "reserved" > inbuild_nest< / span > < span class = "plain" > *< / span > < span class = "identifier" > destination_nest< / span > < span class = "plain" > = < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > filter_text< / span > < span class = "plain" > = < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > unit_test< / span > < span class = "plain" > = < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > linked_list< / span > < span class = "plain" > *< / span > < span class = "identifier" > inbuild_nest_list< / span > < span class = "plain" > = < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
2020-01-28 00:51:46 +02:00
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "functiontext" > main< / span > < span class = "plain" > (< / span > < span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > argc< / span > < span class = "plain" > , < / span > < span class = "reserved" > char< / span > < span class = "plain" > **< / span > < span class = "identifier" > argv< / span > < span class = "plain" > ) {< / span >
< span class = "functiontext" > Foundation::start< / span > < span class = "plain" > ();< / span >
2020-03-11 02:21:09 +02:00
< span class = "functiontext" > WordsModule::start< / span > < span class = "plain" > ();< / span >
< span class = "functiontext" > SyntaxModule::start< / span > < span class = "plain" > ();< / span >
2020-02-27 03:43:11 +02:00
< span class = "functiontext" > HTMLModule::start< / span > < span class = "plain" > ();< / span >
< span class = "functiontext" > ArchModule::start< / span > < span class = "plain" > ();< / span >
< span class = "functiontext" > InbuildModule::start< / span > < span class = "plain" > ();< / span >
< span class = "identifier" > targets< / span > < span class = "plain" > = < / span > < span class = "identifier" > NEW_LINKED_LIST< / span > < span class = "plain" > (< / span > < span class = "reserved" > inbuild_copy< / span > < span class = "plain" > );< / span >
< < span class = "cwebmacro" > Read the command line< / span > < span class = "cwebmacronumber" > 1.2< / span > > < span class = "plain" > ;< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "functiontext" > Str::len< / span > < span class = "plain" > (< / span > < span class = "identifier" > unit_test< / span > < span class = "plain" > ) > 0) < / span > < span class = "identifier" > dry_run_mode< / span > < span class = "plain" > = < / span > < span class = "constant" > TRUE< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > use< / span > < span class = "plain" > = < / span > < span class = "constant" > SHELL_METHODOLOGY< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > dry_run_mode< / span > < span class = "plain" > ) < / span > < span class = "identifier" > use< / span > < span class = "plain" > = < / span > < span class = "constant" > DRY_RUN_METHODOLOGY< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > build_methodology< / span > < span class = "plain" > *< / span > < span class = "identifier" > BM< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > path_to_tools< / span > < span class = "plain" > ) < / span > < span class = "identifier" > BM< / span > < span class = "plain" > = < / span > < span class = "functiontext" > BuildMethodology::new< / span > < span class = "plain" > (< / span > < span class = "identifier" > path_to_tools< / span > < span class = "plain" > , < / span > < span class = "constant" > FALSE< / span > < span class = "plain" > , < / span > < span class = "identifier" > use< / span > < span class = "plain" > );< / span >
< span class = "reserved" > else< / span > < span class = "plain" > < / span > < span class = "identifier" > BM< / span > < span class = "plain" > = < / span > < span class = "functiontext" > BuildMethodology::new< / span > < span class = "plain" > (< / span > < span class = "functiontext" > Pathnames::up< / span > < span class = "plain" > (< / span > < span class = "identifier" > path_to_inbuild< / span > < span class = "plain" > ), < / span > < span class = "constant" > TRUE< / span > < span class = "plain" > , < / span > < span class = "identifier" > use< / span > < span class = "plain" > );< / span >
2020-03-11 02:21:09 +02:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > build_trace_mode< / span > < span class = "plain" > ) < / span > < span class = "identifier" > trace_ibg< / span > < span class = "plain" > = < / span > < span class = "constant" > TRUE< / span > < span class = "plain" > ;< / span >
2020-02-27 03:43:11 +02:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "functiontext" > Str::len< / span > < span class = "plain" > (< / span > < span class = "identifier" > unit_test< / span > < span class = "plain" > ) > 0) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "functiontext" > Str::eq< / span > < span class = "plain" > (< / span > < span class = "identifier" > unit_test< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "compatibility"< / span > < span class = "plain" > )) < / span > < span class = "functiontext" > Compatibility::test< / span > < span class = "plain" > (< / span > < span class = "constant" > STDOUT< / span > < span class = "plain" > );< / span >
< span class = "reserved" > else< / span > < span class = "plain" > < / span > < span class = "functiontext" > Errors::with_text< / span > < span class = "plain" > (< / span > < span class = "string" > "no such unit test: %S"< / span > < span class = "plain" > , < / span > < span class = "identifier" > unit_test< / span > < span class = "plain" > );< / span >
< span class = "plain" > } < / span > < span class = "reserved" > else< / span > < span class = "plain" > {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "functiontext" > Str::len< / span > < span class = "plain" > (< / span > < span class = "identifier" > filter_text< / span > < span class = "plain" > ) > 0) {< / span >
< span class = "identifier" > TEMPORARY_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > errors< / span > < span class = "plain" > );< / span >
< span class = "reserved" > inbuild_requirement< / span > < span class = "plain" > *< / span > < span class = "identifier" > req< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Requirements::from_text< / span > < span class = "plain" > (< / span > < span class = "identifier" > filter_text< / span > < span class = "plain" > , < / span > < span class = "identifier" > errors< / span > < span class = "plain" > );< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "functiontext" > Str::len< / span > < span class = "plain" > (< / span > < span class = "identifier" > errors< / span > < span class = "plain" > ) > 0) {< / span >
< span class = "functiontext" > Errors::with_text< / span > < span class = "plain" > (< / span > < span class = "string" > "requirement malformed: %S"< / span > < span class = "plain" > , < / span > < span class = "identifier" > errors< / span > < span class = "plain" > );< / span >
< span class = "plain" > } < / span > < span class = "reserved" > else< / span > < span class = "plain" > {< / span >
< span class = "reserved" > linked_list< / span > < span class = "plain" > *< / span > < span class = "identifier" > L< / span > < span class = "plain" > = < / span > < span class = "identifier" > NEW_LINKED_LIST< / span > < span class = "plain" > (< / span > < span class = "reserved" > inbuild_search_result< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > Nests::search_for< / span > < span class = "plain" > (< / span > < span class = "identifier" > req< / span > < span class = "plain" > , < / span > < span class = "identifier" > inbuild_nest_list< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "plain" > );< / span >
< span class = "reserved" > inbuild_search_result< / span > < span class = "plain" > *< / span > < span class = "identifier" > R< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > LOOP_OVER_LINKED_LIST< / span > < span class = "plain" > (< / span > < span class = "identifier" > R< / span > < span class = "plain" > , < / span > < span class = "reserved" > inbuild_search_result< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "plain" > ) {< / span >
< span class = "identifier" > ADD_TO_LINKED_LIST< / span > < span class = "plain" > (< / span > < span class = "identifier" > R< / span > < span class = "plain" > -< / span > < span class = "element" > > copy< / span > < span class = "plain" > , < / span > < span class = "reserved" > inbuild_copy< / span > < span class = "plain" > , < / span > < span class = "identifier" > targets< / span > < span class = "plain" > );< / span >
< span class = "plain" > }< / span >
< span class = "plain" > }< / span >
< span class = "identifier" > DISCARD_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > errors< / span > < span class = "plain" > );< / span >
< span class = "plain" > }< / span >
< span class = "reserved" > inbuild_copy< / span > < span class = "plain" > *< / span > < span class = "identifier" > C< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > LOOP_OVER_LINKED_LIST< / span > < span class = "plain" > (< / span > < span class = "identifier" > C< / span > < span class = "plain" > , < / span > < span class = "reserved" > inbuild_copy< / span > < span class = "plain" > , < / span > < span class = "identifier" > targets< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > switch< / span > < span class = "plain" > (< / span > < span class = "identifier" > inbuild_task< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > INSPECT_TTASK< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Copies::inspect< / span > < span class = "plain" > (< / span > < span class = "constant" > STDOUT< / span > < span class = "plain" > , < / span > < span class = "identifier" > C< / span > < span class = "plain" > ); < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > GRAPH_TTASK< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Copies::show_graph< / span > < span class = "plain" > (< / span > < span class = "constant" > STDOUT< / span > < span class = "plain" > , < / span > < span class = "identifier" > C< / span > < span class = "plain" > ); < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
2020-03-11 02:21:09 +02:00
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > NEEDS_TTASK< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Copies::show_needs< / span > < span class = "plain" > (< / span > < span class = "constant" > STDOUT< / span > < span class = "plain" > , < / span > < span class = "identifier" > C< / span > < span class = "plain" > ); < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > ARCHIVE_TTASK< / span > < span class = "plain" > :< / span >
< span class = "identifier" > destination_nest< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Inbuild::materials_nest< / span > < span class = "plain" > ();< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > destination_nest< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > )< / span >
< span class = "functiontext" > Errors::with_text< / span > < span class = "plain" > (< / span > < span class = "string" > "no -project in use, so ignoring -archive"< / span > < span class = "plain" > , < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > );< / span >
< span class = "reserved" > else< / span >
< span class = "functiontext" > Copies::archive< / span > < span class = "plain" > (< / span > < span class = "constant" > STDOUT< / span > < span class = "plain" > , < / span > < span class = "identifier" > C< / span > < span class = "plain" > , < / span > < span class = "identifier" > destination_nest< / span > < span class = "plain" > , < / span > < span class = "identifier" > BM< / span > < span class = "plain" > );< / span >
< span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > ARCHIVE_TO_TTASK< / span > < span class = "plain" > : < / span > < span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > destination_nest< / span > < span class = "plain" > ) < / span > < span class = "functiontext" > Copies::archive< / span > < span class = "plain" > (< / span > < span class = "constant" > STDOUT< / span > < span class = "plain" > , < / span > < span class = "identifier" > C< / span > < span class = "plain" > , < / span > < span class = "identifier" > destination_nest< / span > < span class = "plain" > , < / span > < span class = "identifier" > BM< / span > < span class = "plain" > ); < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > MISSING_TTASK< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Copies::show_missing< / span > < span class = "plain" > (< / span > < span class = "constant" > STDOUT< / span > < span class = "plain" > , < / span > < span class = "identifier" > C< / span > < span class = "plain" > ); < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
2020-02-27 03:43:11 +02:00
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > BUILD_TTASK< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Copies::build< / span > < span class = "plain" > (< / span > < span class = "constant" > STDOUT< / span > < span class = "plain" > , < / span > < span class = "identifier" > C< / span > < span class = "plain" > , < / span > < span class = "identifier" > BM< / span > < span class = "plain" > ); < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > REBUILD_TTASK< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Copies::rebuild< / span > < span class = "plain" > (< / span > < span class = "constant" > STDOUT< / span > < span class = "plain" > , < / span > < span class = "identifier" > C< / span > < span class = "plain" > , < / span > < span class = "identifier" > BM< / span > < span class = "plain" > ); < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > COPY_TO_TTASK< / span > < span class = "plain" > : < / span > < span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > destination_nest< / span > < span class = "plain" > ) < / span > < span class = "functiontext" > Nests::copy_to< / span > < span class = "plain" > (< / span > < span class = "identifier" > C< / span > < span class = "plain" > , < / span > < span class = "identifier" > destination_nest< / span > < span class = "plain" > , < / span > < span class = "constant" > FALSE< / span > < span class = "plain" > , < / span > < span class = "identifier" > BM< / span > < span class = "plain" > ); < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > SYNC_TO_TTASK< / span > < span class = "plain" > : < / span > < span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > destination_nest< / span > < span class = "plain" > ) < / span > < span class = "functiontext" > Nests::copy_to< / span > < span class = "plain" > (< / span > < span class = "identifier" > C< / span > < span class = "plain" > , < / span > < span class = "identifier" > destination_nest< / span > < span class = "plain" > , < / span > < span class = "constant" > TRUE< / span > < span class = "plain" > , < / span > < span class = "identifier" > BM< / span > < span class = "plain" > ); < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
< span class = "plain" > }< / span >
< span class = "plain" > }< / span >
< span class = "functiontext" > ArchModule::end< / span > < span class = "plain" > ();< / span >
< span class = "functiontext" > InbuildModule::end< / span > < span class = "plain" > ();< / span >
< span class = "functiontext" > HTMLModule::end< / span > < span class = "plain" > ();< / span >
2020-03-11 02:21:09 +02:00
< span class = "functiontext" > SyntaxModule::end< / span > < span class = "plain" > ();< / span >
< span class = "functiontext" > WordsModule::end< / span > < span class = "plain" > ();< / span >
2020-01-28 00:51:46 +02:00
< span class = "functiontext" > Foundation::end< / span > < span class = "plain" > ();< / span >
< span class = "reserved" > return< / span > < span class = "plain" > 0;< / span >
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
2020-03-11 02:21:09 +02:00
< p class = "endnote" > The function main is used in 1/ic (< a href = "1-ic.html#SP15" > § 15< / a > ), 5/kts (< a href = "5-kts.html#SP1" > § 1< / a > ), 6/st (< a href = "6-st.html#SP1" > § 1< / a > ).< / p >
2020-01-28 00:51:46 +02:00
< p class = "inwebparagraph" > < a id = "SP1_1" > < / a > < b > § 1.1. < / b > We use Foundation to read the command line:
< / p >
2020-02-27 03:43:11 +02:00
< pre class = "definitions" >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > BUILD_CLSW< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > REBUILD_CLSW< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > GRAPH_CLSW< / span >
2020-03-11 02:21:09 +02:00
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > NEEDS_CLSW< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > MISSING_CLSW< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > ARCHIVE_CLSW< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > ARCHIVE_TO_CLSW< / span >
2020-02-27 03:43:11 +02:00
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > INSPECT_CLSW< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > DRY_CLSW< / span >
2020-03-11 02:21:09 +02:00
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > BUILD_TRACE_CLSW< / span >
2020-02-27 03:43:11 +02:00
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > TOOLS_CLSW< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > CONTENTS_OF_CLSW< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > MATCHING_CLSW< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > COPY_TO_CLSW< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > SYNC_TO_CLSW< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > UNIT_TEST_CLSW< / span >
< / pre >
< p class = "inwebparagraph" > < a id = "SP1_2" > < / a > < b > § 1.2. < / b > < code class = "display" >
< < span class = "cwebmacrodefn" > Read the command line< / span > < span class = "cwebmacronumber" > 1.2< / span > > =
2020-01-28 00:51:46 +02:00
< / code > < / p >
< pre class = "displaydefn" >
< span class = "functiontext" > CommandLine::declare_heading< / span > < span class = "plain" > (< / span >
< span class = "identifier" > L< / span > < span class = "string" > "[[Purpose]]\< / span > < span class = "plain" > n< / span > < span class = "string" > \< / span > < span class = "plain" > n< / span > < span class = "string" > "< / span >
2020-02-27 03:43:11 +02:00
< span class = "identifier" > L< / span > < span class = "string" > "usage: inbuild [-TASK] TARGET1 TARGET2 ...\< / span > < span class = "plain" > n< / span > < span class = "string" > "< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > CommandLine::declare_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > COPY_TO_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "copy-to"< / span > < span class = "plain" > , 2,< / span >
< span class = "identifier" > L< / span > < span class = "string" > "copy target(s) to nest X"< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > CommandLine::declare_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > SYNC_TO_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "sync-to"< / span > < span class = "plain" > , 2,< / span >
< span class = "identifier" > L< / span > < span class = "string" > "forcibly copy target(s) to nest X, even if prior version already there"< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > CommandLine::declare_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > BUILD_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "build"< / span > < span class = "plain" > , 1,< / span >
< span class = "identifier" > L< / span > < span class = "string" > "incrementally build target(s)"< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > CommandLine::declare_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > REBUILD_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "rebuild"< / span > < span class = "plain" > , 1,< / span >
< span class = "identifier" > L< / span > < span class = "string" > "completely rebuild target(s)"< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > CommandLine::declare_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > INSPECT_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "inspect"< / span > < span class = "plain" > , 1,< / span >
< span class = "identifier" > L< / span > < span class = "string" > "show target(s) but take no action"< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > CommandLine::declare_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > GRAPH_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "graph"< / span > < span class = "plain" > , 1,< / span >
< span class = "identifier" > L< / span > < span class = "string" > "show dependency graph of target(s) but take no action"< / span > < span class = "plain" > );< / span >
2020-03-11 02:21:09 +02:00
< span class = "functiontext" > CommandLine::declare_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > NEEDS_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "needs"< / span > < span class = "plain" > , 1,< / span >
< span class = "identifier" > L< / span > < span class = "string" > "show all the extensions, kits and so on needed to build"< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > CommandLine::declare_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > MISSING_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "missing"< / span > < span class = "plain" > , 1,< / span >
< span class = "identifier" > L< / span > < span class = "string" > "show the extensions, kits and so on which are needed but missing"< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > CommandLine::declare_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > ARCHIVE_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "archive"< / span > < span class = "plain" > , 1,< / span >
< span class = "identifier" > L< / span > < span class = "string" > "sync copies of all extensions, kits and so on needed for -project into Materials"< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > CommandLine::declare_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > ARCHIVE_TO_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "archive-to"< / span > < span class = "plain" > , 2,< / span >
< span class = "identifier" > L< / span > < span class = "string" > "sync copies of all extensions, kits and so on needed into nest X"< / span > < span class = "plain" > );< / span >
2020-02-27 03:43:11 +02:00
< span class = "functiontext" > CommandLine::declare_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > TOOLS_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "tools"< / span > < span class = "plain" > , 2,< / span >
< span class = "identifier" > L< / span > < span class = "string" > "make X the directory of intools executables, and exit developer mode"< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > CommandLine::declare_boolean_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > DRY_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "dry"< / span > < span class = "plain" > , 1,< / span >
< span class = "identifier" > L< / span > < span class = "string" > "make this a dry run (print but do not execute shell commands)"< / span > < span class = "plain" > , < / span > < span class = "constant" > FALSE< / span > < span class = "plain" > );< / span >
2020-03-11 02:21:09 +02:00
< span class = "functiontext" > CommandLine::declare_boolean_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > BUILD_TRACE_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "build-trace"< / span > < span class = "plain" > , 1,< / span >
< span class = "identifier" > L< / span > < span class = "string" > "show verbose reasoning during -build"< / span > < span class = "plain" > , < / span > < span class = "constant" > FALSE< / span > < span class = "plain" > );< / span >
2020-02-27 03:43:11 +02:00
< span class = "functiontext" > CommandLine::declare_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > MATCHING_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "matching"< / span > < span class = "plain" > , 2,< / span >
< span class = "identifier" > L< / span > < span class = "string" > "apply to all works in nest(s) matching requirement X"< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > CommandLine::declare_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > CONTENTS_OF_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "contents-of"< / span > < span class = "plain" > , 2,< / span >
< span class = "identifier" > L< / span > < span class = "string" > "apply to all targets in the directory X"< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > CommandLine::declare_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > UNIT_TEST_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "unit-test"< / span > < span class = "plain" > , 2,< / span >
< span class = "identifier" > L< / span > < span class = "string" > "perform unit test X (for debugging inbuild only)"< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > Inbuild::declare_options< / span > < span class = "plain" > ();< / span >
2020-01-28 00:51:46 +02:00
< span class = "functiontext" > CommandLine::read< / span > < span class = "plain" > (< / span > < span class = "identifier" > argc< / span > < span class = "plain" > , < / span > < span class = "identifier" > argv< / span > < span class = "plain" > , < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > , & < / span > < span class = "functiontext" > Main::option< / span > < span class = "plain" > , & < / span > < span class = "functiontext" > Main::bareword< / span > < span class = "plain" > );< / span >
2020-02-27 03:43:11 +02:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "functiontext" > LinkedLists::len< / span > < span class = "plain" > (< / span > < span class = "identifier" > unsorted_nest_list< / span > < span class = "plain" > ) == 0)< / span >
< span class = "functiontext" > Inbuild::add_nest< / span > < span class = "plain" > (< / span >
< span class = "functiontext" > Pathnames::from_text< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "string" > "inform7/Internal"< / span > < span class = "plain" > ), < / span > < span class = "constant" > INTERNAL_NEST_TAG< / span > < span class = "plain" > );< / span >
2020-03-11 02:21:09 +02:00
< span class = "identifier" > path_to_inbuild< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Pathnames::installation_path< / span > < span class = "plain" > (< / span > < span class = "string" > "INBUILD_PATH"< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "inbuild"< / span > < span class = "plain" > );< / span >
< span class = "reserved" > pathname< / span > < span class = "plain" > *< / span > < span class = "identifier" > P< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Pathnames::subfolder< / span > < span class = "plain" > (< / span > < span class = "identifier" > path_to_inbuild< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "Tangled"< / span > < span class = "plain" > );< / span >
< span class = "reserved" > filename< / span > < span class = "plain" > *< / span > < span class = "identifier" > S< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Filenames::in_folder< / span > < span class = "plain" > (< / span > < span class = "identifier" > P< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "Syntax.preform"< / span > < span class = "plain" > );< / span >
< span class = "reserved" > wording< / span > < span class = "plain" > < / span > < span class = "identifier" > W< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Preform::load_from_file< / span > < span class = "plain" > (< / span > < span class = "identifier" > S< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > Preform::parse_preform< / span > < span class = "plain" > (< / span > < span class = "identifier" > W< / span > < span class = "plain" > , < / span > < span class = "constant" > FALSE< / span > < span class = "plain" > );< / span >
2020-02-27 03:43:11 +02:00
< span class = "functiontext" > CommandLine::play_back_log< / span > < span class = "plain" > ();< / span >
< span class = "reserved" > inbuild_copy< / span > < span class = "plain" > *< / span > < span class = "identifier" > proj< / span > < span class = "plain" > = < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > , *< / span > < span class = "identifier" > C< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > LOOP_OVER_LINKED_LIST< / span > < span class = "plain" > (< / span > < span class = "identifier" > C< / span > < span class = "plain" > , < / span > < span class = "reserved" > inbuild_copy< / span > < span class = "plain" > , < / span > < span class = "identifier" > targets< / span > < span class = "plain" > )< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > C< / span > < span class = "plain" > -< / span > < span class = "element" > > edition< / span > < span class = "plain" > -< / span > < span class = "element" > > work< / span > < span class = "plain" > -< / span > < span class = "element" > > genre< / span > < span class = "plain" > == < / span > < span class = "identifier" > project_bundle_genre< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "functiontext" > Str::len< / span > < span class = "plain" > (< / span > < span class = "identifier" > project_bundle_request< / span > < span class = "plain" > ) > 0)< / span >
< span class = "functiontext" > Errors::with_text< / span > < span class = "plain" > (< / span > < span class = "string" > "can only work on one project bundle at a time, so ignoring '%S'"< / span > < span class = "plain" > , < / span > < span class = "identifier" > C< / span > < span class = "plain" > -< / span > < span class = "element" > > edition< / span > < span class = "plain" > -< / span > < span class = "element" > > work< / span > < span class = "plain" > -< / span > < span class = "element" > > title< / span > < span class = "plain" > );< / span >
< span class = "reserved" > else< / span > < span class = "plain" > < / span > < span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > proj< / span > < span class = "plain" > ) < / span > < span class = "functiontext" > Errors::with_text< / span > < span class = "plain" > (< / span > < span class = "string" > "can only work on one project bundle at a time, so ignoring '%S'"< / span > < span class = "plain" > , < / span > < span class = "identifier" > C< / span > < span class = "plain" > -< / span > < span class = "element" > > edition< / span > < span class = "plain" > -< / span > < span class = "element" > > work< / span > < span class = "plain" > -< / span > < span class = "element" > > title< / span > < span class = "plain" > );< / span >
< span class = "reserved" > else< / span > < span class = "plain" > < / span > < span class = "identifier" > proj< / span > < span class = "plain" > = < / span > < span class = "identifier" > C< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
< span class = "identifier" > proj< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Inbuild::optioneering_complete< / span > < span class = "plain" > (< / span > < span class = "identifier" > proj< / span > < span class = "plain" > , < / span > < span class = "constant" > FALSE< / span > < span class = "plain" > );< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > proj< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > found< / span > < span class = "plain" > = < / span > < span class = "constant" > FALSE< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > LOOP_OVER_LINKED_LIST< / span > < span class = "plain" > (< / span > < span class = "identifier" > C< / span > < span class = "plain" > , < / span > < span class = "reserved" > inbuild_copy< / span > < span class = "plain" > , < / span > < span class = "identifier" > targets< / span > < span class = "plain" > )< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > C< / span > < span class = "plain" > == < / span > < span class = "identifier" > proj< / span > < span class = "plain" > )< / span >
< span class = "identifier" > found< / span > < span class = "plain" > = < / span > < span class = "constant" > TRUE< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > found< / span > < span class = "plain" > == < / span > < span class = "constant" > FALSE< / span > < span class = "plain" > ) < / span > < span class = "identifier" > ADD_TO_LINKED_LIST< / span > < span class = "plain" > (< / span > < span class = "identifier" > proj< / span > < span class = "plain" > , < / span > < span class = "reserved" > inbuild_copy< / span > < span class = "plain" > , < / span > < span class = "identifier" > targets< / span > < span class = "plain" > );< / span >
< span class = "plain" > }< / span >
< span class = "identifier" > inbuild_nest_list< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Inbuild::nest_list< / span > < span class = "plain" > ();< / span >
< span class = "functiontext" > Inbuild::go_operational< / span > < span class = "plain" > ();< / span >
2020-01-28 00:51:46 +02:00
< / pre >
< p class = "inwebparagraph" > < / p >
< p class = "endnote" > This code is used in < a href = "#SP1" > § 1< / a > .< / p >
< p class = "inwebparagraph" > < a id = "SP2" > < / a > < b > § 2. < / b > < / p >
< pre class = "display" >
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > Main::option< / span > < span class = "plain" > (< / span > < span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > id< / span > < span class = "plain" > , < / span > < span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > val< / span > < span class = "plain" > , < / span > < span class = "reserved" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > arg< / span > < span class = "plain" > , < / span > < span class = "reserved" > void< / span > < span class = "plain" > *< / span > < span class = "identifier" > state< / span > < span class = "plain" > ) {< / span >
2020-02-27 03:43:11 +02:00
< span class = "reserved" > switch< / span > < span class = "plain" > (< / span > < span class = "identifier" > id< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > BUILD_CLSW< / span > < span class = "plain" > : < / span > < span class = "identifier" > inbuild_task< / span > < span class = "plain" > = < / span > < span class = "constant" > BUILD_TTASK< / span > < span class = "plain" > ; < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > REBUILD_CLSW< / span > < span class = "plain" > : < / span > < span class = "identifier" > inbuild_task< / span > < span class = "plain" > = < / span > < span class = "constant" > REBUILD_TTASK< / span > < span class = "plain" > ; < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > INSPECT_CLSW< / span > < span class = "plain" > : < / span > < span class = "identifier" > inbuild_task< / span > < span class = "plain" > = < / span > < span class = "constant" > INSPECT_TTASK< / span > < span class = "plain" > ; < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > GRAPH_CLSW< / span > < span class = "plain" > : < / span > < span class = "identifier" > inbuild_task< / span > < span class = "plain" > = < / span > < span class = "constant" > GRAPH_TTASK< / span > < span class = "plain" > ; < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
2020-03-11 02:21:09 +02:00
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > NEEDS_CLSW< / span > < span class = "plain" > : < / span > < span class = "identifier" > inbuild_task< / span > < span class = "plain" > = < / span > < span class = "constant" > NEEDS_TTASK< / span > < span class = "plain" > ; < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > ARCHIVE_TO_CLSW< / span > < span class = "plain" > :< / span >
< span class = "identifier" > destination_nest< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Nests::new< / span > < span class = "plain" > (< / span > < span class = "functiontext" > Pathnames::from_text< / span > < span class = "plain" > (< / span > < span class = "identifier" > arg< / span > < span class = "plain" > ));< / span >
< span class = "identifier" > inbuild_task< / span > < span class = "plain" > = < / span > < span class = "constant" > ARCHIVE_TO_TTASK< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > ARCHIVE_CLSW< / span > < span class = "plain" > :< / span >
< span class = "identifier" > inbuild_task< / span > < span class = "plain" > = < / span > < span class = "constant" > ARCHIVE_TTASK< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > MISSING_CLSW< / span > < span class = "plain" > : < / span > < span class = "identifier" > inbuild_task< / span > < span class = "plain" > = < / span > < span class = "constant" > MISSING_TTASK< / span > < span class = "plain" > ; < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
2020-02-27 03:43:11 +02:00
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > TOOLS_CLSW< / span > < span class = "plain" > : < / span > < span class = "identifier" > path_to_tools< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Pathnames::from_text< / span > < span class = "plain" > (< / span > < span class = "identifier" > arg< / span > < span class = "plain" > ); < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > MATCHING_CLSW< / span > < span class = "plain" > : < / span > < span class = "identifier" > filter_text< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Str::duplicate< / span > < span class = "plain" > (< / span > < span class = "identifier" > arg< / span > < span class = "plain" > ); < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > CONTENTS_OF_CLSW< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Main::load_many< / span > < span class = "plain" > (< / span > < span class = "functiontext" > Pathnames::from_text< / span > < span class = "plain" > (< / span > < span class = "identifier" > arg< / span > < span class = "plain" > )); < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > DRY_CLSW< / span > < span class = "plain" > : < / span > < span class = "identifier" > dry_run_mode< / span > < span class = "plain" > = < / span > < span class = "identifier" > val< / span > < span class = "plain" > ; < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
2020-03-11 02:21:09 +02:00
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > BUILD_TRACE_CLSW< / span > < span class = "plain" > : < / span > < span class = "identifier" > build_trace_mode< / span > < span class = "plain" > = < / span > < span class = "identifier" > val< / span > < span class = "plain" > ; < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
2020-02-27 03:43:11 +02:00
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > COPY_TO_CLSW< / span > < span class = "plain" > : < / span > < span class = "identifier" > inbuild_task< / span > < span class = "plain" > = < / span > < span class = "constant" > COPY_TO_TTASK< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > destination_nest< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Nests::new< / span > < span class = "plain" > (< / span > < span class = "functiontext" > Pathnames::from_text< / span > < span class = "plain" > (< / span > < span class = "identifier" > arg< / span > < span class = "plain" > ));< / span >
< span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > SYNC_TO_CLSW< / span > < span class = "plain" > : < / span > < span class = "identifier" > inbuild_task< / span > < span class = "plain" > = < / span > < span class = "constant" > SYNC_TO_TTASK< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > destination_nest< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Nests::new< / span > < span class = "plain" > (< / span > < span class = "functiontext" > Pathnames::from_text< / span > < span class = "plain" > (< / span > < span class = "identifier" > arg< / span > < span class = "plain" > ));< / span >
< span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > UNIT_TEST_CLSW< / span > < span class = "plain" > : < / span > < span class = "identifier" > unit_test< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Str::duplicate< / span > < span class = "plain" > (< / span > < span class = "identifier" > arg< / span > < span class = "plain" > ); < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
< span class = "functiontext" > Inbuild::option< / span > < span class = "plain" > (< / span > < span class = "identifier" > id< / span > < span class = "plain" > , < / span > < span class = "identifier" > val< / span > < span class = "plain" > , < / span > < span class = "identifier" > arg< / span > < span class = "plain" > , < / span > < span class = "identifier" > state< / span > < span class = "plain" > );< / span >
2020-01-28 00:51:46 +02:00
< span class = "plain" > }< / span >
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > Main::bareword< / span > < span class = "plain" > (< / span > < span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > id< / span > < span class = "plain" > , < / span > < span class = "reserved" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > arg< / span > < span class = "plain" > , < / span > < span class = "reserved" > void< / span > < span class = "plain" > *< / span > < span class = "identifier" > state< / span > < span class = "plain" > ) {< / span >
2020-02-27 03:43:11 +02:00
< span class = "functiontext" > Main::load_one< / span > < span class = "plain" > (< / span > < span class = "identifier" > arg< / span > < span class = "plain" > , < / span > < span class = "constant" > TRUE< / span > < span class = "plain" > );< / span >
< span class = "plain" > }< / span >
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > Main::load_many< / span > < span class = "plain" > (< / span > < span class = "reserved" > pathname< / span > < span class = "plain" > *< / span > < span class = "identifier" > P< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > scan_directory< / span > < span class = "plain" > *< / span > < span class = "identifier" > D< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Directories::open< / span > < span class = "plain" > (< / span > < span class = "identifier" > P< / span > < span class = "plain" > );< / span >
< span class = "identifier" > TEMPORARY_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > LEAFNAME< / span > < span class = "plain" > );< / span >
< span class = "reserved" > while< / span > < span class = "plain" > (< / span > < span class = "functiontext" > Directories::next< / span > < span class = "plain" > (< / span > < span class = "identifier" > D< / span > < span class = "plain" > , < / span > < span class = "identifier" > LEAFNAME< / span > < span class = "plain" > )) {< / span >
< span class = "identifier" > TEMPORARY_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > FILENAME< / span > < span class = "plain" > );< / span >
< span class = "identifier" > WRITE_TO< / span > < span class = "plain" > (< / span > < span class = "identifier" > FILENAME< / span > < span class = "plain" > , < / span > < span class = "string" > "%p%c%S"< / span > < span class = "plain" > , < / span > < span class = "identifier" > P< / span > < span class = "plain" > , < / span > < span class = "constant" > FOLDER_SEPARATOR< / span > < span class = "plain" > , < / span > < span class = "identifier" > LEAFNAME< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > Main::load_one< / span > < span class = "plain" > (< / span > < span class = "identifier" > FILENAME< / span > < span class = "plain" > , < / span > < span class = "constant" > FALSE< / span > < span class = "plain" > );< / span >
< span class = "identifier" > DISCARD_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > FILENAME< / span > < span class = "plain" > );< / span >
< span class = "plain" > }< / span >
< span class = "identifier" > DISCARD_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > LEAFNAME< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > Directories::close< / span > < span class = "plain" > (< / span > < span class = "identifier" > D< / span > < span class = "plain" > );< / span >
< span class = "plain" > }< / span >
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > Main::load_one< / span > < span class = "plain" > (< / span > < span class = "reserved" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > arg< / span > < span class = "plain" > , < / span > < span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > throwing_error< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > inbuild_copy< / span > < span class = "plain" > *< / span > < span class = "identifier" > C< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Copies::claim< / span > < span class = "plain" > (< / span > < span class = "identifier" > arg< / span > < span class = "plain" > );< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > C< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > throwing_error< / span > < span class = "plain" > ) < / span > < span class = "functiontext" > Errors::with_text< / span > < span class = "plain" > (< / span > < span class = "string" > "unable to identify '%S'"< / span > < span class = "plain" > , < / span > < span class = "identifier" > arg< / span > < span class = "plain" > );< / span >
< span class = "reserved" > return< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
< span class = "identifier" > ADD_TO_LINKED_LIST< / span > < span class = "plain" > (< / span > < span class = "identifier" > C< / span > < span class = "plain" > , < / span > < span class = "reserved" > inbuild_copy< / span > < span class = "plain" > , < / span > < span class = "identifier" > targets< / span > < span class = "plain" > );< / span >
2020-01-28 00:51:46 +02:00
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
2020-02-27 03:43:11 +02:00
< p class = "endnote" > The function Main::option is used in < a href = "#SP1_2" > § 1.2< / a > .< / p >
< p class = "endnote" > The function Main::bareword is used in < a href = "#SP1_2" > § 1.2< / a > .< / p >
< p class = "endnote" > The function Main::load_many appears nowhere else.< / p >
< p class = "endnote" > The function Main::load_one appears nowhere else.< / p >
2020-01-28 00:51:46 +02:00
2020-02-27 03:43:11 +02:00
< p class = "inwebparagraph" > < a id = "SP3" > < / a > < b > § 3. < / b > Since we want to include the words module, we have to define the following
structure and initialiser:
< / p >
< pre class = "definitions" >
< span class = "definitionkeyword" > define< / span > < span class = "constant" > VOCABULARY_MEANING_INITIALISER< / span > < span class = "plain" > < / span > < span class = "functiontext" > Main::ignore< / span >
< / pre >
2020-01-28 00:51:46 +02:00
2020-02-27 03:43:11 +02:00
< pre class = "display" >
< span class = "reserved" > typedef< / span > < span class = "plain" > < / span > < span class = "reserved" > struct< / span > < span class = "plain" > < / span > < span class = "reserved" > vocabulary_meaning< / span > < span class = "plain" > {< / span >
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > enigmatic_number< / span > < span class = "plain" > ;< / span >
< span class = "plain" > } < / span > < span class = "reserved" > vocabulary_meaning< / span > < span class = "plain" > ;< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
< p class = "endnote" > The structure vocabulary_meaning is private to this section.< / p >
< p class = "inwebparagraph" > < a id = "SP4" > < / a > < b > § 4. < / b > < / p >
< pre class = "display" >
< span class = "reserved" > vocabulary_meaning< / span > < span class = "plain" > < / span > < span class = "functiontext" > Main::ignore< / span > < span class = "plain" > (< / span > < span class = "reserved" > vocabulary_entry< / span > < span class = "plain" > *< / span > < span class = "identifier" > ve< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > vocabulary_meaning< / span > < span class = "plain" > < / span > < span class = "identifier" > vm< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > vm< / span > < span class = "element" > .enigmatic_number< / span > < span class = "plain" > = 90125;< / span >
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > vm< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
< p class = "endnote" > The function Main::ignore appears nowhere else.< / p >
< p class = "inwebparagraph" > < a id = "SP5" > < / a > < b > § 5. < / b > < / p >
< pre class = "definitions" >
< span class = "definitionkeyword" > define< / span > < span class = "constant" > PREFORM_LANGUAGE_TYPE< / span > < span class = "plain" > < / span > < span class = "reserved" > void< / span >
2020-03-11 02:21:09 +02:00
< span class = "definitionkeyword" > define< / span > < span class = "constant" > PARSE_TREE_TRAVERSE_TYPE< / span > < span class = "plain" > < / span > < span class = "reserved" > void< / span >
< span class = "definitionkeyword" > define< / span > < span class = "constant" > SENTENCE_NODE< / span > < span class = "plain" > < / span > < span class = "functiontext" > Main::sentence_level< / span >
< span class = "definitionkeyword" > define< / span > < span class = "constant" > PARSE_TREE_METADATA_SETUP< / span > < span class = "plain" > < / span > < span class = "functiontext" > SourceText::node_metadata< / span >
2020-02-27 03:43:11 +02:00
< / pre >
2020-03-11 02:21:09 +02:00
< pre class = "display" >
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "functiontext" > Main::sentence_level< / span > < span class = "plain" > (< / span > < span class = "constant" > node_type_t< / span > < span class = "plain" > < / span > < span class = "identifier" > t< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "constant" > FALSE< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
< p class = "endnote" > The function Main::sentence_level appears nowhere else.< / p >
2020-01-28 00:51:46 +02:00
< hr class = "tocbar" >
2020-03-22 12:50:19 +02:00
< ul class = "toc" > < li > < i > (This section begins Chapter 1: Delegation.)< / i > < / li > < li > < i > (This section ends Chapter 1: Delegation.)< / i > < / li > < / ul > < hr class = "tocbar" >
2020-01-28 00:51:46 +02:00
<!-- End of weave -->
2020-03-19 02:11:25 +02:00
< / main >
2020-01-28 00:51:46 +02:00
< / body >
< / html >