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-03-28 21:42:53 +02:00
< title > Booklet Title< / title >
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-03-19 02:11:25 +02:00
< link href = "../inweb.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
2019-03-17 14:40:57 +02:00
< / head >
< body >
2020-03-19 02:11:25 +02:00
< nav role = "navigation" >
< h1 > < a href = "../webs.html" > Sources< / a > < / h1 >
< ul >
2020-03-28 21:42:53 +02:00
< 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" > < b > unit test tools< / b > < / a > < / li >
< / ul >
< h2 > Unit Test Tools< / h2 >
< ul >
2020-03-29 14:32:49 +03:00
< li > < a href = "../arch-test/index.html" > arch-test< / a > < / li >
2020-03-29 01:18:10 +02:00
< li > < a href = "../building-test/index.html" > building-test< / a > < / li >
2020-03-19 02:11:25 +02:00
< li > < a href = "../inflections-test/index.html" > inflections-test< / a > < / li >
< li > < a href = "../linguistics-test/index.html" > linguistics-test< / a > < / li >
< li > < a href = "../problems-test/index.html" > problems-test< / a > < / li >
< li > < a href = "../syntax-test/index.html" > syntax-test< / a > < / li >
< li > < a href = "../words-test/index.html" > words-test< / a > < / li >
< / ul >
< h2 > Foundation< / h2 >
< ul >
< li > < a href = "../../../inweb/docs/foundation-module/index.html" > foundation< / a > < / li >
< li > < a href = "../../../inweb/docs/foundation-test/index.html" > foundation-test< / a > < / li >
< / ul >
< / nav >
< main role = "main" >
2019-03-17 14:40:57 +02:00
<!-- Weave of '1/pc' generated by 7 -->
2020-03-28 21:42:53 +02:00
< ul class = "crumbs" > < li > < a href = "../webs.html" > Source< / a > < / li > < li > < a href = "../units.html" > Unit Test Tools< / a > < / li > < li > < a href = "index.html" > inflections-test< / a > < / li > < li > < a href = "index.html#1" > Chapter 1: Scaffolding< / a > < / li > < li > < b > Program Control< / b > < / li > < / ul > < p class = "purpose" > What shall we test?< / p >
2019-03-17 14:40:57 +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" >
2020-03-28 21:42:53 +02:00
< span class = "definitionkeyword" > define< / span > < span class = "constant" > INTOOL_NAME< / span > < span class = "plain" > < / span > < span class = "string" > "inflections-test"< / span >
2019-03-17 14:40:57 +02:00
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > TEST_ADJECTIVES_CLSW< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > TEST_ARTICLES_CLSW< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > TEST_DECLENSIONS_CLSW< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > TEST_PARTICIPLES_CLSW< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > TEST_PLURALS_CLSW< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > TEST_VERBS_CLSW< / span >
< / pre >
< pre class = "display" >
< 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 >
< span class = "functiontext" > WordsModule::start< / span > < span class = "plain" > ();< / span >
< span class = "functiontext" > InflectionsModule::start< / span > < span class = "plain" > ();< / span >
2020-04-07 03:06:09 +03:00
< span class = "functiontext" > CommandLine::declare_heading< / span > < span class = "plain" > (< / span > < span class = "identifier" > L< / span > < span class = "string" > "inflections-test: a tool for testing inflections facilities\n"< / span > < span class = "plain" > );< / span >
2019-03-17 14:40:57 +02:00
2020-04-07 03:06:09 +03:00
< span class = "functiontext" > CommandLine::declare_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > TEST_ADJECTIVES_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "test-adjectives"< / span > < span class = "plain" > , < / span > < span class = "constant" > 2< / span > < span class = "plain" > ,< / span >
2019-03-17 14:40:57 +02:00
< span class = "identifier" > L< / span > < span class = "string" > "test adjective inflection (from list in X)"< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "functiontext" > CommandLine::declare_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > TEST_ARTICLES_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "test-articles"< / span > < span class = "plain" > , < / span > < span class = "constant" > 2< / span > < span class = "plain" > ,< / span >
2019-03-17 14:40:57 +02:00
< span class = "identifier" > L< / span > < span class = "string" > "test article inflection (from list in X)"< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "functiontext" > CommandLine::declare_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > TEST_DECLENSIONS_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "test-declensions"< / span > < span class = "plain" > , < / span > < span class = "constant" > 2< / span > < span class = "plain" > ,< / span >
2019-03-17 14:40:57 +02:00
< span class = "identifier" > L< / span > < span class = "string" > "test noun declension (from list in X)"< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "functiontext" > CommandLine::declare_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > TEST_PARTICIPLES_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "test-participles"< / span > < span class = "plain" > , < / span > < span class = "constant" > 2< / span > < span class = "plain" > ,< / span >
2019-03-17 14:40:57 +02:00
< span class = "identifier" > L< / span > < span class = "string" > "test plural inflection (from list in X)"< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "functiontext" > CommandLine::declare_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > TEST_PLURALS_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "test-plurals"< / span > < span class = "plain" > , < / span > < span class = "constant" > 2< / span > < span class = "plain" > ,< / span >
2019-03-17 14:40:57 +02:00
< span class = "identifier" > L< / span > < span class = "string" > "test plural inflection (from list in X)"< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "functiontext" > CommandLine::declare_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > TEST_VERBS_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "test-verbs"< / span > < span class = "plain" > , < / span > < span class = "constant" > 2< / span > < span class = "plain" > ,< / span >
2019-03-17 14:40:57 +02:00
< span class = "identifier" > L< / span > < span class = "string" > "test verb conjugation (from list in X)"< / span > < span class = "plain" > );< / span >
< 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::respond< / span > < span class = "plain" > , & < / span > < span class = "functiontext" > Main::ignore< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > WordsModule::end< / span > < span class = "plain" > ();< / span >
< span class = "functiontext" > InflectionsModule::end< / span > < span class = "plain" > ();< / span >
< span class = "functiontext" > Foundation::end< / span > < span class = "plain" > ();< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "constant" > 0< / span > < span class = "plain" > ;< / span >
2019-03-17 14:40:57 +02:00
< span class = "plain" > }< / span >
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > Main::respond< / 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 >
< span class = "reserved" > switch< / span > < span class = "plain" > (< / span > < span class = "identifier" > id< / span > < span class = "plain" > ) {< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "identifier" > TEST_ADJECTIVES_CLSW:< / span > < span class = "plain" > < / span > < span class = "functiontext" > Main::load< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "string" > "Syntax.preform"< / span > < span class = "plain" > ); < / span > < span class = "functiontext" > Unit::test_adjectives< / 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 = "identifier" > TEST_ARTICLES_CLSW:< / span > < span class = "plain" > < / span > < span class = "functiontext" > Main::load< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "string" > "Syntax.preform"< / span > < span class = "plain" > ); < / span > < span class = "functiontext" > Unit::test_articles< / 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 = "identifier" > TEST_DECLENSIONS_CLSW:< / span > < span class = "plain" > < / span > < span class = "functiontext" > Main::load_other< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "string" > "German.preform"< / span > < span class = "plain" > ); < / span > < span class = "functiontext" > Unit::test_declensions< / 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 = "identifier" > TEST_PARTICIPLES_CLSW:< / span > < span class = "plain" > < / span > < span class = "functiontext" > Main::load< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "string" > "Syntax.preform"< / span > < span class = "plain" > ); < / span > < span class = "functiontext" > Unit::test_participles< / 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 = "identifier" > TEST_PLURALS_CLSW:< / span > < span class = "plain" > < / span > < span class = "functiontext" > Main::load< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "string" > "Syntax.preform"< / span > < span class = "plain" > ); < / span > < span class = "functiontext" > Unit::test_plurals< / 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 = "identifier" > TEST_VERBS_CLSW:< / span > < span class = "plain" > < / span > < span class = "functiontext" > Main::load< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "string" > "Syntax.preform"< / span > < span class = "plain" > ); < / span > < span class = "functiontext" > Unit::test_verbs< / span > < span class = "plain" > (< / span > < span class = "identifier" > arg< / span > < span class = "plain" > ); < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
2019-03-17 14:40:57 +02:00
< span class = "plain" > }< / span >
< span class = "plain" > }< / span >
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > Main::load< / span > < span class = "plain" > (< / span > < span class = "reserved" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > leaf< / 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::from_text< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "string" > "inform7"< / 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" > P< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "inflections-test"< / 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" > P< / 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" > leaf< / 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 >
< span class = "plain" > }< / span >
2019-03-28 10:45:59 +02:00
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > Main::load_other< / span > < span class = "plain" > (< / span > < span class = "reserved" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > leaf< / 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::from_text< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "string" > "inform7"< / 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" > P< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "inflections-test"< / 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" > P< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "Preform"< / 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" > leaf< / 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 >
< span class = "plain" > }< / span >
2019-03-17 14:40:57 +02:00
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > Main::ignore< / 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 >
< span class = "functiontext" > Errors::fatal< / span > < span class = "plain" > (< / span > < span class = "string" > "only switches may be used at the command line"< / span > < span class = "plain" > );< / span >
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
2020-04-01 22:43:13 +03:00
< p class = "endnote" > The function main is used in 8/wm (< a href = "8-wm.html#SP3" > § 3< / a > ).< / p >
2019-03-17 14:40:57 +02:00
< p class = "endnote" > The function Main::respond appears nowhere else.< / p >
< p class = "endnote" > The function Main::load appears nowhere else.< / p >
2019-03-28 10:45:59 +02:00
< p class = "endnote" > The function Main::load_other appears nowhere else.< / p >
2019-03-17 14:40:57 +02:00
< p class = "endnote" > The function Main::ignore appears nowhere else.< / p >
< hr class = "tocbar" >
2020-03-28 21:42:53 +02:00
< ul class = "toc" > < li > < i > (This section begins Chapter 1: Scaffolding.)< / i > < / li > < li > < a href = "1-ut.html" > Continue with 'Unit Tests'< / a > < / li > < / ul > < hr class = "tocbar" >
2019-04-22 17:42:10 +03:00
<!-- End of weave -->
2020-03-19 02:11:25 +02:00
< / main >
2019-03-17 14:40:57 +02:00
< / body >
< / html >