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-04-14 19:56:54 +03:00
< title > The Package Construct< / 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" >
2020-04-14 19:56:54 +03:00
2019-03-17 14:40:57 +02:00
< / head >
< body >
2020-03-19 02:11:25 +02:00
< nav role = "navigation" >
2020-04-14 19:56:54 +03:00
< h1 > < a href = "../index.html" >
< img src = "../docs-src/Figures/Inform.png" height = 72" >
< / a > < / h1 >
< ul > < li > < a href = "../compiler.html" > compiler tools< / a > < / li >
2020-03-19 02:11:25 +02:00
< li > < a href = "../other.html" > other tools< / a > < / li >
< li > < a href = "../extensions.html" > extensions and kits< / a > < / li >
< li > < a href = "../units.html" > unit test tools< / a > < / li >
2020-04-14 19:56:54 +03:00
< / ul > < h2 > Compiler Webs< / h2 > < ul >
2020-03-19 02:11:25 +02:00
< li > < a href = "../inbuild/index.html" > inbuild< / a > < / li >
< li > < a href = "../inform7/index.html" > inform7< / a > < / li >
< li > < a href = "../inter/index.html" > inter< / a > < / li >
2020-04-14 19:56:54 +03:00
< / ul > < h2 > Inbuild Modules< / h2 > < ul >
< li > < a href = "../supervisor-module/index.html" > supervisor< / a > < / li >
< / ul > < h2 > Inform7 Modules< / h2 > < ul >
2020-03-19 02:11:25 +02:00
< li > < a href = "../core-module/index.html" > core< / a > < / li >
< 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 >
2020-04-14 19:56:54 +03:00
< li > < a href = "../problems-module/index.html" > problems< / a > < / li >
2020-03-19 02:11:25 +02:00
< li > < a href = "../index-module/index.html" > index< / a > < / li >
2020-04-14 19:56:54 +03:00
< / ul > < h2 > Inter Modules< / h2 > < ul >
< li > < a href = "index.html" > < span class = "selectedlink" > bytecode< / span > < / a > < / li >
2020-03-19 02:11:25 +02:00
< li > < a href = "../building-module/index.html" > building< / a > < / li >
< li > < a href = "../codegen-module/index.html" > codegen< / a > < / li >
2020-04-14 19:56:54 +03:00
< / ul > < h2 > Shared Modules< / h2 > < ul >
< li > < a href = "../arch-module/index.html" > arch< / a > < / li >
< li > < a href = "../syntax-module/index.html" > syntax< / a > < / li >
< li > < a href = "../words-module/index.html" > words< / a > < / li >
< li > < a href = "../html-module/index.html" > html< / a > < / li >
2020-03-19 02:11:25 +02:00
< li > < a href = "../../../inweb/docs/foundation-module/index.html" > foundation< / a > < / li >
2020-04-14 19:56:54 +03:00
< / ul >
2020-03-19 02:11:25 +02:00
< / nav >
< main role = "main" >
2020-04-14 19:56:54 +03:00
<!-- Weave of 'The Package Construct' generated by 7 -->
< ul class = "crumbs" > < li > < a href = "../index.html" > Home< / a > < / li > < li > < a href = "../compiler.html" > Inter Modules< / a > < / li > < li > < a href = "index.html" > bytecode< / a > < / li > < li > < a href = "index.html#4" > Chapter 4: Void Constructs< / a > < / li > < li > < b > The Package Construct< / b > < / li > < / ul > < p class = "purpose" > Defining the package construct.< / p >
2019-03-17 14:40:57 +02:00
< p class = "inwebparagraph" > < a id = "SP1" > < / a > < b > § 1. < / b > < / p >
< pre class = "definitions" >
< span class = "definitionkeyword" > enum< / span > < span class = "constant" > PACKAGE_IST< / span >
< / pre >
< pre class = "display" >
2020-04-14 19:56:54 +03:00
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > Inter::Package::define< button class = "popup" onclick = "togglePopup('usagePopup340')" > ...< span class = "popuptext" id = "usagePopup340" > Usage of < b > Inter::Package::define< / b > :< br > Definition - < a href = "3-dfn.html#SP3" > § 3< / a > < / span > < / button > < / span > < span class = "plain" > (< / span > < span class = "reserved" > void< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > inter_construct< / span > < span class = "plain" > *< / span > < span class = "identifier" > IC< / span > < span class = "plain" > = < / span > < span class = "functiontext" > < a href = "3-dfn.html#SP1" > Inter::Defn::create_construct< / a > < / span > < span class = "plain" > (< / span >
2019-03-17 14:40:57 +02:00
< span class = "constant" > PACKAGE_IST< / span > < span class = "plain" > ,< / span >
< span class = "identifier" > L< / span > < span class = "string" > "package (%i+) (%i+)"< / span > < span class = "plain" > ,< / span >
< span class = "identifier" > I< / span > < span class = "string" > "package"< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "packages"< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > IC< / span > < span class = "plain" > -> < / span > < span class = "element" > usage_permissions< / span > < span class = "plain" > = < / span > < span class = "constant" > OUTSIDE_OF_PACKAGES< / span > < span class = "plain" > + < / span > < span class = "constant" > INSIDE_PLAIN_PACKAGE< / span > < span class = "plain" > + < / span > < span class = "constant" > CAN_HAVE_CHILDREN< / span > < span class = "plain" > ;< / span >
2020-04-16 01:49:59 +03:00
< span class = "identifier" > METHOD_ADD< / span > < span class = "plain" > (< / span > < span class = "identifier" > IC< / span > < span class = "plain" > , < / span > < span class = "constant" > CONSTRUCT_READ_MTID< / span > < span class = "plain" > , < / span > < span class = "functiontext" > < a href = "4-tpc3.html#SP2" > Inter::Package::read< / a > < / span > < span class = "plain" > );< / span >
< span class = "identifier" > METHOD_ADD< / span > < span class = "plain" > (< / span > < span class = "identifier" > IC< / span > < span class = "plain" > , < / span > < span class = "constant" > CONSTRUCT_TRANSPOSE_MTID< / span > < span class = "plain" > , < / span > < span class = "functiontext" > < a href = "4-tpc3.html#SP2" > Inter::Package::transpose< / a > < / span > < span class = "plain" > );< / span >
< span class = "identifier" > METHOD_ADD< / span > < span class = "plain" > (< / span > < span class = "identifier" > IC< / span > < span class = "plain" > , < / span > < span class = "constant" > CONSTRUCT_VERIFY_MTID< / span > < span class = "plain" > , < / span > < span class = "functiontext" > < a href = "4-tpc3.html#SP2" > Inter::Package::verify< / a > < / span > < span class = "plain" > );< / span >
< span class = "identifier" > METHOD_ADD< / span > < span class = "plain" > (< / span > < span class = "identifier" > IC< / span > < span class = "plain" > , < / span > < span class = "constant" > CONSTRUCT_WRITE_MTID< / span > < span class = "plain" > , < / span > < span class = "functiontext" > < a href = "4-tpc3.html#SP2" > Inter::Package::write< / a > < / span > < span class = "plain" > );< / span >
< span class = "identifier" > METHOD_ADD< / span > < span class = "plain" > (< / span > < span class = "identifier" > IC< / span > < span class = "plain" > , < / span > < span class = "constant" > VERIFY_INTER_CHILDREN_MTID< / span > < span class = "plain" > , < / span > < span class = "functiontext" > < a href = "4-tpc3.html#SP2" > Inter::Package::verify_children< / a > < / span > < span class = "plain" > );< / span >
2019-03-17 14:40:57 +02:00
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
< p class = "inwebparagraph" > < a id = "SP2" > < / a > < b > § 2. < / b > < / p >
< pre class = "definitions" >
2020-04-07 03:06:09 +03:00
< span class = "definitionkeyword" > define< / span > < span class = "constant" > PTYPE_PACKAGE_IFLD< / span > < span class = "plain" > < / span > < span class = "constant" > 2< / span >
< span class = "definitionkeyword" > define< / span > < span class = "constant" > SYMBOLS_PACKAGE_IFLD< / span > < span class = "plain" > < / span > < span class = "constant" > 3< / span >
< span class = "definitionkeyword" > define< / span > < span class = "constant" > PID_PACKAGE_IFLD< / span > < span class = "plain" > < / span > < span class = "constant" > 4< / span >
2019-03-17 14:40:57 +02:00
< / pre >
< pre class = "display" >
2020-04-16 01:49:59 +03:00
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > Inter::Package::read< button class = "popup" onclick = "togglePopup('usagePopup341')" > ...< span class = "popuptext" id = "usagePopup341" > Usage of < b > Inter::Package::read< / b > :< br > < a href = "4-tpc3.html#SP1" > § 1< / a > < / span > < / button > < / span > < span class = "plain" > (< / span > < span class = "reserved" > inter_construct< / span > < span class = "plain" > *< / span > < span class = "identifier" > IC< / span > < span class = "plain" > , < / span > < span class = "reserved" > inter_bookmark< / span > < span class = "plain" > *< / span > < span class = "identifier" > IBM< / span > < span class = "plain" > , < / span > < span class = "reserved" > inter_line_parse< / span > < span class = "plain" > *< / span > < span class = "identifier" > ilp< / span > < span class = "plain" > , < / span > < span class = "reserved" > inter_error_location< / span > < span class = "plain" > *< / span > < span class = "identifier" > eloc< / span > < span class = "plain" > , < / span > < span class = "reserved" > inter_error_message< / span > < span class = "plain" > **< / span > < span class = "identifier" > E< / span > < span class = "plain" > ) {< / span >
2020-04-14 19:56:54 +03:00
< span class = "plain" > *< / span > < span class = "identifier" > E< / span > < span class = "plain" > = < / span > < span class = "functiontext" > < a href = "3-dfn.html#SP4" > Inter::Defn::vet_level< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > IBM< / span > < span class = "plain" > , < / span > < span class = "constant" > PACKAGE_IST< / span > < span class = "plain" > , < / span > < span class = "identifier" > ilp< / span > < span class = "plain" > -> < / span > < span class = "element" > indent_level< / span > < span class = "plain" > , < / span > < span class = "identifier" > eloc< / span > < span class = "plain" > );< / span >
2019-07-09 08:45:46 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (*< / span > < span class = "identifier" > E< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > ;< / span >
2019-03-17 14:40:57 +02:00
2020-04-14 19:56:54 +03:00
< span class = "reserved" > inter_symbol< / span > < span class = "plain" > *< / span > < span class = "identifier" > ptype_name< / span > < span class = "plain" > = < / span > < span class = "functiontext" > < a href = "3-iitf.html#SP1" > Inter::Textual::find_symbol< / a > < / span > < span class = "plain" > (< / span > < span class = "functiontext" > < a href = "2-bkm.html#SP1" > Inter::Bookmarks::tree< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > IBM< / span > < span class = "plain" > ), < / span > < span class = "identifier" > eloc< / span > < span class = "plain" > , < / span > < span class = "functiontext" > < a href = "2-it.html#SP2" > Inter::Tree::global_scope< / a > < / span > < span class = "plain" > (< / span > < span class = "functiontext" > < a href = "2-bkm.html#SP1" > Inter::Bookmarks::tree< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > IBM< / span > < span class = "plain" > )), < / span > < span class = "identifier" > ilp< / span > < span class = "plain" > -> < / span > < span class = "element" > mr< / span > < span class = "plain" > .< / span > < span class = "identifier" > exp< / span > < span class = "plain" > [1], < / span > < span class = "constant" > PACKAGETYPE_IST< / span > < span class = "plain" > , < / span > < span class = "identifier" > E< / span > < span class = "plain" > );< / span >
2019-07-09 08:45:46 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (*< / span > < span class = "identifier" > E< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > ;< / span >
2019-03-17 14:40:57 +02:00
< span class = "reserved" > inter_package< / span > < span class = "plain" > *< / span > < span class = "identifier" > pack< / span > < span class = "plain" > = < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
2020-04-16 01:49:59 +03:00
< span class = "plain" > *< / span > < span class = "identifier" > E< / span > < span class = "plain" > = < / span > < span class = "functiontext" > < a href = "4-tpc3.html#SP2" > Inter::Package::new_package_named< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > IBM< / span > < span class = "plain" > , < / span > < span class = "identifier" > ilp< / span > < span class = "plain" > -> < / span > < span class = "element" > mr< / span > < span class = "plain" > .< / span > < span class = "identifier" > exp< / span > < span class = "plain" > [0], < / span > < span class = "identifier" > FALSE< / span > < span class = "plain" > , < / span > < span class = "identifier" > ptype_name< / span > < span class = "plain" > , (< / span > < span class = "constant" > inter_t< / span > < span class = "plain" > ) < / span > < span class = "identifier" > ilp< / span > < span class = "plain" > -> < / span > < span class = "element" > indent_level< / span > < span class = "plain" > , < / span > < span class = "identifier" > eloc< / span > < span class = "plain" > , & < / span > < span class = "identifier" > pack< / span > < span class = "plain" > );< / span >
2019-07-09 08:45:46 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (*< / span > < span class = "identifier" > E< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > ;< / span >
2019-03-17 14:40:57 +02:00
2020-04-14 19:56:54 +03:00
< span class = "functiontext" > < a href = "2-bkm.html#SP1" > Inter::Bookmarks::set_current_package< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > IBM< / span > < span class = "plain" > , < / span > < span class = "identifier" > pack< / span > < span class = "plain" > );< / span >
2019-03-17 14:40:57 +02:00
< span class = "plain" > }< / span >
2020-04-14 19:56:54 +03:00
< span class = "reserved" > inter_error_message< / span > < span class = "plain" > *< / span > < span class = "functiontext" > Inter::Package::new_package_named< button class = "popup" onclick = "togglePopup('usagePopup342')" > ...< span class = "popuptext" id = "usagePopup342" > Usage of < b > Inter::Package::new_package_named< / b > :< br > none< / span > < / button > < / span > < span class = "plain" > (< / span > < span class = "reserved" > inter_bookmark< / span > < span class = "plain" > *< / span > < span class = "identifier" > IBM< / span > < span class = "plain" > , < / span > < span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > name< / span > < span class = "plain" > , < / span > < span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > uniquely< / span > < span class = "plain" > ,< / span >
2019-07-27 13:16:22 +03:00
< span class = "reserved" > inter_symbol< / span > < span class = "plain" > *< / span > < span class = "identifier" > ptype_name< / span > < span class = "plain" > , < / span > < span class = "constant" > inter_t< / span > < span class = "plain" > < / span > < span class = "identifier" > level< / span > < span class = "plain" > , < / span > < span class = "reserved" > inter_error_location< / span > < span class = "plain" > *< / span > < span class = "identifier" > eloc< / span > < span class = "plain" > , < / span > < span class = "reserved" > inter_package< / span > < span class = "plain" > **< / span > < span class = "identifier" > created< / span > < span class = "plain" > ) {< / span >
2019-07-27 17:31:50 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > uniquely< / span > < span class = "plain" > ) {< / span >
< span class = "identifier" > TEMPORARY_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > mutable< / span > < span class = "plain" > );< / span >
< span class = "identifier" > WRITE_TO< / span > < span class = "plain" > (< / span > < span class = "identifier" > mutable< / span > < span class = "plain" > , < / span > < span class = "string" > "%S"< / span > < span class = "plain" > , < / span > < span class = "identifier" > name< / span > < span class = "plain" > );< / span >
< span class = "reserved" > inter_package< / span > < span class = "plain" > *< / span > < span class = "identifier" > pack< / span > < span class = "plain" > ;< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > N< / span > < span class = "plain" > = < / span > < span class = "constant" > 1< / span > < span class = "plain" > , < / span > < span class = "identifier" > A< / span > < span class = "plain" > = < / span > < span class = "constant" > 0< / span > < span class = "plain" > ;< / span >
2020-04-14 19:56:54 +03:00
< span class = "reserved" > while< / span > < span class = "plain" > ((< / span > < span class = "identifier" > pack< / span > < span class = "plain" > = < / span > < span class = "functiontext" > < a href = "2-pck.html#SP3" > Inter::Packages::by_name< / a > < / span > < span class = "plain" > (< / span > < span class = "functiontext" > < a href = "2-bkm.html#SP1" > Inter::Bookmarks::package< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > IBM< / span > < span class = "plain" > ), < / span > < span class = "identifier" > mutable< / span > < span class = "plain" > )) != < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) {< / span >
2019-07-27 17:31:50 +03:00
< span class = "identifier" > TEMPORARY_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > TAIL< / span > < span class = "plain" > );< / span >
< span class = "identifier" > WRITE_TO< / span > < span class = "plain" > (< / span > < span class = "identifier" > TAIL< / span > < span class = "plain" > , < / span > < span class = "string" > "_%d"< / span > < span class = "plain" > , < / span > < span class = "identifier" > N< / span > < span class = "plain" > ++);< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > A< / span > < span class = "plain" > > < / span > < span class = "constant" > 0< / span > < span class = "plain" > ) < / span > < span class = "identifier" > Str::truncate< / span > < span class = "plain" > (< / span > < span class = "identifier" > mutable< / span > < span class = "plain" > , < / span > < span class = "identifier" > Str::len< / span > < span class = "plain" > (< / span > < span class = "identifier" > mutable< / span > < span class = "plain" > ) - < / span > < span class = "identifier" > A< / span > < span class = "plain" > );< / span >
2019-07-27 17:31:50 +03:00
< span class = "identifier" > A< / span > < span class = "plain" > = < / span > < span class = "identifier" > Str::len< / span > < span class = "plain" > (< / span > < span class = "identifier" > TAIL< / span > < span class = "plain" > );< / span >
< span class = "identifier" > WRITE_TO< / span > < span class = "plain" > (< / span > < span class = "identifier" > mutable< / span > < span class = "plain" > , < / span > < span class = "string" > "%S"< / span > < span class = "plain" > , < / span > < span class = "identifier" > TAIL< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > Str::truncate< / span > < span class = "plain" > (< / span > < span class = "identifier" > mutable< / span > < span class = "plain" > , < / span > < span class = "constant" > 31< / span > < span class = "plain" > );< / span >
2019-07-27 17:31:50 +03:00
< span class = "identifier" > DISCARD_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > TAIL< / span > < span class = "plain" > );< / span >
< span class = "plain" > }< / span >
2020-04-16 01:49:59 +03:00
< span class = "reserved" > inter_error_message< / span > < span class = "plain" > *< / span > < span class = "identifier" > E< / span > < span class = "plain" > = < / span > < span class = "functiontext" > < a href = "4-tpc3.html#SP2" > Inter::Package::new_package< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > IBM< / span > < span class = "plain" > , < / span > < span class = "identifier" > mutable< / span > < span class = "plain" > , < / span > < span class = "identifier" > ptype_name< / span > < span class = "plain" > , < / span > < span class = "identifier" > level< / span > < span class = "plain" > , < / span > < span class = "identifier" > eloc< / span > < span class = "plain" > , < / span > < span class = "identifier" > created< / span > < span class = "plain" > );< / span >
2019-07-27 17:31:50 +03:00
< span class = "identifier" > DISCARD_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > mutable< / span > < span class = "plain" > );< / span >
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > E< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
2020-04-16 01:49:59 +03:00
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "functiontext" > < a href = "4-tpc3.html#SP2" > Inter::Package::new_package< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > IBM< / span > < span class = "plain" > , < / span > < span class = "identifier" > name< / span > < span class = "plain" > , < / span > < span class = "identifier" > ptype_name< / span > < span class = "plain" > , < / span > < span class = "identifier" > level< / span > < span class = "plain" > , < / span > < span class = "identifier" > eloc< / span > < span class = "plain" > , < / span > < span class = "identifier" > created< / span > < span class = "plain" > );< / span >
2019-07-27 13:16:22 +03:00
< span class = "plain" > }< / span >
2020-04-14 19:56:54 +03:00
< span class = "reserved" > inter_error_message< / span > < span class = "plain" > *< / span > < span class = "functiontext" > Inter::Package::new_package< button class = "popup" onclick = "togglePopup('usagePopup343')" > ...< span class = "popuptext" id = "usagePopup343" > Usage of < b > Inter::Package::new_package< / b > :< br > Connectors - < a href = "2-cnn.html#SP1" > § 1< / a > < / span > < / button > < / span > < span class = "plain" > (< / span > < span class = "reserved" > inter_bookmark< / span > < span class = "plain" > *< / span > < span class = "identifier" > IBM< / span > < span class = "plain" > , < / span > < span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > name_text< / span > < span class = "plain" > , < / span > < span class = "reserved" > inter_symbol< / span > < span class = "plain" > *< / span > < span class = "identifier" > ptype_name< / span > < span class = "plain" > , < / span > < span class = "constant" > inter_t< / span > < span class = "plain" > < / span > < span class = "identifier" > level< / span > < span class = "plain" > , < / span > < span class = "reserved" > inter_error_location< / span > < span class = "plain" > *< / span > < span class = "identifier" > eloc< / span > < span class = "plain" > , < / span > < span class = "reserved" > inter_package< / span > < span class = "plain" > **< / span > < span class = "identifier" > created< / span > < span class = "plain" > ) {< / span >
< span class = "constant" > inter_t< / span > < span class = "plain" > < / span > < span class = "identifier" > STID< / span > < span class = "plain" > = < / span > < span class = "functiontext" > < a href = "2-tw.html#SP3" > Inter::Warehouse::create_symbols_table< / a > < / span > < span class = "plain" > (< / span > < span class = "functiontext" > < a href = "2-bkm.html#SP1" > Inter::Bookmarks::warehouse< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > IBM< / span > < span class = "plain" > ));< / span >
< span class = "reserved" > inter_tree_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > P< / span > < span class = "plain" > = < / span > < span class = "functiontext" > < a href = "2-in.html#SP4" > Inter::Node::fill_3< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > IBM< / span > < span class = "plain" > ,< / span >
2019-07-27 17:01:50 +03:00
< span class = "constant" > PACKAGE_IST< / span > < span class = "plain" > ,< / span >
2020-04-14 19:56:54 +03:00
< span class = "functiontext" > < a href = "2-st.html#SP9" > Inter::SymbolsTables::id_from_symbol< / a > < / span > < span class = "plain" > (< / span > < span class = "functiontext" > < a href = "2-bkm.html#SP1" > Inter::Bookmarks::tree< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > IBM< / span > < span class = "plain" > ), < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > , < / span > < span class = "identifier" > ptype_name< / span > < span class = "plain" > ), < / span > < span class = "identifier" > STID< / span > < span class = "plain" > , < / span > < span class = "constant" > 0< / span > < span class = "plain" > , < / span > < span class = "identifier" > eloc< / span > < span class = "plain" > , < / span > < span class = "identifier" > level< / span > < span class = "plain" > );< / span >
< span class = "constant" > inter_t< / span > < span class = "plain" > < / span > < span class = "identifier" > PID< / span > < span class = "plain" > = < / span > < span class = "functiontext" > < a href = "2-tw.html#SP3" > Inter::Warehouse::create_package< / a > < / span > < span class = "plain" > (< / span > < span class = "functiontext" > < a href = "2-bkm.html#SP1" > Inter::Bookmarks::warehouse< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > IBM< / span > < span class = "plain" > ), < / span > < span class = "functiontext" > < a href = "2-bkm.html#SP1" > Inter::Bookmarks::tree< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > IBM< / span > < span class = "plain" > ));< / span >
< span class = "reserved" > inter_package< / span > < span class = "plain" > *< / span > < span class = "identifier" > pack< / span > < span class = "plain" > = < / span > < span class = "functiontext" > < a href = "2-tw.html#SP3" > Inter::Warehouse::get_package< / a > < / span > < span class = "plain" > (< / span > < span class = "functiontext" > < a href = "2-bkm.html#SP1" > Inter::Bookmarks::warehouse< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > IBM< / span > < span class = "plain" > ), < / span > < span class = "identifier" > PID< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > pack< / span > < span class = "plain" > -> < / span > < span class = "element" > package_head< / span > < span class = "plain" > = < / span > < span class = "identifier" > P< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > P< / span > < span class = "plain" > -> < / span > < span class = "element" > W< / span > < span class = "plain" > .< / span > < span class = "element" > data< / span > < span class = "plain" > [< / span > < span class = "constant" > PID_PACKAGE_IFLD< / span > < span class = "plain" > ] = < / span > < span class = "identifier" > PID< / span > < span class = "plain" > ;< / span >
2020-04-14 19:56:54 +03:00
< span class = "functiontext" > < a href = "2-pck.html#SP3" > Inter::Packages::set_scope< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > pack< / span > < span class = "plain" > , < / span > < span class = "functiontext" > < a href = "2-tw.html#SP3" > Inter::Warehouse::get_symbols_table< / a > < / span > < span class = "plain" > (< / span > < span class = "functiontext" > < a href = "2-bkm.html#SP1" > Inter::Bookmarks::warehouse< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > IBM< / span > < span class = "plain" > ), < / span > < span class = "identifier" > STID< / span > < span class = "plain" > ));< / span >
< span class = "functiontext" > < a href = "2-tw.html#SP3" > Inter::Warehouse::attribute_resource< / a > < / span > < span class = "plain" > (< / span > < span class = "functiontext" > < a href = "2-bkm.html#SP1" > Inter::Bookmarks::warehouse< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > IBM< / span > < span class = "plain" > ), < / span > < span class = "identifier" > STID< / span > < span class = "plain" > , < / span > < span class = "identifier" > pack< / span > < span class = "plain" > );< / span >
2019-07-27 17:01:50 +03:00
2020-04-14 19:56:54 +03:00
< span class = "reserved" > inter_error_message< / span > < span class = "plain" > *< / span > < span class = "identifier" > E< / span > < span class = "plain" > = < / span > < span class = "functiontext" > < a href = "3-dfn.html#SP4" > Inter::Defn::verify_construct< / a > < / span > < span class = "plain" > (< / span > < span class = "functiontext" > < a href = "2-bkm.html#SP1" > Inter::Bookmarks::package< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > IBM< / span > < span class = "plain" > ), < / span > < span class = "identifier" > P< / span > < span class = "plain" > );< / span >
2019-03-17 14:40:57 +02:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > E< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > E< / span > < span class = "plain" > ;< / span >
2020-04-14 19:56:54 +03:00
< span class = "functiontext" > < a href = "2-bkm.html#SP1" > Inter::Bookmarks::insert< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > IBM< / span > < span class = "plain" > , < / span > < span class = "identifier" > P< / span > < span class = "plain" > );< / span >
2019-03-17 14:40:57 +02:00
2020-04-14 19:56:54 +03:00
< span class = "functiontext" > < a href = "2-pck.html#SP3" > Inter::Packages::set_name< / a > < / span > < span class = "plain" > (< / span > < span class = "functiontext" > < a href = "2-bkm.html#SP1" > Inter::Bookmarks::package< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > IBM< / span > < span class = "plain" > ), < / span > < span class = "identifier" > pack< / span > < span class = "plain" > , < / span > < span class = "identifier" > name_text< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > Str::eq< / span > < span class = "plain" > (< / span > < span class = "identifier" > ptype_name< / span > < span class = "plain" > -> < / span > < span class = "element" > symbol_name< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "_code"< / span > < span class = "plain" > ))< / span >
2020-04-14 19:56:54 +03:00
< span class = "functiontext" > < a href = "2-pck.html#SP3" > Inter::Packages::make_codelike< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > pack< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > Str::eq< / span > < span class = "plain" > (< / span > < span class = "identifier" > ptype_name< / span > < span class = "plain" > -> < / span > < span class = "element" > symbol_name< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "_linkage"< / span > < span class = "plain" > ))< / span >
2020-04-14 19:56:54 +03:00
< span class = "functiontext" > < a href = "2-pck.html#SP3" > Inter::Packages::make_linklike< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > pack< / span > < span class = "plain" > );< / span >
2019-03-17 14:40:57 +02:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > created< / span > < span class = "plain" > ) *< / span > < span class = "identifier" > created< / span > < span class = "plain" > = < / span > < span class = "identifier" > pack< / span > < span class = "plain" > ;< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > LOGIF< / span > < span class = "plain" > (< / span > < span class = "identifier" > INTER_SYMBOLS< / span > < span class = "plain" > , < / span > < span class = "string" > "Package $6 at IBM $5\n"< / span > < span class = "plain" > , < / span > < span class = "identifier" > pack< / span > < span class = "plain" > , < / span > < span class = "identifier" > IBM< / span > < span class = "plain" > );< / span >
2019-03-17 14:40:57 +02:00
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
2020-04-16 01:49:59 +03:00
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > Inter::Package::transpose< button class = "popup" onclick = "togglePopup('usagePopup344')" > ...< span class = "popuptext" id = "usagePopup344" > Usage of < b > Inter::Package::transpose< / b > :< br > < a href = "4-tpc3.html#SP1" > § 1< / a > < / span > < / button > < / span > < span class = "plain" > (< / span > < span class = "reserved" > inter_construct< / span > < span class = "plain" > *< / span > < span class = "identifier" > IC< / span > < span class = "plain" > , < / span > < span class = "reserved" > inter_tree_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > P< / span > < span class = "plain" > , < / span > < span class = "constant" > inter_t< / span > < span class = "plain" > *< / span > < span class = "identifier" > grid< / span > < span class = "plain" > , < / span > < span class = "constant" > inter_t< / span > < span class = "plain" > < / span > < span class = "identifier" > grid_extent< / span > < span class = "plain" > , < / span > < span class = "reserved" > inter_error_message< / span > < span class = "plain" > **< / span > < span class = "identifier" > E< / span > < span class = "plain" > ) {< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > P< / span > < span class = "plain" > -> < / span > < span class = "element" > W< / span > < span class = "plain" > .< / span > < span class = "element" > data< / span > < span class = "plain" > [< / span > < span class = "constant" > PID_PACKAGE_IFLD< / span > < span class = "plain" > ] = < / span > < span class = "identifier" > grid< / span > < span class = "plain" > [< / span > < span class = "identifier" > P< / span > < span class = "plain" > -> < / span > < span class = "element" > W< / span > < span class = "plain" > .< / span > < span class = "element" > data< / span > < span class = "plain" > [< / span > < span class = "constant" > PID_PACKAGE_IFLD< / span > < span class = "plain" > ]];< / span >
< span class = "identifier" > P< / span > < span class = "plain" > -> < / span > < span class = "element" > W< / span > < span class = "plain" > .< / span > < span class = "element" > data< / span > < span class = "plain" > [< / span > < span class = "constant" > SYMBOLS_PACKAGE_IFLD< / span > < span class = "plain" > ] = < / span > < span class = "identifier" > grid< / span > < span class = "plain" > [< / span > < span class = "identifier" > P< / span > < span class = "plain" > -> < / span > < span class = "element" > W< / span > < span class = "plain" > .< / span > < span class = "element" > data< / span > < span class = "plain" > [< / span > < span class = "constant" > SYMBOLS_PACKAGE_IFLD< / span > < span class = "plain" > ]];< / span >
2019-07-23 22:07:01 +03:00
< span class = "plain" > }< / span >
2020-04-16 01:49:59 +03:00
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > Inter::Package::verify< button class = "popup" onclick = "togglePopup('usagePopup345')" > ...< span class = "popuptext" id = "usagePopup345" > Usage of < b > Inter::Package::verify< / b > :< br > < a href = "4-tpc3.html#SP1" > § 1< / a > < / span > < / button > < / span > < span class = "plain" > (< / span > < span class = "reserved" > inter_construct< / span > < span class = "plain" > *< / span > < span class = "identifier" > IC< / span > < span class = "plain" > , < / span > < span class = "reserved" > inter_tree_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > P< / span > < span class = "plain" > , < / span > < span class = "reserved" > inter_package< / span > < span class = "plain" > *< / span > < span class = "identifier" > owner< / span > < span class = "plain" > , < / span > < span class = "reserved" > inter_error_message< / span > < span class = "plain" > **< / span > < span class = "identifier" > E< / span > < span class = "plain" > ) {< / span >
2020-04-14 19:56:54 +03:00
< span class = "reserved" > inter_package< / span > < span class = "plain" > *< / span > < span class = "identifier" > pack< / span > < span class = "plain" > = < / span > < span class = "functiontext" > < a href = "2-in.html#SP3" > Inter::Node::ID_to_package< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > P< / span > < span class = "plain" > , < / span > < span class = "identifier" > P< / span > < span class = "plain" > -> < / span > < span class = "element" > W< / span > < span class = "plain" > .< / span > < span class = "element" > data< / span > < span class = "plain" > [< / span > < span class = "constant" > PID_PACKAGE_IFLD< / span > < span class = "plain" > ]);< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > pack< / span > < span class = "plain" > ) < / span > < span class = "identifier" > pack< / span > < span class = "plain" > -> < / span > < span class = "element" > package_head< / span > < span class = "plain" > = < / span > < span class = "identifier" > P< / span > < span class = "plain" > ;< / span >
2019-07-27 17:01:50 +03:00
< span class = "reserved" > else< / span > < span class = "plain" > < / span > < span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "uh?"< / span > < span class = "plain" > );< / span >
2020-04-14 19:56:54 +03:00
< span class = "reserved" > inter_symbols_table< / span > < span class = "plain" > *< / span > < span class = "identifier" > T< / span > < span class = "plain" > = < / span > < span class = "functiontext" > < a href = "2-pck.html#SP3" > Inter::Packages::scope< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > owner< / span > < span class = "plain" > );< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > T< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "identifier" > T< / span > < span class = "plain" > = < / span > < span class = "functiontext" > < a href = "2-in.html#SP3" > Inter::Node::globals< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > P< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > < a href = "3-dfn.html#SP4" > Inter::Defn::set_latest_block_package< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > pack< / span > < span class = "plain" > );< / span >
2019-03-17 14:40:57 +02:00
< span class = "plain" > }< / span >
2020-04-16 01:49:59 +03:00
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > Inter::Package::write< button class = "popup" onclick = "togglePopup('usagePopup346')" > ...< span class = "popuptext" id = "usagePopup346" > Usage of < b > Inter::Package::write< / b > :< br > < a href = "4-tpc3.html#SP1" > § 1< / a > < / span > < / button > < / span > < span class = "plain" > (< / span > < span class = "reserved" > inter_construct< / span > < span class = "plain" > *< / span > < span class = "identifier" > IC< / span > < span class = "plain" > , < / span > < span class = "identifier" > OUTPUT_STREAM< / span > < span class = "plain" > , < / span > < span class = "reserved" > inter_tree_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > P< / span > < span class = "plain" > , < / span > < span class = "reserved" > inter_error_message< / span > < span class = "plain" > **< / span > < span class = "identifier" > E< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > inter_package< / span > < span class = "plain" > *< / span > < span class = "identifier" > pack< / span > < span class = "plain" > = < / span > < span class = "functiontext" > < a href = "4-tpc3.html#SP2" > Inter::Package::defined_by_frame< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > P< / span > < span class = "plain" > );< / span >
2020-04-14 19:56:54 +03:00
< span class = "reserved" > inter_symbol< / span > < span class = "plain" > *< / span > < span class = "identifier" > ptype_name< / span > < span class = "plain" > = < / span > < span class = "functiontext" > < a href = "2-st.html#SP7" > Inter::SymbolsTables::global_symbol_from_frame_data< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > P< / span > < span class = "plain" > , < / span > < span class = "constant" > PTYPE_PACKAGE_IFLD< / span > < span class = "plain" > );< / span >
2019-07-27 17:01:50 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > ((< / span > < span class = "identifier" > pack< / span > < span class = "plain" > ) & & (< / span > < span class = "identifier" > ptype_name< / span > < span class = "plain" > )) {< / span >
2020-04-14 19:56:54 +03:00
< span class = "identifier" > WRITE< / span > < span class = "plain" > (< / span > < span class = "string" > "package %S %S"< / span > < span class = "plain" > , < / span > < span class = "functiontext" > < a href = "2-pck.html#SP3" > Inter::Packages::name< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > pack< / span > < span class = "plain" > ), < / span > < span class = "identifier" > ptype_name< / span > < span class = "plain" > -> < / span > < span class = "element" > symbol_name< / span > < span class = "plain" > );< / span >
2019-03-17 14:40:57 +02:00
< span class = "plain" > } < / span > < span class = "reserved" > else< / span > < span class = "plain" > {< / span >
2020-04-14 19:56:54 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > pack< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) { *< / span > < span class = "identifier" > E< / span > < span class = "plain" > = < / span > < span class = "functiontext" > < a href = "2-in.html#SP6" > Inter::Node::error< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > P< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "package can't be written - no name"< / span > < span class = "plain" > , < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ); < / span > < span class = "reserved" > return< / span > < span class = "plain" > ; }< / span >
< span class = "plain" > *< / span > < span class = "identifier" > E< / span > < span class = "plain" > = < / span > < span class = "functiontext" > < a href = "2-in.html#SP6" > Inter::Node::error< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > P< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "package can't be written - no type"< / span > < span class = "plain" > , < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ); < / span > < span class = "reserved" > return< / span > < span class = "plain" > ;< / span >
2019-03-17 14:40:57 +02:00
< span class = "plain" > }< / span >
< span class = "plain" > }< / span >
2020-04-14 19:56:54 +03:00
< span class = "reserved" > inter_error_message< / span > < span class = "plain" > *< / span > < span class = "functiontext" > Inter::Package::write_symbols< button class = "popup" onclick = "togglePopup('usagePopup347')" > ...< span class = "popuptext" id = "usagePopup347" > Usage of < b > Inter::Package::write_symbols< / b > :< br > Definition - < a href = "3-dfn.html#SP4" > § 4< / a > < / span > < / button > < / span > < span class = "plain" > (< / span > < span class = "identifier" > OUTPUT_STREAM< / span > < span class = "plain" > , < / span > < span class = "reserved" > inter_tree_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > P< / span > < span class = "plain" > ) {< / span >
2020-04-16 01:49:59 +03:00
< span class = "reserved" > inter_package< / span > < span class = "plain" > *< / span > < span class = "identifier" > pack< / span > < span class = "plain" > = < / span > < span class = "functiontext" > < a href = "4-tpc3.html#SP2" > Inter::Package::defined_by_frame< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > P< / span > < span class = "plain" > );< / span >
2019-07-27 17:01:50 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > pack< / span > < span class = "plain" > ) {< / span >
2020-04-14 19:56:54 +03:00
< span class = "reserved" > inter_symbols_table< / span > < span class = "plain" > *< / span > < span class = "identifier" > locals< / span > < span class = "plain" > = < / span > < span class = "functiontext" > < a href = "2-pck.html#SP3" > Inter::Packages::scope< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > pack< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > < a href = "2-st.html#SP3" > Inter::SymbolsTables::write_declarations< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > OUT< / span > < span class = "plain" > , < / span > < span class = "identifier" > locals< / span > < span class = "plain" > , (< / span > < span class = "reserved" > int< / span > < span class = "plain" > ) (< / span > < span class = "identifier" > P< / span > < span class = "plain" > -> < / span > < span class = "element" > W< / span > < span class = "plain" > .< / span > < span class = "element" > data< / span > < span class = "plain" > [< / span > < span class = "constant" > LEVEL_IFLD< / span > < span class = "plain" > ] + < / span > < span class = "constant" > 1< / span > < span class = "plain" > ));< / span >
2019-03-17 14:40:57 +02:00
< span class = "plain" > }< / span >
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
2020-04-14 19:56:54 +03:00
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "functiontext" > Inter::Package::is< button class = "popup" onclick = "togglePopup('usagePopup348')" > ...< span class = "popuptext" id = "usagePopup348" > Usage of < b > Inter::Package::is< / b > :< br > none< / span > < / button > < / span > < span class = "plain" > (< / span > < span class = "reserved" > inter_symbol< / span > < span class = "plain" > *< / span > < span class = "identifier" > package_name< / span > < span class = "plain" > ) {< / span >
2019-03-17 14:40:57 +02:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > package_name< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > FALSE< / span > < span class = "plain" > ;< / span >
2020-04-14 19:56:54 +03:00
< span class = "reserved" > inter_tree_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > D< / span > < span class = "plain" > = < / span > < span class = "functiontext" > < a href = "2-sym.html#SP4" > Inter::Symbols::definition< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > package_name< / span > < span class = "plain" > );< / span >
2019-07-24 22:29:29 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > D< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > FALSE< / span > < span class = "plain" > ;< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > D< / span > < span class = "plain" > -> < / span > < span class = "element" > W< / span > < span class = "plain" > .< / span > < span class = "element" > data< / span > < span class = "plain" > [< / span > < span class = "constant" > ID_IFLD< / span > < span class = "plain" > ] != < / span > < span class = "constant" > PACKAGE_IST< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > FALSE< / span > < span class = "plain" > ;< / span >
2019-03-17 14:40:57 +02:00
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > TRUE< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
2020-04-14 19:56:54 +03:00
< span class = "reserved" > inter_package< / span > < span class = "plain" > *< / span > < span class = "functiontext" > Inter::Package::which< button class = "popup" onclick = "togglePopup('usagePopup349')" > ...< span class = "popuptext" id = "usagePopup349" > Usage of < b > Inter::Package::which< / b > :< br > none< / span > < / button > < / span > < span class = "plain" > (< / span > < span class = "reserved" > inter_symbol< / span > < span class = "plain" > *< / span > < span class = "identifier" > package_name< / span > < span class = "plain" > ) {< / span >
2019-03-17 14:40:57 +02:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > package_name< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
2020-04-14 19:56:54 +03:00
< span class = "reserved" > inter_tree_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > D< / span > < span class = "plain" > = < / span > < span class = "functiontext" > < a href = "2-sym.html#SP4" > Inter::Symbols::definition< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > package_name< / span > < span class = "plain" > );< / span >
2019-07-24 22:29:29 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > D< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
2020-04-14 19:56:54 +03:00
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "functiontext" > < a href = "2-in.html#SP3" > Inter::Node::ID_to_package< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > D< / span > < span class = "plain" > , < / span > < span class = "identifier" > D< / span > < span class = "plain" > -> < / span > < span class = "element" > W< / span > < span class = "plain" > .< / span > < span class = "element" > data< / span > < span class = "plain" > [< / span > < span class = "constant" > PID_PACKAGE_IFLD< / span > < span class = "plain" > ]);< / span >
2019-03-17 14:40:57 +02:00
< span class = "plain" > }< / span >
2020-04-14 19:56:54 +03:00
< span class = "reserved" > inter_package< / span > < span class = "plain" > *< / span > < span class = "functiontext" > Inter::Package::defined_by_frame< button class = "popup" onclick = "togglePopup('usagePopup350')" > ...< span class = "popuptext" id = "usagePopup350" > Usage of < b > Inter::Package::defined_by_frame< / b > :< br > Bookmarks - < a href = "2-bkm.html#SP1" > § 1< / a > < br > Symbols Tables - < a href = "2-st.html#SP10" > § 10< / a > < br > Packages - < a href = "2-pck.html#SP3" > § 3< / a > < br > Transmigration - < a href = "2-trn.html#SP3" > § 3< / a > , < a href = "2-trn.html#SP4" > § 4< / a > < / span > < / button > < / span > < span class = "plain" > (< / span > < span class = "reserved" > inter_tree_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > D< / span > < span class = "plain" > ) {< / span >
2019-07-24 22:29:29 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > D< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > D< / span > < span class = "plain" > -> < / span > < span class = "element" > W< / span > < span class = "plain" > .< / span > < span class = "element" > data< / span > < span class = "plain" > [< / span > < span class = "constant" > ID_IFLD< / span > < span class = "plain" > ] != < / span > < span class = "constant" > PACKAGE_IST< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
2020-04-14 19:56:54 +03:00
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "functiontext" > < a href = "2-in.html#SP3" > Inter::Node::ID_to_package< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > D< / span > < span class = "plain" > , < / span > < span class = "identifier" > D< / span > < span class = "plain" > -> < / span > < span class = "element" > W< / span > < span class = "plain" > .< / span > < span class = "element" > data< / span > < span class = "plain" > [< / span > < span class = "constant" > PID_PACKAGE_IFLD< / span > < span class = "plain" > ]);< / span >
2019-07-13 16:17:48 +03:00
< span class = "plain" > }< / span >
2020-04-14 19:56:54 +03:00
< span class = "reserved" > inter_symbol< / span > < span class = "plain" > *< / span > < span class = "functiontext" > Inter::Package::type< button class = "popup" onclick = "togglePopup('usagePopup351')" > ...< span class = "popuptext" id = "usagePopup351" > Usage of < b > Inter::Package::type< / b > :< br > Packages - < a href = "2-pck.html#SP3" > § 3< / a > < / span > < / button > < / span > < span class = "plain" > (< / span > < span class = "reserved" > inter_package< / span > < span class = "plain" > *< / span > < span class = "identifier" > pack< / span > < span class = "plain" > ) {< / span >
2019-07-27 13:16:22 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > pack< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > inter_tree_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > D< / span > < span class = "plain" > = < / span > < span class = "identifier" > pack< / span > < span class = "plain" > -> < / span > < span class = "element" > package_head< / span > < span class = "plain" > ;< / span >
2020-04-14 19:56:54 +03:00
< span class = "reserved" > inter_symbol< / span > < span class = "plain" > *< / span > < span class = "identifier" > ptype_name< / span > < span class = "plain" > = < / span > < span class = "functiontext" > < a href = "2-st.html#SP7" > Inter::SymbolsTables::global_symbol_from_frame_data< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > D< / span > < span class = "plain" > , < / span > < span class = "constant" > PTYPE_PACKAGE_IFLD< / span > < span class = "plain" > );< / span >
2019-03-17 14:40:57 +02:00
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > ptype_name< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
2020-04-14 19:56:54 +03:00
< span class = "reserved" > inter_symbols_table< / span > < span class = "plain" > *< / span > < span class = "functiontext" > Inter::Package::local_symbols< button class = "popup" onclick = "togglePopup('usagePopup352')" > ...< span class = "popuptext" id = "usagePopup352" > Usage of < b > Inter::Package::local_symbols< / b > :< br > none< / span > < / button > < / span > < span class = "plain" > (< / span > < span class = "reserved" > inter_symbol< / span > < span class = "plain" > *< / span > < span class = "identifier" > package_name< / span > < span class = "plain" > ) {< / span >
2019-03-17 14:40:57 +02:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > package_name< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
2020-04-14 19:56:54 +03:00
< span class = "reserved" > inter_tree_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > D< / span > < span class = "plain" > = < / span > < span class = "functiontext" > < a href = "2-sym.html#SP4" > Inter::Symbols::definition< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > package_name< / span > < span class = "plain" > );< / span >
2019-07-24 22:29:29 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > D< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > D< / span > < span class = "plain" > -> < / span > < span class = "element" > W< / span > < span class = "plain" > .< / span > < span class = "element" > data< / span > < span class = "plain" > [< / span > < span class = "constant" > ID_IFLD< / span > < span class = "plain" > ] != < / span > < span class = "constant" > PACKAGE_IST< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
2020-04-14 19:56:54 +03:00
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "functiontext" > < a href = "2-in.html#SP3" > Inter::Node::ID_to_symbols_table< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > D< / span > < span class = "plain" > , < / span > < span class = "identifier" > D< / span > < span class = "plain" > -> < / span > < span class = "element" > W< / span > < span class = "plain" > .< / span > < span class = "element" > data< / span > < span class = "plain" > [< / span > < span class = "constant" > SYMBOLS_PACKAGE_IFLD< / span > < span class = "plain" > ]);< / span >
2019-03-17 14:40:57 +02:00
< span class = "plain" > }< / span >
2020-04-16 01:49:59 +03:00
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > Inter::Package::verify_children< button class = "popup" onclick = "togglePopup('usagePopup353')" > ...< span class = "popuptext" id = "usagePopup353" > Usage of < b > Inter::Package::verify_children< / b > :< br > < a href = "4-tpc3.html#SP1" > § 1< / a > < / span > < / button > < / span > < span class = "plain" > (< / span > < span class = "reserved" > inter_construct< / span > < span class = "plain" > *< / span > < span class = "identifier" > IC< / span > < span class = "plain" > , < / span > < span class = "reserved" > inter_tree_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > P< / span > < span class = "plain" > , < / span > < span class = "reserved" > inter_error_message< / span > < span class = "plain" > **< / span > < span class = "identifier" > E< / span > < span class = "plain" > ) {< / span >
2020-04-14 19:56:54 +03:00
< span class = "reserved" > inter_symbol< / span > < span class = "plain" > *< / span > < span class = "identifier" > ptype_name< / span > < span class = "plain" > = < / span > < span class = "functiontext" > < a href = "2-st.html#SP7" > Inter::SymbolsTables::global_symbol_from_frame_data< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > P< / span > < span class = "plain" > , < / span > < span class = "constant" > PTYPE_PACKAGE_IFLD< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > Str::eq< / span > < span class = "plain" > (< / span > < span class = "identifier" > ptype_name< / span > < span class = "plain" > -> < / span > < span class = "element" > symbol_name< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "_code"< / span > < span class = "plain" > )) {< / span >
2019-07-10 12:27:52 +03:00
< span class = "identifier" > LOOP_THROUGH_INTER_CHILDREN< / span > < span class = "plain" > (< / span > < span class = "identifier" > C< / span > < span class = "plain" > , < / span > < span class = "identifier" > P< / span > < span class = "plain" > ) {< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > ((< / span > < span class = "identifier" > C< / span > < span class = "plain" > -> < / span > < span class = "element" > W< / span > < span class = "plain" > .< / span > < span class = "identifier" > data< / span > < span class = "plain" > [0] != < / span > < span class = "constant" > LABEL_IST< / span > < span class = "plain" > ) & & (< / span > < span class = "identifier" > C< / span > < span class = "plain" > -> < / span > < span class = "element" > W< / span > < span class = "plain" > .< / span > < span class = "element" > data< / span > < span class = "plain" > [0] != < / span > < span class = "constant" > LOCAL_IST< / span > < span class = "plain" > ) & & (< / span > < span class = "identifier" > C< / span > < span class = "plain" > -> < / span > < span class = "element" > W< / span > < span class = "plain" > .< / span > < span class = "element" > data< / span > < span class = "plain" > [0] != < / span > < span class = "constant" > SYMBOL_IST< / span > < span class = "plain" > )) {< / span >
2020-04-14 19:56:54 +03:00
< span class = "plain" > *< / span > < span class = "identifier" > E< / span > < span class = "plain" > = < / span > < span class = "functiontext" > < a href = "2-in.html#SP6" > Inter::Node::error< / a > < / span > < span class = "plain" > (< / span > < span class = "identifier" > C< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "only a local or a symbol can be at the top level"< / span > < span class = "plain" > , < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > );< / span >
2019-07-08 13:21:00 +03:00
< span class = "reserved" > return< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
< span class = "plain" > }< / span >
2019-03-17 14:40:57 +02:00
< span class = "plain" > }< / span >
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
< hr class = "tocbar" >
< ul class = "toc" > < li > < a href = "4-tpc2.html" > Back to 'The PackageType Construct'< / a > < / li > < li > < a href = "4-tkc.html" > Continue with 'The Kind Construct'< / a > < / li > < / ul > < hr class = "tocbar" >
2019-04-22 17:42:10 +03:00
<!-- End of weave -->
2020-04-14 19:56:54 +03:00
< script >
function togglePopup(material_id) {
var popup = document.getElementById(material_id);
popup.classList.toggle("show");
}
< / script >
< link href = "Popups.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
2020-03-19 02:11:25 +02:00
< / main >
2019-03-17 14:40:57 +02:00
< / body >
< / html >