2019-02-04 22:26:45 +00:00
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
< html >
< head >
< title > Booklet Title< / title >
< meta http-equiv = "Content-Type" content = "text/html; charset=utf-8" >
< meta http-equiv = "Content-Language" content = "en-gb" >
< link href = "inweb.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< / head >
< body >
2019-02-10 23:08:53 +00:00
<!-- Weave of 'S/pc' generated by 7 -->
2019-02-04 22:26:45 +00:00
< ul class = "crumbs" > < li > < a href = "../webs.html" > ★ < / a > < / li > < li > < a href = "index.html" > foundation-test< / a > < / li > < li > < b > Program Control< / b > < / li > < / ul > < p class = "purpose" > Choosing which unit test to run on the basis of the command-line arguments.< / p >
< 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" > "foundation-test"< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > TEST_STRINGS_CLSW< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > TEST_RE_CLSW< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > TEST_DICT_CLSW< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > TEST_LITERALS_CLSW< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > TEST_REPLACEMENT_CLSW< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > TEST_LISTS_CLSW< / span >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > TEST_STACKS_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" > CommandLine::declare_heading< / span > < span class = "plain" > (< / span > < span class = "identifier" > L< / span > < span class = "string" > "inexample: a tool for testing foundation facilities\< / 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" > TEST_STRINGS_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "test-strings"< / span > < span class = "plain" > , 2,< / span >
< span class = "identifier" > L< / span > < span class = "string" > "test string manipulation (X is ignored)"< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > CommandLine::declare_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > TEST_RE_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "test-regexp"< / span > < span class = "plain" > , 2,< / span >
< span class = "identifier" > L< / span > < span class = "string" > "test regular expression matches on a list of cases in file X"< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > CommandLine::declare_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > TEST_DICT_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "test-dictionaries"< / span > < span class = "plain" > , 2,< / span >
< span class = "identifier" > L< / span > < span class = "string" > "test dictionary building on a list of keys and values in file X"< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > CommandLine::declare_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > TEST_LITERALS_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "test-literals"< / span > < span class = "plain" > , 2,< / span >
< span class = "identifier" > L< / span > < span class = "string" > "test string literals (X is ignored)"< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > CommandLine::declare_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > TEST_REPLACEMENT_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "test-replacement"< / span > < span class = "plain" > , 2,< / span >
< span class = "identifier" > L< / span > < span class = "string" > "test regular expression replacements on a list of cases in file X"< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > CommandLine::declare_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > TEST_LISTS_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "test-lists"< / span > < span class = "plain" > , 2,< / span >
< span class = "identifier" > L< / span > < span class = "string" > "test linked lists (X is ignored)"< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > CommandLine::declare_switch< / span > < span class = "plain" > (< / span > < span class = "constant" > TEST_STACKS_CLSW< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "string" > "test-stacks"< / span > < span class = "plain" > , 2,< / span >
< span class = "identifier" > L< / span > < span class = "string" > "test LIFO stacks (X is ignored)"< / 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" > Foundation::end< / span > < span class = "plain" > ();< / span >
< span class = "reserved" > return< / span > < span class = "plain" > 0;< / span >
< 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 >
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > TEST_STRINGS_CLSW< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Unit::test_strings< / 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" > TEST_RE_CLSW< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Unit::test_regexp< / 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" > TEST_REPLACEMENT_CLSW< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Unit::test_replacement< / 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" > TEST_DICT_CLSW< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Unit::test_dictionaries< / 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" > TEST_LITERALS_CLSW< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Unit::test_literals< / 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" > TEST_LISTS_CLSW< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Unit::test_linked_lists< / 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" > TEST_STACKS_CLSW< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Unit::test_stacks< / span > < span class = "plain" > (); < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
< span class = "plain" > }< / span >
< 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 >
< p class = "endnote" > The function main appears nowhere else.< / p >
< p class = "endnote" > The function Main::respond appears nowhere else.< / p >
< p class = "endnote" > The function Main::ignore appears nowhere else.< / p >
2019-03-12 23:32:12 +00:00
< hr class = "tocbar" >
< ul class = "toc" > < li > < i > (This section begins Sections.)< / i > < / li > < li > < a href = "S-ut.html" > Continue with 'Unit Tests'< / a > < / li > < / ul > < hr class = "tocbar" >
2019-03-17 12:53:52 +00:00
<!-- End of weave: 57 lines from a web of 9599 -->
2019-02-04 22:26:45 +00:00
< / body >
< / html >