2019-04-27 02:19:28 +03:00
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
< html >
< head >
2019-08-28 12:35:44 +03:00
< title > 2/is< / title >
2020-03-19 02:11:25 +02:00
< meta name = "viewport" content = "width=device-width initial-scale=1" >
2019-04-27 02:19:28 +03: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-04-27 02:19:28 +03: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" > < b > compiler tools< / b > < / 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 >
< / ul >
< h2 > Compiler Webs< / h2 >
< ul >
< li > < a href = "../inbuild/index.html" > inbuild< / a > < / li >
< li > < a href = "../inform7/index.html" > inform7< / a > < / li >
< li > < a href = "../inter/index.html" > inter< / a > < / li >
< / ul >
< h2 > Inbuild Modules< / h2 >
< ul >
< li > < a href = "../inbuild-module/index.html" > inbuild< / a > < / li >
< li > < a href = "../arch-module/index.html" > arch< / a > < / li >
< li > < a href = "../words-module/index.html" > words< / a > < / li >
< li > < a href = "../syntax-module/index.html" > syntax< / a > < / li >
< li > < a href = "../html-module/index.html" > html< / a > < / li >
< / ul >
< h2 > Inform7 Modules< / h2 >
< ul >
< li > < a href = "../core-module/index.html" > core< / a > < / li >
< li > < a href = "../problems-module/index.html" > problems< / a > < / li >
< li > < a href = "../inflections-module/index.html" > inflections< / a > < / li >
< li > < a href = "../linguistics-module/index.html" > linguistics< / a > < / li >
< li > < a href = "../kinds-module/index.html" > kinds< / a > < / li >
< li > < a href = "../if-module/index.html" > if< / a > < / li >
< li > < a href = "../multimedia-module/index.html" > multimedia< / a > < / li >
< li > < a href = "../index-module/index.html" > index< / a > < / li >
< / ul >
< h2 > Inter Modules< / h2 >
< ul >
< li > < a href = "../inter-module/index.html" > inter< / a > < / li >
< li > < a href = "../building-module/index.html" > building< / a > < / li >
< li > < a href = "../codegen-module/index.html" > codegen< / a > < / li >
< / ul >
< h2 > Foundation< / h2 >
< ul >
< li > < a href = "../../../inweb/docs/foundation-module/index.html" > foundation< / a > < / li >
< / ul >
< / nav >
< main role = "main" >
2019-08-28 12:35:44 +03:00
<!-- Weave of '2/eis' generated by 7 -->
2020-03-22 12:50:19 +02:00
< ul class = "crumbs" > < li > < a href = "../webs.html" > Source< / a > < / li > < li > < a href = "../compiler.html" > Compiler Modules< / a > < / li > < li > < a href = "index.html" > building< / a > < / li > < li > < a href = "index.html#2" > Chapter 2: Blueprints< / a > < / li > < li > < b > Emitting Inter Schemas< / b > < / li > < / ul > < p class = "inwebparagraph" > < a id = "SP1" > < / a > < b > § 1. Compilation. < / b > < / p >
2019-04-27 02:19:28 +03:00
< pre class = "display" >
2019-08-31 15:56:36 +03:00
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > EmitInterSchemas::emit< / span > < span class = "plain" > (< / span > < span class = "identifier" > inter_tree< / span > < span class = "plain" > *< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "reserved" > value_holster< / span > < span class = "plain" > *< / span > < span class = "identifier" > VH< / span > < span class = "plain" > , < / span > < span class = "reserved" > inter_schema< / span > < span class = "plain" > *< / span > < span class = "identifier" > sch< / span > < span class = "plain" > , < / span > < span class = "reserved" > void< / span > < span class = "plain" > *< / span > < span class = "identifier" > opaque_state< / span > < span class = "plain" > ,< / span >
2019-04-27 23:11:52 +03:00
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > to_code< / span > < span class = "plain" > , < / span > < span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > to_val< / span > < span class = "plain" > , < / span > < span class = "identifier" > inter_symbols_table< / span > < span class = "plain" > *< / span > < span class = "identifier" > first_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > inter_symbols_table< / span > < span class = "plain" > *< / span > < span class = "identifier" > second_call< / span > < span class = "plain" > ,< / span >
2019-08-24 13:21:48 +03:00
< span class = "reserved" > void< / span > < span class = "plain" > (*< / span > < span class = "identifier" > inline_command_handler< / span > < span class = "plain" > )(< / span > < span class = "reserved" > value_holster< / span > < span class = "plain" > *< / span > < span class = "identifier" > VH< / span > < span class = "plain" > , < / span > < span class = "reserved" > inter_schema_token< / span > < span class = "plain" > *< / span > < span class = "identifier" > t< / span > < span class = "plain" > , < / span > < span class = "reserved" > void< / span > < span class = "plain" > *< / span > < span class = "identifier" > opaque_state< / span > < span class = "plain" > , < / span > < span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > prim_cat< / span > < span class = "plain" > ),< / span >
2019-04-27 02:19:28 +03:00
< span class = "reserved" > void< / span > < span class = "plain" > (*< / span > < span class = "identifier" > i7_source_handler< / span > < span class = "plain" > )(< / span > < span class = "reserved" > value_holster< / span > < span class = "plain" > *< / span > < span class = "identifier" > VH< / span > < span class = "plain" > , < / span > < span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > OUT< / span > < span class = "plain" > , < / span > < span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > S< / 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" > sch< / span > < span class = "plain" > -> < / span > < span class = "element" > mid_case< / span > < span class = "plain" > ) { < / span > < span class = "functiontext" > Produce::to_last_level< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > 4< / span > < span class = "plain" > ); }< / span >
2019-04-27 02:19:28 +03:00
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > prim_cat< / span > < span class = "plain" > = < / span > < span class = "identifier" > VAL_PRIM_CAT< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > to_code< / span > < span class = "plain" > ) < / span > < span class = "identifier" > prim_cat< / span > < span class = "plain" > = < / span > < span class = "identifier" > CODE_PRIM_CAT< / span > < span class = "plain" > ;< / span >
2019-05-05 16:54:24 +03:00
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > again< / span > < span class = "plain" > = < / span > < span class = "identifier" > TRUE< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > while< / span > < span class = "plain" > (< / span > < span class = "identifier" > again< / span > < span class = "plain" > ) {< / span >
< span class = "identifier" > again< / 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" > for< / span > < span class = "plain" > (< / span > < span class = "reserved" > inter_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > isn< / span > < span class = "plain" > = < / span > < span class = "identifier" > sch< / span > < span class = "plain" > -> < / span > < span class = "element" > node_tree< / span > < span class = "plain" > ; < / span > < span class = "identifier" > isn< / span > < span class = "plain" > ; < / span > < span class = "identifier" > isn< / span > < span class = "plain" > =< / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > )< / span >
2019-08-31 15:56:36 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "functiontext" > EmitInterSchemas::process_conditionals< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > isn< / span > < span class = "plain" > , < / span > < span class = "identifier" > first_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > second_call< / span > < span class = "plain" > ))< / span >
2019-05-05 16:54:24 +03:00
< span class = "identifier" > again< / span > < span class = "plain" > = < / span > < span class = "identifier" > TRUE< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > for< / span > < span class = "plain" > (< / span > < span class = "reserved" > inter_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > isn< / span > < span class = "plain" > = < / span > < span class = "identifier" > sch< / span > < span class = "plain" > -> < / span > < span class = "element" > node_tree< / span > < span class = "plain" > ; < / span > < span class = "identifier" > isn< / span > < span class = "plain" > ; < / span > < span class = "identifier" > isn< / span > < span class = "plain" > =< / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > )< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > EmitInterSchemas::emit_inner< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > isn< / span > < span class = "plain" > , < / span > < span class = "identifier" > VH< / span > < span class = "plain" > , < / span > < span class = "identifier" > sch< / span > < span class = "plain" > , < / span > < span class = "identifier" > opaque_state< / span > < span class = "plain" > , < / span > < span class = "identifier" > prim_cat< / span > < span class = "plain" > , < / span > < span class = "identifier" > first_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > second_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > inline_command_handler< / span > < span class = "plain" > , < / span > < span class = "identifier" > i7_source_handler< / span > < span class = "plain" > );< / span >
2019-04-27 02:19:28 +03:00
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
2019-08-28 12:35:44 +03:00
< p class = "endnote" > The function EmitInterSchemas::emit appears nowhere else.< / p >
2019-04-27 02:19:28 +03:00
< p class = "inwebparagraph" > < a id = "SP2" > < / a > < b > § 2. < / b > < / p >
2019-05-05 16:54:24 +03:00
< pre class = "display" >
2019-08-31 15:56:36 +03:00
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "functiontext" > EmitInterSchemas::process_conditionals< / span > < span class = "plain" > (< / span > < span class = "identifier" > inter_tree< / span > < span class = "plain" > *< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "reserved" > inter_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > isn< / span > < span class = "plain" > , < / span > < span class = "identifier" > inter_symbols_table< / span > < span class = "plain" > *< / span > < span class = "identifier" > first_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > inter_symbols_table< / span > < span class = "plain" > *< / span > < span class = "identifier" > second_call< / span > < span class = "plain" > ) {< / span >
2019-05-05 16:54:24 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > isn< / 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" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > blocked_by_conditional< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > FALSE< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > isn_type< / span > < span class = "plain" > == < / span > < span class = "constant" > DIRECTIVE_ISNT< / span > < span class = "plain" > ) < / span > < < span class = "cwebmacro" > Directive< / span > < span class = "cwebmacronumber" > 2.1< / span > > < span class = "plain" > ;< / span >
< span class = "reserved" > for< / span > < span class = "plain" > (< / span > < span class = "identifier" > isn< / span > < span class = "plain" > =< / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / span > < span class = "plain" > ; < / span > < span class = "identifier" > isn< / span > < span class = "plain" > ; < / span > < span class = "identifier" > isn< / span > < span class = "plain" > =< / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > )< / span >
2019-08-31 15:56:36 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "functiontext" > EmitInterSchemas::process_conditionals< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > isn< / span > < span class = "plain" > , < / span > < span class = "identifier" > first_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > second_call< / span > < span class = "plain" > ))< / span >
2019-05-05 16:54:24 +03:00
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > TRUE< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > FALSE< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
< p class = "endnote" > The function EmitInterSchemas::process_conditionals is used in < a href = "#SP1" > § 1< / a > .< / p >
< p class = "inwebparagraph" > < a id = "SP2_1" > < / a > < b > § 2.1. < / b > < code class = "display" >
< < span class = "cwebmacrodefn" > Directive< / span > < span class = "cwebmacronumber" > 2.1< / span > > =
< / code > < / p >
< pre class = "displaydefn" >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > ((< / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "identifier" > dir_clarifier< / span > < span class = "plain" > == < / span > < span class = "constant" > IFDEF_I6RW< / span > < span class = "plain" > ) ||< / span >
< span class = "plain" > (< / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > dir_clarifier< / span > < span class = "plain" > == < / span > < span class = "constant" > IFNDEF_I6RW< / span > < span class = "plain" > ) ||< / span >
< span class = "plain" > (< / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > dir_clarifier< / span > < span class = "plain" > == < / span > < span class = "constant" > IFTRUE_I6RW< / span > < span class = "plain" > ) ||< / span >
< span class = "plain" > (< / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > dir_clarifier< / span > < span class = "plain" > == < / span > < span class = "constant" > IFFALSE_I6RW< / span > < span class = "plain" > )) {< / span >
< span class = "identifier" > LOGIF< / span > < span class = "plain" > (< / span > < span class = "identifier" > SCHEMA_COMPILATION< / span > < span class = "plain" > , < / span > < span class = "string" > "Conditional directive in schema!\n"< / span > < span class = "plain" > );< / span >
2019-08-24 13:21:48 +03:00
< span class = "reserved" > inter_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > ifnot_node< / span > < span class = "plain" > = < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > , *< / span > < span class = "identifier" > endif_node< / 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_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > at< / span > < span class = "plain" > = < / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > ;< / span >
2019-05-05 16:54:24 +03:00
< span class = "reserved" > while< / span > < span class = "plain" > (< / span > < span class = "identifier" > at< / 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" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > blocked_by_conditional< / span > < span class = "plain" > == < / span > < span class = "identifier" > FALSE< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > dir_clarifier< / span > < span class = "plain" > == < / span > < span class = "constant" > IFDEF_I6RW< / span > < span class = "plain" > ) { < / span > < span class = "identifier" > isn< / span > < span class = "plain" > = < / span > < span class = "identifier" > at< / span > < span class = "plain" > ; < / span > < span class = "identifier" > ifnot_node< / span > < span class = "plain" > = < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ; }< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > dir_clarifier< / span > < span class = "plain" > == < / span > < span class = "constant" > IFNDEF_I6RW< / span > < span class = "plain" > ) { < / span > < span class = "identifier" > isn< / span > < span class = "plain" > = < / span > < span class = "identifier" > at< / span > < span class = "plain" > ; < / span > < span class = "identifier" > ifnot_node< / span > < span class = "plain" > = < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ; }< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > dir_clarifier< / span > < span class = "plain" > == < / span > < span class = "constant" > IFTRUE_I6RW< / span > < span class = "plain" > ) { < / span > < span class = "identifier" > isn< / span > < span class = "plain" > = < / span > < span class = "identifier" > at< / span > < span class = "plain" > ; < / span > < span class = "identifier" > ifnot_node< / span > < span class = "plain" > = < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ; }< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > dir_clarifier< / span > < span class = "plain" > == < / span > < span class = "constant" > IFFALSE_I6RW< / span > < span class = "plain" > ) { < / span > < span class = "identifier" > isn< / span > < span class = "plain" > = < / span > < span class = "identifier" > at< / span > < span class = "plain" > ; < / span > < span class = "identifier" > ifnot_node< / span > < span class = "plain" > = < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ; }< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > dir_clarifier< / span > < span class = "plain" > == < / span > < span class = "constant" > IFNOT_I6RW< / span > < span class = "plain" > ) < / span > < span class = "identifier" > ifnot_node< / span > < span class = "plain" > = < / span > < span class = "identifier" > at< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > dir_clarifier< / span > < span class = "plain" > == < / span > < span class = "constant" > ENDIF_I6RW< / span > < span class = "plain" > ) { < / span > < span class = "identifier" > endif_node< / span > < span class = "plain" > = < / span > < span class = "identifier" > at< / span > < span class = "plain" > ; < / span > < span class = "reserved" > break< / span > < span class = "plain" > ; }< / span >
2019-05-05 16:54:24 +03:00
< span class = "plain" > }< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > at< / span > < span class = "plain" > = < / span > < span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > ;< / span >
2019-05-05 16:54:24 +03:00
< span class = "plain" > }< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > endif_node< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "no matching #endif"< / span > < span class = "plain" > );< / span >
< span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > symbol_to_check< / span > < span class = "plain" > = < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > value_to_check< / span > < span class = "plain" > = < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > inter_t< / span > < span class = "plain" > < / span > < span class = "identifier" > operation_to_check< / span > < span class = "plain" > = < / span > < span class = "constant" > 0< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > if< / span > < span class = "plain" > ((< / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "identifier" > dir_clarifier< / span > < span class = "plain" > == < / span > < span class = "constant" > IFDEF_I6RW< / span > < span class = "plain" > ) ||< / span >
< span class = "plain" > (< / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > dir_clarifier< / span > < span class = "plain" > == < / span > < span class = "constant" > IFNDEF_I6RW< / span > < span class = "plain" > )) {< / span >
< span class = "identifier" > symbol_to_check< / span > < span class = "plain" > = < / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / span > < span class = "plain" > -> < / span > < span class = "element" > expression_tokens< / span > < span class = "plain" > -> < / span > < span class = "element" > material< / span > < span class = "plain" > ;< / span >
2019-05-05 16:54:24 +03:00
< span class = "plain" > } < / span > < span class = "reserved" > else< / span > < span class = "plain" > {< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > inter_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > to_eval< / span > < span class = "plain" > = < / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > while< / span > < span class = "plain" > ((< / span > < span class = "identifier" > to_eval< / span > < span class = "plain" > ) & & (< / span > < span class = "identifier" > to_eval< / span > < span class = "plain" > -> < / span > < span class = "element" > isn_type< / span > < span class = "plain" > == < / span > < span class = "constant" > SUBEXPRESSION_ISNT< / span > < span class = "plain" > ))< / span >
< span class = "identifier" > to_eval< / span > < span class = "plain" > = < / span > < span class = "identifier" > to_eval< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > if< / span > < span class = "plain" > ((< / span > < span class = "identifier" > to_eval< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) || (< / span > < span class = "identifier" > to_eval< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / span > < span class = "plain" > -> < / span > < span class = "element" > expression_tokens< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ))< / span >
2019-05-05 20:24:58 +03:00
< span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "bad iftrue"< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > symbol_to_check< / span > < span class = "plain" > = < / span > < span class = "identifier" > to_eval< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / span > < span class = "plain" > -> < / span > < span class = "element" > expression_tokens< / span > < span class = "plain" > -> < / span > < span class = "element" > material< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > operation_to_check< / span > < span class = "plain" > = < / span > < span class = "identifier" > to_eval< / span > < span class = "plain" > -> < / span > < span class = "element" > isn_clarifier< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > value_to_check< / span > < span class = "plain" > = < / span > < span class = "identifier" > to_eval< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > -> < / span > < span class = "element" > expression_tokens< / span > < span class = "plain" > -> < / span > < span class = "element" > material< / span > < span class = "plain" > ;< / span >
2019-05-05 16:54:24 +03:00
< span class = "plain" > }< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > LOGIF< / span > < span class = "plain" > (< / span > < span class = "identifier" > SCHEMA_COMPILATION< / span > < span class = "plain" > , < / span > < span class = "string" > "Means checking %S\n"< / span > < span class = "plain" > , < / span > < span class = "identifier" > symbol_to_check< / span > < span class = "plain" > );< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > value_to_check< / span > < span class = "plain" > ) < / span > < span class = "identifier" > LOGIF< / span > < span class = "plain" > (< / span > < span class = "identifier" > SCHEMA_COMPILATION< / span > < span class = "plain" > , < / span > < span class = "string" > "Against %S\n"< / span > < span class = "plain" > , < / span > < span class = "identifier" > value_to_check< / span > < span class = "plain" > );< / span >
2019-05-05 16:54:24 +03:00
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > val< / span > < span class = "plain" > = -1, < / span > < span class = "identifier" > def< / 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" > Str::eq< / span > < span class = "plain" > (< / span > < span class = "identifier" > symbol_to_check< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "#version_number"< / span > < span class = "plain" > )) { < / span > < span class = "identifier" > val< / span > < span class = "plain" > = < / span > < span class = "constant" > 8< / span > < span class = "plain" > ; < / span > < span class = "identifier" > def< / span > < span class = "plain" > = < / span > < span class = "identifier" > TRUE< / span > < span class = "plain" > ; }< / span >
2019-05-06 14:20:08 +03:00
< span class = "reserved" > else< / span > < span class = "plain" > < / span > < span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > Str::eq< / span > < span class = "plain" > (< / span > < span class = "identifier" > symbol_to_check< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "STRICT_MODE"< / span > < span class = "plain" > )) { < / span > < span class = "identifier" > def< / span > < span class = "plain" > = < / span > < span class = "identifier" > TRUE< / span > < span class = "plain" > ; }< / span >
2019-05-05 16:54:24 +03:00
< span class = "reserved" > else< / span > < span class = "plain" > {< / span >
2019-09-01 13:50:12 +03:00
< span class = "identifier" > inter_symbol< / span > < span class = "plain" > *< / span > < span class = "identifier" > symb< / span > < span class = "plain" > = < / span > < span class = "functiontext" > EmitInterSchemas::find_identifier_text< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > symbol_to_check< / span > < span class = "plain" > ,< / span >
< span class = "identifier" > Inter::Packages::scope< / span > < span class = "plain" > (< / span > < span class = "functiontext" > Packaging::incarnate< / span > < span class = "plain" > (< / span > < span class = "functiontext" > Site::veneer_request< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > ))),< / span >
< span class = "identifier" > second_call< / span > < span class = "plain" > );< / span >
2019-05-05 16:54:24 +03:00
< span class = "reserved" > while< / span > < span class = "plain" > ((< / span > < span class = "identifier" > symb< / span > < span class = "plain" > ) & & (< / span > < span class = "identifier" > symb< / span > < span class = "plain" > -> < / span > < span class = "identifier" > equated_to< / span > < span class = "plain" > )) < / span > < span class = "identifier" > symb< / span > < span class = "plain" > = < / span > < span class = "identifier" > symb< / span > < span class = "plain" > -> < / span > < span class = "identifier" > equated_to< / 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" > SCHEMA_COMPILATION< / span > < span class = "plain" > , < / span > < span class = "string" > "Symb is $3\n"< / span > < span class = "plain" > , < / span > < span class = "identifier" > symb< / span > < span class = "plain" > );< / span >
2019-05-05 16:54:24 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > Inter::Symbols::is_defined< / span > < span class = "plain" > (< / span > < span class = "identifier" > symb< / span > < span class = "plain" > )) {< / span >
< span class = "identifier" > def< / span > < span class = "plain" > = < / span > < span class = "identifier" > TRUE< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > val< / span > < span class = "plain" > = < / span > < span class = "identifier" > Inter::Symbols::evaluate_to_int< / span > < span class = "plain" > (< / span > < span class = "identifier" > symb< / span > < span class = "plain" > );< / span >
< span class = "plain" > }< / 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" > SCHEMA_COMPILATION< / span > < span class = "plain" > , < / span > < span class = "string" > "Defined: %d, value: %d\n"< / span > < span class = "plain" > , < / span > < span class = "identifier" > def< / span > < span class = "plain" > , < / span > < span class = "identifier" > val< / span > < span class = "plain" > );< / span >
2019-05-05 16:54:24 +03:00
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > decision< / span > < span class = "plain" > = < / span > < span class = "identifier" > TRUE< / 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" > isn< / span > < span class = "plain" > -> < / span > < span class = "identifier" > dir_clarifier< / span > < span class = "plain" > == < / span > < span class = "constant" > IFNDEF_I6RW< / span > < span class = "plain" > )< / span >
< span class = "plain" > || (< / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > dir_clarifier< / span > < span class = "plain" > == < / span > < span class = "constant" > IFDEF_I6RW< / span > < span class = "plain" > )) < / span > < span class = "identifier" > decision< / span > < span class = "plain" > = < / span > < span class = "identifier" > def< / span > < span class = "plain" > ;< / span >
2019-05-05 16:54:24 +03:00
< span class = "reserved" > else< / 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" > h< / span > < span class = "plain" > = < / span > < span class = "identifier" > Str::atoi< / span > < span class = "plain" > (< / span > < span class = "identifier" > value_to_check< / span > < span class = "plain" > , < / span > < span class = "constant" > 0< / span > < span class = "plain" > );< / span >
< span class = "identifier" > LOGIF< / span > < span class = "plain" > (< / span > < span class = "identifier" > SCHEMA_COMPILATION< / span > < span class = "plain" > , < / span > < span class = "string" > "Want value %d\n"< / span > < span class = "plain" > , < / span > < span class = "identifier" > h< / span > < span class = "plain" > );< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > operation_to_check< / span > < span class = "plain" > == < / span > < span class = "constant" > EQ_BIP< / span > < span class = "plain" > ) < / span > < span class = "identifier" > decision< / span > < span class = "plain" > = (< / span > < span class = "identifier" > val< / span > < span class = "plain" > == < / span > < span class = "identifier" > h< / span > < span class = "plain" > )?< / span > < span class = "identifier" > TRUE:FALSE< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > operation_to_check< / span > < span class = "plain" > == < / span > < span class = "constant" > NE_BIP< / span > < span class = "plain" > ) < / span > < span class = "identifier" > decision< / span > < span class = "plain" > = (< / span > < span class = "identifier" > val< / span > < span class = "plain" > != < / span > < span class = "identifier" > h< / span > < span class = "plain" > )?< / span > < span class = "identifier" > TRUE:FALSE< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > operation_to_check< / span > < span class = "plain" > == < / span > < span class = "constant" > GE_BIP< / span > < span class = "plain" > ) < / span > < span class = "identifier" > decision< / span > < span class = "plain" > = (< / span > < span class = "identifier" > val< / span > < span class = "plain" > > = < / span > < span class = "identifier" > h< / span > < span class = "plain" > )?< / span > < span class = "identifier" > TRUE:FALSE< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > operation_to_check< / span > < span class = "plain" > == < / span > < span class = "constant" > GT_BIP< / span > < span class = "plain" > ) < / span > < span class = "identifier" > decision< / span > < span class = "plain" > = (< / span > < span class = "identifier" > val< / span > < span class = "plain" > > < / span > < span class = "identifier" > h< / span > < span class = "plain" > )?< / span > < span class = "identifier" > TRUE:FALSE< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > operation_to_check< / span > < span class = "plain" > == < / span > < span class = "constant" > LE_BIP< / span > < span class = "plain" > ) < / span > < span class = "identifier" > decision< / span > < span class = "plain" > = (< / span > < span class = "identifier" > val< / span > < span class = "plain" > < = < / span > < span class = "identifier" > h< / span > < span class = "plain" > )?< / span > < span class = "identifier" > TRUE:FALSE< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > operation_to_check< / span > < span class = "plain" > == < / span > < span class = "constant" > LT_BIP< / span > < span class = "plain" > ) < / span > < span class = "identifier" > decision< / span > < span class = "plain" > = (< / span > < span class = "identifier" > val< / span > < span class = "plain" > < < / span > < span class = "identifier" > h< / span > < span class = "plain" > )?< / span > < span class = "identifier" > TRUE:FALSE< / span > < span class = "plain" > ;< / span >
2019-05-05 16:54:24 +03:00
< span class = "plain" > }< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > dir_clarifier< / span > < span class = "plain" > == < / span > < span class = "constant" > IFNDEF_I6RW< / span > < span class = "plain" > ) < / span > < span class = "identifier" > decision< / span > < span class = "plain" > = < / span > < span class = "identifier" > decision< / span > < span class = "plain" > ?< / span > < span class = "identifier" > FALSE:TRUE< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > dir_clarifier< / span > < span class = "plain" > == < / span > < span class = "constant" > IFFALSE_I6RW< / span > < span class = "plain" > ) < / span > < span class = "identifier" > decision< / span > < span class = "plain" > = < / span > < span class = "identifier" > decision< / span > < span class = "plain" > ?< / span > < span class = "identifier" > FALSE:TRUE< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > blocked_by_conditional< / span > < span class = "plain" > = < / span > < span class = "identifier" > TRUE< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > endif_node< / span > < span class = "plain" > -> < / span > < span class = "element" > blocked_by_conditional< / span > < span class = "plain" > = < / span > < span class = "identifier" > TRUE< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > ifnot_node< / span > < span class = "plain" > ) < / span > < span class = "identifier" > ifnot_node< / span > < span class = "plain" > -> < / span > < span class = "element" > blocked_by_conditional< / span > < span class = "plain" > = < / span > < span class = "identifier" > TRUE< / span > < span class = "plain" > ;< / span >
2019-05-05 16:54:24 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > decision< / span > < span class = "plain" > ) {< / span >
2019-08-24 13:21:48 +03:00
< span class = "reserved" > inter_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > at< / span > < span class = "plain" > = < / span > < span class = "identifier" > ifnot_node< / span > < span class = "plain" > ;< / span >
2019-05-05 16:54:24 +03:00
< span class = "reserved" > while< / span > < span class = "plain" > ((< / span > < span class = "identifier" > at< / span > < span class = "plain" > ) & & (< / span > < span class = "identifier" > at< / span > < span class = "plain" > != < / span > < span class = "identifier" > endif_node< / span > < span class = "plain" > )) {< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > blocked_by_conditional< / span > < span class = "plain" > = < / span > < span class = "identifier" > TRUE< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > at< / span > < span class = "plain" > = < / span > < span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > ;< / span >
2019-05-05 16:54:24 +03:00
< span class = "plain" > }< / span >
< span class = "plain" > } < / span > < span class = "reserved" > else< / span > < span class = "plain" > {< / span >
2019-08-24 13:21:48 +03:00
< span class = "reserved" > inter_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > at< / span > < span class = "plain" > = < / span > < span class = "identifier" > isn< / span > < span class = "plain" > ;< / span >
2019-05-05 16:54:24 +03:00
< span class = "reserved" > while< / span > < span class = "plain" > ((< / span > < span class = "identifier" > at< / span > < span class = "plain" > ) & & (< / span > < span class = "identifier" > at< / span > < span class = "plain" > != < / span > < span class = "identifier" > endif_node< / span > < span class = "plain" > ) & & (< / span > < span class = "identifier" > at< / span > < span class = "plain" > != < / span > < span class = "identifier" > ifnot_node< / span > < span class = "plain" > )) {< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > blocked_by_conditional< / span > < span class = "plain" > = < / span > < span class = "identifier" > TRUE< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > at< / span > < span class = "plain" > = < / span > < span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > ;< / span >
2019-05-05 16:54:24 +03:00
< span class = "plain" > }< / span >
< span class = "plain" > }< / span >
2019-08-24 13:21:48 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > Log::aspect_switched_on< / span > < span class = "plain" > (< / span > < span class = "constant" > SCHEMA_COMPILATION_DA< / span > < span class = "plain" > )) {< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > LOG< / span > < span class = "plain" > (< / span > < span class = "string" > "--- Resulting in: ---\n"< / span > < span class = "plain" > );< / span >
< span class = "reserved" > for< / span > < span class = "plain" > (< / span > < span class = "reserved" > inter_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > at< / span > < span class = "plain" > = < / span > < span class = "identifier" > isn< / span > < span class = "plain" > ; < / span > < span class = "identifier" > at< / span > < span class = "plain" > ; < / span > < span class = "identifier" > at< / span > < span class = "plain" > = < / span > < span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > )< / span >
< span class = "functiontext" > InterSchemas::log_just< / span > < span class = "plain" > (< / span > < span class = "identifier" > at< / span > < span class = "plain" > , < / span > < span class = "constant" > 0< / span > < span class = "plain" > );< / span >
< span class = "identifier" > LOG< / span > < span class = "plain" > (< / span > < span class = "string" > "------\n"< / span > < span class = "plain" > );< / span >
2019-05-07 00:32:11 +03:00
< span class = "plain" > }< / span >
2019-05-05 16:54:24 +03:00
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > TRUE< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
< p class = "endnote" > This code is used in < a href = "#SP2" > § 2< / a > .< / p >
< p class = "inwebparagraph" > < a id = "SP3" > < / a > < b > § 3. < / b > < / p >
2019-04-27 02:19:28 +03:00
< pre class = "display" >
2019-08-31 15:56:36 +03:00
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > EmitInterSchemas::emit_inner< / span > < span class = "plain" > (< / span > < span class = "identifier" > inter_tree< / span > < span class = "plain" > *< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "reserved" > inter_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > isn< / span > < span class = "plain" > , < / span > < span class = "reserved" > value_holster< / span > < span class = "plain" > *< / span > < span class = "identifier" > VH< / span > < span class = "plain" > ,< / span >
2019-08-24 13:21:48 +03:00
< span class = "reserved" > inter_schema< / span > < span class = "plain" > *< / span > < span class = "identifier" > sch< / span > < span class = "plain" > , < / span > < span class = "reserved" > void< / span > < span class = "plain" > *< / span > < span class = "identifier" > opaque_state< / span > < span class = "plain" > , < / span > < span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > prim_cat< / span > < span class = "plain" > , < / span > < span class = "identifier" > inter_symbols_table< / span > < span class = "plain" > *< / span > < span class = "identifier" > first_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > inter_symbols_table< / span > < span class = "plain" > *< / span > < span class = "identifier" > second_call< / span > < span class = "plain" > ,< / span >
< span class = "reserved" > void< / span > < span class = "plain" > (*< / span > < span class = "identifier" > inline_command_handler< / span > < span class = "plain" > )(< / span > < span class = "reserved" > value_holster< / span > < span class = "plain" > *< / span > < span class = "identifier" > VH< / span > < span class = "plain" > , < / span > < span class = "reserved" > inter_schema_token< / span > < span class = "plain" > *< / span > < span class = "identifier" > t< / span > < span class = "plain" > , < / span > < span class = "reserved" > void< / span > < span class = "plain" > *< / span > < span class = "identifier" > opaque_state< / span > < span class = "plain" > , < / span > < span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > prim_cat< / span > < span class = "plain" > ),< / span >
2019-04-27 02:19:28 +03:00
< span class = "reserved" > void< / span > < span class = "plain" > (*< / span > < span class = "identifier" > i7_source_handler< / span > < span class = "plain" > )(< / span > < span class = "reserved" > value_holster< / span > < span class = "plain" > *< / span > < span class = "identifier" > VH< / span > < span class = "plain" > , < / span > < span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > OUT< / span > < span class = "plain" > , < / span > < span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > S< / span > < span class = "plain" > )) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > isn< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / 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" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > blocked_by_conditional< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > switch< / span > < span class = "plain" > (< / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > isn_type< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "identifier" > LABEL_ISNT:< / span > < span class = "plain" > < / span > < < span class = "cwebmacro" > Label< / span > < span class = "cwebmacronumber" > 3.1< / 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" > CODE_ISNT:< / span > < span class = "plain" > < / span > < < span class = "cwebmacro" > Code block< / span > < span class = "cwebmacronumber" > 3.2< / 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" > EVAL_ISNT:< / span > < span class = "plain" > < / span > < < span class = "cwebmacro" > Eval block< / span > < span class = "cwebmacronumber" > 3.7< / 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" > EXPRESSION_ISNT:< / span > < span class = "plain" > < / span > < < span class = "cwebmacro" > Expression< / span > < span class = "cwebmacronumber" > 3.11< / 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" > SUBEXPRESSION_ISNT:< / span > < span class = "plain" > < / span > < < span class = "cwebmacro" > Subexpression< / span > < span class = "cwebmacronumber" > 3.9< / 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" > STATEMENT_ISNT:< / span > < span class = "plain" > < / span > < < span class = "cwebmacro" > Statement< / span > < span class = "cwebmacronumber" > 3.10< / 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" > OPERATION_ISNT:< / span > < span class = "plain" > < / span > < < span class = "cwebmacro" > Operation< / span > < span class = "cwebmacronumber" > 3.8< / 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" > ASSEMBLY_ISNT:< / span > < span class = "plain" > < / span > < < span class = "cwebmacro" > Assembly< / span > < span class = "cwebmacronumber" > 3.3< / 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" > CALL_ISNT:< / span > < span class = "plain" > < / span > < < span class = "cwebmacro" > Call< / span > < span class = "cwebmacronumber" > 3.4< / 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" > MESSAGE_ISNT:< / span > < span class = "plain" > < / span > < < span class = "cwebmacro" > Message< / span > < span class = "cwebmacronumber" > 3.5< / 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" > CALLMESSAGE_ISNT:< / span > < span class = "plain" > < / span > < < span class = "cwebmacro" > Call-message< / span > < span class = "cwebmacronumber" > 3.6< / 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" > DIRECTIVE_ISNT:< / span > < span class = "plain" > < / span > < < span class = "cwebmacro" > Non-conditional directive< / span > < span class = "cwebmacronumber" > 3.12< / span > > < span class = "plain" > ; < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > default:< / span > < span class = "plain" > < / span > < span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "unknown schema node type"< / span > < span class = "plain" > );< / span >
2019-04-27 02:19:28 +03:00
< span class = "plain" > }< / span >
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
2019-05-05 16:54:24 +03:00
< p class = "endnote" > The function EmitInterSchemas::emit_inner is used in < a href = "#SP1" > § 1< / a > , < a href = "#SP3_2" > § 3.2< / a > , < a href = "#SP3_3" > § 3.3< / a > , < a href = "#SP3_4" > § 3.4< / a > , < a href = "#SP3_5" > § 3.5< / a > , < a href = "#SP3_6" > § 3.6< / a > , < a href = "#SP3_7" > § 3.7< / a > , < a href = "#SP3_8" > § 3.8< / a > , < a href = "#SP3_9" > § 3.9< / a > , < a href = "#SP3_10" > § 3.10< / a > , < a href = "#SP3_10_1" > § 3.10.1< / a > .< / p >
2019-04-27 02:19:28 +03:00
2019-05-05 16:54:24 +03:00
< p class = "inwebparagraph" > < a id = "SP3_1" > < / a > < b > § 3.1. < / b > < code class = "display" >
< < span class = "cwebmacrodefn" > Label< / span > < span class = "cwebmacronumber" > 3.1< / span > > =
2019-04-27 02:19:28 +03:00
< / code > < / p >
< pre class = "displaydefn" >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > prim_cat< / span > < span class = "plain" > != < / span > < span class = "identifier" > CODE_PRIM_CAT< / span > < span class = "plain" > ) < / span > < span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "label outside code"< / span > < span class = "plain" > );< / span >
< span class = "identifier" > TEMPORARY_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > L< / span > < span class = "plain" > );< / span >
< span class = "identifier" > WRITE_TO< / span > < span class = "plain" > (< / span > < span class = "identifier" > L< / span > < span class = "plain" > , < / span > < span class = "string" > "."< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > for< / span > < span class = "plain" > (< / span > < span class = "reserved" > inter_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > at< / span > < span class = "plain" > = < / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / span > < span class = "plain" > ; < / span > < span class = "identifier" > at< / span > < span class = "plain" > ; < / span > < span class = "identifier" > at< / span > < span class = "plain" > =< / span > < span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > for< / span > < span class = "plain" > (< / span > < span class = "reserved" > inter_schema_token< / span > < span class = "plain" > *< / span > < span class = "identifier" > t< / span > < span class = "plain" > = < / span > < span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "identifier" > expression_tokens< / span > < span class = "plain" > ; < / span > < span class = "identifier" > t< / span > < span class = "plain" > ; < / span > < span class = "identifier" > t< / span > < span class = "plain" > =< / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > next< / 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 = "element" > ist_type< / span > < span class = "plain" > == < / span > < span class = "constant" > IDENTIFIER_ISTT< / span > < span class = "plain" > )< / span >
< span class = "identifier" > WRITE_TO< / span > < span class = "plain" > (< / span > < span class = "identifier" > L< / span > < span class = "plain" > , < / span > < span class = "string" > "%S"< / span > < span class = "plain" > , < / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > material< / span > < span class = "plain" > );< / span >
< span class = "reserved" > else< / span > < span class = "plain" > < / span > < span class = "reserved" > if< / span > < span class = "plain" > ((< / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > ist_type< / span > < span class = "plain" > == < / span > < span class = "constant" > INLINE_ISTT< / span > < span class = "plain" > ) & & (< / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > inline_command< / span > < span class = "plain" > == < / span > < span class = "constant" > label_ISINC< / span > < span class = "plain" > )) {< / span >
2019-08-24 13:21:48 +03:00
< span class = "plain" > #< / span > < span class = "identifier" > ifdef< / span > < span class = "plain" > < / span > < span class = "identifier" > CORE_MODULE< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > JumpLabels::write< / span > < span class = "plain" > (< / span > < span class = "identifier" > L< / span > < span class = "plain" > , < / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > operand< / span > < span class = "plain" > );< / span >
2019-08-24 13:21:48 +03:00
< span class = "plain" > #< / span > < span class = "identifier" > endif< / span >
< span class = "plain" > #< / span > < span class = "identifier" > ifndef< / span > < span class = "plain" > < / span > < span class = "identifier" > CORE_MODULE< / span >
< span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "label namespaces are unavailable in assimilation mode"< / span > < span class = "plain" > );< / span >
< span class = "plain" > #< / span > < span class = "identifier" > endif< / span >
2020-04-07 03:06:09 +03:00
< span class = "plain" > } < / span > < span class = "reserved" > else< / span > < span class = "plain" > < / span > < span class = "reserved" > if< / span > < span class = "plain" > ((< / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > ist_type< / span > < span class = "plain" > == < / span > < span class = "constant" > INLINE_ISTT< / span > < span class = "plain" > ) & & < / span >
< span class = "plain" > ((< / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > inline_command< / span > < span class = "plain" > == < / span > < span class = "constant" > counter_up_ISINC< / span > < span class = "plain" > ) || (< / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > inline_command< / span > < span class = "plain" > == < / span > < span class = "constant" > counter_down_ISINC< / span > < span class = "plain" > ))) {< / span >
2019-04-27 02:19:28 +03:00
< span class = "reserved" > value_holster< / span > < span class = "plain" > < / span > < span class = "identifier" > VN< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Holsters::new< / span > < span class = "plain" > (< / span > < span class = "constant" > INTER_DATA_VHMODE< / span > < span class = "plain" > );< / span >
2019-04-27 23:11:52 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > inline_command_handler< / span > < span class = "plain" > )< / span >
< span class = "plain" > (*< / span > < span class = "identifier" > inline_command_handler< / span > < span class = "plain" > )(& < / span > < span class = "identifier" > VN< / span > < span class = "plain" > , < / span > < span class = "identifier" > t< / span > < span class = "plain" > , < / span > < span class = "identifier" > opaque_state< / span > < span class = "plain" > , < / span > < span class = "identifier" > VAL_PRIM_CAT< / span > < span class = "plain" > );< / span >
2019-04-27 02:19:28 +03:00
< span class = "plain" > } < / span > < span class = "reserved" > else< / span > < span class = "plain" > < / span > < span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "bad label stuff"< / span > < span class = "plain" > );< / span >
< span class = "plain" > }< / span >
< span class = "plain" > }< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::place_label< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "functiontext" > Produce::reserve_label< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > L< / span > < span class = "plain" > ));< / span >
2019-04-27 02:19:28 +03:00
< span class = "identifier" > DISCARD_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > L< / span > < span class = "plain" > );< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
2019-05-05 16:54:24 +03:00
< p class = "endnote" > This code is used in < a href = "#SP3" > § 3< / a > .< / p >
2019-04-27 02:19:28 +03:00
2019-05-05 16:54:24 +03:00
< p class = "inwebparagraph" > < a id = "SP3_2" > < / a > < b > § 3.2. < / b > < code class = "display" >
< < span class = "cwebmacrodefn" > Code block< / span > < span class = "cwebmacronumber" > 3.2< / span > > =
2019-04-27 02:19:28 +03:00
< / code > < / p >
< pre class = "displaydefn" >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > prim_cat< / span > < span class = "plain" > != < / span > < span class = "identifier" > CODE_PRIM_CAT< / span > < span class = "plain" > ) < / span > < span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "code block in expression"< / 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" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > unopened< / span > < span class = "plain" > == < / span > < span class = "identifier" > FALSE< / span > < span class = "plain" > ) {< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::code< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > Produce::down< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > );< / span >
2019-04-27 02:19:28 +03:00
< span class = "plain" > }< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > for< / span > < span class = "plain" > (< / span > < span class = "reserved" > inter_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > at< / span > < span class = "plain" > = < / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / span > < span class = "plain" > ; < / span > < span class = "identifier" > at< / span > < span class = "plain" > ; < / span > < span class = "identifier" > at< / span > < span class = "plain" > =< / span > < span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > )< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > EmitInterSchemas::emit_inner< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > at< / span > < span class = "plain" > ,< / span >
2019-04-27 23:11:52 +03:00
< span class = "identifier" > VH< / span > < span class = "plain" > , < / span > < span class = "identifier" > sch< / span > < span class = "plain" > , < / span > < span class = "identifier" > opaque_state< / span > < span class = "plain" > , < / span > < span class = "identifier" > CODE_PRIM_CAT< / span > < span class = "plain" > , < / span > < span class = "identifier" > first_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > second_call< / span > < span class = "plain" > ,< / span >
< span class = "identifier" > inline_command_handler< / span > < span class = "plain" > , < / span > < span class = "identifier" > i7_source_handler< / 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" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > unclosed< / span > < span class = "plain" > == < / span > < span class = "identifier" > FALSE< / span > < span class = "plain" > ) {< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::up< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > );< / span >
2019-04-27 02:19:28 +03:00
< span class = "plain" > }< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > unopened< / span > < span class = "plain" > ) < / span > < span class = "functiontext" > Produce::to_last_level< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > 0< / span > < span class = "plain" > );< / span >
2019-04-27 02:19:28 +03:00
< / pre >
< p class = "inwebparagraph" > < / p >
2019-05-05 16:54:24 +03:00
< p class = "endnote" > This code is used in < a href = "#SP3" > § 3< / a > .< / p >
2019-04-27 02:19:28 +03:00
2019-05-05 16:54:24 +03:00
< p class = "inwebparagraph" > < a id = "SP3_3" > < / a > < b > § 3.3. < / b > < code class = "display" >
< < span class = "cwebmacrodefn" > Assembly< / span > < span class = "cwebmacronumber" > 3.3< / span > > =
2019-04-27 02:19:28 +03:00
< / code > < / p >
< pre class = "displaydefn" >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > prim_cat< / span > < span class = "plain" > != < / span > < span class = "identifier" > CODE_PRIM_CAT< / span > < span class = "plain" > ) < / span > < span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "assembly in expression"< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > inter_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > at< / span > < span class = "plain" > = < / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / span > < span class = "plain" > ;< / span >
2019-04-27 02:19:28 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > at< / span > < span class = "plain" > ) {< / span >
< span class = "identifier" > text_stream< / span > < span class = "plain" > *< / span > < span class = "identifier" > opcode_text< / 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" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > isn_type< / span > < span class = "plain" > == < / span > < span class = "constant" > EXPRESSION_ISNT< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > inter_schema_token< / span > < span class = "plain" > *< / span > < span class = "identifier" > tok< / span > < span class = "plain" > = < / span > < span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > expression_tokens< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > if< / span > < span class = "plain" > ((< / span > < span class = "identifier" > tok< / span > < span class = "plain" > -> < / span > < span class = "identifier" > ist_type< / span > < span class = "plain" > == < / span > < span class = "constant" > OPCODE_ISTT< / span > < span class = "plain" > ) & & (< / span > < span class = "identifier" > tok< / span > < span class = "plain" > -> < / span > < span class = "element" > next< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ))< / span >
< span class = "identifier" > opcode_text< / span > < span class = "plain" > = < / span > < span class = "identifier" > tok< / span > < span class = "plain" > -> < / span > < span class = "element" > material< / span > < span class = "plain" > ;< / span >
2019-04-27 02:19:28 +03:00
< span class = "plain" > }< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > opcode_text< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "assembly malformed"< / span > < span class = "plain" > );< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::inv_assembly< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > opcode_text< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > Produce::down< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > for< / span > < span class = "plain" > (< / span > < span class = "identifier" > at< / span > < span class = "plain" > = < / span > < span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > ; < / span > < span class = "identifier" > at< / span > < span class = "plain" > ; < / span > < span class = "identifier" > at< / span > < span class = "plain" > =< / span > < span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > )< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > EmitInterSchemas::emit_inner< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > at< / span > < span class = "plain" > , < / span > < span class = "identifier" > VH< / span > < span class = "plain" > , < / span > < span class = "identifier" > sch< / span > < span class = "plain" > , < / span > < span class = "identifier" > opaque_state< / span > < span class = "plain" > ,< / span >
2019-04-27 23:11:52 +03:00
< span class = "identifier" > VAL_PRIM_CAT< / span > < span class = "plain" > , < / span > < span class = "identifier" > first_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > second_call< / span > < span class = "plain" > ,< / span >
< span class = "identifier" > inline_command_handler< / span > < span class = "plain" > , < / span > < span class = "identifier" > i7_source_handler< / span > < span class = "plain" > );< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::up< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > );< / span >
2019-04-27 02:19:28 +03:00
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
2019-05-05 16:54:24 +03:00
< p class = "endnote" > This code is used in < a href = "#SP3" > § 3< / a > .< / p >
2019-04-27 02:19:28 +03:00
2019-05-05 16:54:24 +03:00
< p class = "inwebparagraph" > < a id = "SP3_4" > < / a > < b > § 3.4. < / b > < code class = "display" >
< < span class = "cwebmacrodefn" > Call< / span > < span class = "cwebmacronumber" > 3.4< / span > > =
2019-04-27 02:19:28 +03:00
< / code > < / p >
< pre class = "displaydefn" >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > inter_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > at< / span > < span class = "plain" > = < / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / span > < span class = "plain" > ;< / span >
2019-04-28 05:27:32 +03:00
< span class = "identifier" > inter_symbol< / span > < span class = "plain" > *< / span > < span class = "identifier" > to_call< / 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" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > isn_type< / span > < span class = "plain" > == < / span > < span class = "constant" > EXPRESSION_ISNT< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > inter_schema_token< / span > < span class = "plain" > *< / span > < span class = "identifier" > tok< / span > < span class = "plain" > = < / span > < span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > expression_tokens< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > if< / span > < span class = "plain" > ((< / span > < span class = "identifier" > tok< / span > < span class = "plain" > -> < / span > < span class = "identifier" > ist_type< / span > < span class = "plain" > == < / span > < span class = "constant" > IDENTIFIER_ISTT< / span > < span class = "plain" > ) & & (< / span > < span class = "identifier" > tok< / span > < span class = "plain" > -> < / span > < span class = "element" > next< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > )) {< / span >
2019-08-31 15:56:36 +03:00
< span class = "identifier" > to_call< / span > < span class = "plain" > = < / span > < span class = "functiontext" > EmitInterSchemas::find_identifier< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > tok< / span > < span class = "plain" > , < / span > < span class = "identifier" > first_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > second_call< / span > < span class = "plain" > );< / span >
2019-04-28 05:27:32 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > Inter::Symbols::is_local< / span > < span class = "plain" > (< / span > < span class = "identifier" > to_call< / span > < span class = "plain" > )) < / span > < span class = "identifier" > to_call< / span > < span class = "plain" > = < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
2019-04-27 02:19:28 +03:00
< span class = "plain" > }< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > to_call< / span > < span class = "plain" > ) {< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::inv_call< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > to_call< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > at< / span > < span class = "plain" > = < / span > < span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > ;< / span >
2019-04-27 02:19:28 +03:00
< span class = "plain" > } < / span > < span class = "reserved" > else< / 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" > argc< / span > < span class = "plain" > = < / span > < span class = "constant" > 0< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > for< / span > < span class = "plain" > (< / span > < span class = "reserved" > inter_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > n< / span > < span class = "plain" > = < / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "identifier" > child_node< / span > < span class = "plain" > ; < / span > < span class = "identifier" > n< / span > < span class = "plain" > ; < / span > < span class = "identifier" > n< / span > < span class = "plain" > =< / span > < span class = "identifier" > n< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > ((< / span > < span class = "identifier" > n< / span > < span class = "plain" > -> < / span > < span class = "element" > expression_tokens< / span > < span class = "plain" > ) & & (< / span > < span class = "identifier" > n< / span > < span class = "plain" > -> < / span > < span class = "element" > expression_tokens< / span > < span class = "plain" > -> < / span > < span class = "element" > inline_command< / span > < span class = "plain" > == < / span > < span class = "constant" > combine_ISINC< / span > < span class = "plain" > )) < / span > < span class = "identifier" > argc< / span > < span class = "plain" > ++;< / span >
2019-04-27 02:19:28 +03:00
< span class = "identifier" > argc< / span > < span class = "plain" > ++;< / span >
< span class = "plain" > }< / span >
< span class = "reserved" > switch< / span > < span class = "plain" > (< / span > < span class = "identifier" > argc< / span > < span class = "plain" > ) {< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > 1< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Produce::inv_primitive< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > INDIRECT0_BIP< / 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" > 2< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Produce::inv_primitive< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > INDIRECT1_BIP< / 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" > 3< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Produce::inv_primitive< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > INDIRECT2_BIP< / 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" > 4< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Produce::inv_primitive< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > INDIRECT3_BIP< / 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" > 5< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Produce::inv_primitive< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > INDIRECT4_BIP< / span > < span class = "plain" > ); < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > default:< / span > < span class = "plain" > < / span > < span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "too many args for indirect call"< / span > < span class = "plain" > ); < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
2019-04-27 02:19:28 +03:00
< span class = "plain" > }< / span >
< span class = "plain" > }< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::down< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > for< / span > < span class = "plain" > (; < / span > < span class = "identifier" > at< / span > < span class = "plain" > ; < / span > < span class = "identifier" > at< / span > < span class = "plain" > =< / span > < span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > )< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > EmitInterSchemas::emit_inner< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > at< / span > < span class = "plain" > ,< / span >
2019-04-27 23:11:52 +03:00
< span class = "identifier" > VH< / span > < span class = "plain" > , < / span > < span class = "identifier" > sch< / span > < span class = "plain" > , < / span > < span class = "identifier" > opaque_state< / span > < span class = "plain" > , < / span > < span class = "identifier" > VAL_PRIM_CAT< / span > < span class = "plain" > ,< / span >
< span class = "identifier" > first_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > second_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > inline_command_handler< / span > < span class = "plain" > , < / span > < span class = "identifier" > i7_source_handler< / span > < span class = "plain" > );< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::up< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > );< / span >
2019-04-27 02:19:28 +03:00
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
2019-05-05 16:54:24 +03:00
< p class = "endnote" > This code is used in < a href = "#SP3" > § 3< / a > .< / p >
2019-04-27 02:19:28 +03:00
2019-05-05 16:54:24 +03:00
< p class = "inwebparagraph" > < a id = "SP3_5" > < / a > < b > § 3.5. < / b > < code class = "display" >
< < span class = "cwebmacrodefn" > Message< / span > < span class = "cwebmacronumber" > 3.5< / span > > =
2019-05-02 10:41:06 +03:00
< / code > < / p >
< pre class = "displaydefn" >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > inter_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > at< / span > < span class = "plain" > = < / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / 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 = "constant" > 0< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > for< / span > < span class = "plain" > (< / span > < span class = "reserved" > inter_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > n< / span > < span class = "plain" > = < / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "identifier" > child_node< / span > < span class = "plain" > ; < / span > < span class = "identifier" > n< / span > < span class = "plain" > ; < / span > < span class = "identifier" > n< / span > < span class = "plain" > =< / span > < span class = "identifier" > n< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > ) < / span > < span class = "identifier" > argc< / span > < span class = "plain" > ++;< / span >
2019-05-02 10:41:06 +03:00
< span class = "reserved" > switch< / span > < span class = "plain" > (< / span > < span class = "identifier" > argc< / span > < span class = "plain" > ) {< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > 2< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Produce::inv_primitive< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > MESSAGE0_BIP< / 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" > 3< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Produce::inv_primitive< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > MESSAGE1_BIP< / 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" > 4< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Produce::inv_primitive< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > MESSAGE2_BIP< / 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" > 5< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Produce::inv_primitive< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > MESSAGE3_BIP< / span > < span class = "plain" > ); < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > default:< / span > < span class = "plain" > < / span > < span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "too many args for message"< / span > < span class = "plain" > ); < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
2019-05-02 10:41:06 +03:00
< span class = "plain" > }< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::down< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > for< / span > < span class = "plain" > (; < / span > < span class = "identifier" > at< / span > < span class = "plain" > ; < / span > < span class = "identifier" > at< / span > < span class = "plain" > =< / span > < span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > )< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > EmitInterSchemas::emit_inner< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > at< / span > < span class = "plain" > ,< / span >
2019-05-02 10:41:06 +03:00
< span class = "identifier" > VH< / span > < span class = "plain" > , < / span > < span class = "identifier" > sch< / span > < span class = "plain" > , < / span > < span class = "identifier" > opaque_state< / span > < span class = "plain" > , < / span > < span class = "identifier" > VAL_PRIM_CAT< / span > < span class = "plain" > ,< / span >
< span class = "identifier" > first_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > second_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > inline_command_handler< / span > < span class = "plain" > , < / span > < span class = "identifier" > i7_source_handler< / span > < span class = "plain" > );< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::up< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > );< / span >
2019-05-02 10:41:06 +03:00
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
2019-05-05 16:54:24 +03:00
< p class = "endnote" > This code is used in < a href = "#SP3" > § 3< / a > .< / p >
2019-05-02 10:41:06 +03:00
2019-05-05 16:54:24 +03:00
< p class = "inwebparagraph" > < a id = "SP3_6" > < / a > < b > § 3.6. < / b > < code class = "display" >
< < span class = "cwebmacrodefn" > Call-message< / span > < span class = "cwebmacronumber" > 3.6< / span > > =
2019-05-02 10:41:06 +03:00
< / code > < / p >
< pre class = "displaydefn" >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > inter_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > at< / span > < span class = "plain" > = < / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / 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 = "constant" > 0< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > for< / span > < span class = "plain" > (< / span > < span class = "reserved" > inter_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > n< / span > < span class = "plain" > = < / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "identifier" > child_node< / span > < span class = "plain" > ; < / span > < span class = "identifier" > n< / span > < span class = "plain" > ; < / span > < span class = "identifier" > n< / span > < span class = "plain" > =< / span > < span class = "identifier" > n< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > ) < / span > < span class = "identifier" > argc< / span > < span class = "plain" > ++;< / span >
2019-05-02 10:41:06 +03:00
< span class = "reserved" > switch< / span > < span class = "plain" > (< / span > < span class = "identifier" > argc< / span > < span class = "plain" > ) {< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "constant" > 1< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Produce::inv_primitive< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > CALLMESSAGE0_BIP< / 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" > 2< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Produce::inv_primitive< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > CALLMESSAGE1_BIP< / 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" > 3< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Produce::inv_primitive< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > CALLMESSAGE2_BIP< / 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" > 4< / span > < span class = "plain" > : < / span > < span class = "functiontext" > Produce::inv_primitive< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > CALLMESSAGE3_BIP< / span > < span class = "plain" > ); < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > default:< / span > < span class = "plain" > < / span > < span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "too many args for call-message"< / span > < span class = "plain" > ); < / span > < span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
2019-05-02 10:41:06 +03:00
< span class = "plain" > }< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::down< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > for< / span > < span class = "plain" > (; < / span > < span class = "identifier" > at< / span > < span class = "plain" > ; < / span > < span class = "identifier" > at< / span > < span class = "plain" > =< / span > < span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > )< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > EmitInterSchemas::emit_inner< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > at< / span > < span class = "plain" > ,< / span >
2019-05-02 10:41:06 +03:00
< span class = "identifier" > VH< / span > < span class = "plain" > , < / span > < span class = "identifier" > sch< / span > < span class = "plain" > , < / span > < span class = "identifier" > opaque_state< / span > < span class = "plain" > , < / span > < span class = "identifier" > VAL_PRIM_CAT< / span > < span class = "plain" > ,< / span >
< span class = "identifier" > first_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > second_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > inline_command_handler< / span > < span class = "plain" > , < / span > < span class = "identifier" > i7_source_handler< / span > < span class = "plain" > );< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::up< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > );< / span >
2019-05-02 10:41:06 +03:00
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
2019-05-05 16:54:24 +03:00
< p class = "endnote" > This code is used in < a href = "#SP3" > § 3< / a > .< / p >
2019-05-02 10:41:06 +03:00
2019-05-05 16:54:24 +03:00
< p class = "inwebparagraph" > < a id = "SP3_7" > < / a > < b > § 3.7. < / b > < code class = "display" >
< < span class = "cwebmacrodefn" > Eval block< / span > < span class = "cwebmacronumber" > 3.7< / span > > =
2019-04-27 02:19:28 +03:00
< / code > < / p >
< pre class = "displaydefn" >
< span class = "reserved" > if< / span > < span class = "plain" > ((< / span > < span class = "identifier" > prim_cat< / span > < span class = "plain" > != < / span > < span class = "identifier" > CODE_PRIM_CAT< / span > < span class = "plain" > ) & & (< / span > < span class = "identifier" > prim_cat< / span > < span class = "plain" > != < / span > < span class = "identifier" > VAL_PRIM_CAT< / span > < span class = "plain" > ))< / span >
< span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "eval block outside evaluation context"< / 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" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / span > < span class = "plain" > == < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) < / span > < span class = "functiontext" > Produce::val< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > K_value< / span > < span class = "plain" > , < / span > < span class = "identifier" > LITERAL_IVAL< / span > < span class = "plain" > , < / span > < span class = "constant" > 1< / span > < span class = "plain" > );< / span >
2019-04-27 02:19:28 +03:00
< span class = "reserved" > else< / 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" > d< / span > < span class = "plain" > = < / span > < span class = "constant" > 0< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > for< / span > < span class = "plain" > (< / span > < span class = "reserved" > inter_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > at< / span > < span class = "plain" > = < / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / span > < span class = "plain" > ; < / span > < span class = "identifier" > at< / span > < span class = "plain" > ; < / span > < span class = "identifier" > at< / span > < span class = "plain" > =< / span > < span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > ) {< / span >
2019-04-27 02:19:28 +03:00
< span class = "identifier" > d< / span > < span class = "plain" > ++;< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::inv_primitive< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > SEQUENTIAL_BIP< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > Produce::down< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > );< / span >
2019-04-27 02:19:28 +03:00
< span class = "plain" > }< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > EmitInterSchemas::emit_inner< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > at< / span > < span class = "plain" > ,< / span >
2019-04-27 23:11:52 +03:00
< span class = "identifier" > VH< / span > < span class = "plain" > , < / span > < span class = "identifier" > sch< / span > < span class = "plain" > , < / span > < span class = "identifier" > opaque_state< / span > < span class = "plain" > , < / span > < span class = "identifier" > VAL_PRIM_CAT< / span > < span class = "plain" > ,< / span >
< span class = "identifier" > first_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > second_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > inline_command_handler< / span > < span class = "plain" > , < / span > < span class = "identifier" > i7_source_handler< / span > < span class = "plain" > );< / span >
2019-04-27 02:19:28 +03:00
< span class = "plain" > }< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > while< / span > < span class = "plain" > (< / span > < span class = "identifier" > d< / span > < span class = "plain" > > < / span > < span class = "constant" > 0< / span > < span class = "plain" > ) { < / span > < span class = "functiontext" > Produce::up< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > ); < / span > < span class = "identifier" > d< / span > < span class = "plain" > --; }< / span >
2019-04-27 02:19:28 +03:00
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
2019-05-05 16:54:24 +03:00
< p class = "endnote" > This code is used in < a href = "#SP3" > § 3< / a > .< / p >
2019-04-27 02:19:28 +03:00
2019-05-05 16:54:24 +03:00
< p class = "inwebparagraph" > < a id = "SP3_8" > < / a > < b > § 3.8. < / b > < code class = "display" >
< < span class = "cwebmacrodefn" > Operation< / span > < span class = "cwebmacronumber" > 3.8< / span > > =
2019-04-27 02:19:28 +03:00
< / code > < / p >
< pre class = "displaydefn" >
2019-08-31 15:56:36 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > prim_cat< / span > < span class = "plain" > == < / span > < span class = "identifier" > REF_PRIM_CAT< / span > < span class = "plain" > ) { < / span > < span class = "functiontext" > Produce::reference< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > ); < / span > < span class = "functiontext" > Produce::down< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > ); }< / span >
2019-04-27 02:19:28 +03:00
2020-04-07 03:06:09 +03:00
< span class = "functiontext" > Produce::inv_primitive< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > isn_clarifier< / span > < span class = "plain" > );< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::down< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > );< / span >
2019-04-27 02:19:28 +03:00
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > pc< / span > < span class = "plain" > = < / span > < span class = "identifier" > VAL_PRIM_CAT< / span > < span class = "plain" > ;< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "functiontext" > InterSchemas::first_operand_ref< / span > < span class = "plain" > (< / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > isn_clarifier< / span > < span class = "plain" > )) < / span > < span class = "identifier" > pc< / span > < span class = "plain" > = < / span > < span class = "identifier" > REF_PRIM_CAT< / span > < span class = "plain" > ;< / span >
< span class = "functiontext" > EmitInterSchemas::emit_inner< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / span > < span class = "plain" > ,< / span >
2019-04-27 23:11:52 +03:00
< span class = "identifier" > VH< / span > < span class = "plain" > , < / span > < span class = "identifier" > sch< / span > < span class = "plain" > , < / span > < span class = "identifier" > opaque_state< / span > < span class = "plain" > , < / span > < span class = "identifier" > pc< / span > < span class = "plain" > , < / span > < span class = "identifier" > first_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > second_call< / span > < span class = "plain" > ,< / span >
< span class = "identifier" > inline_command_handler< / span > < span class = "plain" > , < / span > < span class = "identifier" > i7_source_handler< / span > < span class = "plain" > );< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "functiontext" > InterSchemas::arity< / span > < span class = "plain" > (< / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > isn_clarifier< / span > < span class = "plain" > ) == < / span > < span class = "constant" > 2< / span > < span class = "plain" > )< / span >
< span class = "functiontext" > EmitInterSchemas::emit_inner< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > ,< / span >
2019-04-27 23:11:52 +03:00
< span class = "identifier" > VH< / span > < span class = "plain" > , < / span > < span class = "identifier" > sch< / span > < span class = "plain" > , < / span > < span class = "identifier" > opaque_state< / span > < span class = "plain" > , < / span > < span class = "identifier" > VAL_PRIM_CAT< / span > < span class = "plain" > ,< / span >
< span class = "identifier" > first_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > second_call< / span > < span class = "plain" > ,< / span >
< span class = "identifier" > inline_command_handler< / span > < span class = "plain" > , < / span > < span class = "identifier" > i7_source_handler< / span > < span class = "plain" > );< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::up< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > );< / span >
2019-04-27 02:19:28 +03:00
2019-08-31 15:56:36 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > prim_cat< / span > < span class = "plain" > == < / span > < span class = "identifier" > REF_PRIM_CAT< / span > < span class = "plain" > ) { < / span > < span class = "functiontext" > Produce::up< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > ); }< / span >
2019-04-27 02:19:28 +03:00
< / pre >
< p class = "inwebparagraph" > < / p >
2019-05-05 16:54:24 +03:00
< p class = "endnote" > This code is used in < a href = "#SP3" > § 3< / a > .< / p >
2019-04-27 02:19:28 +03:00
2019-05-05 16:54:24 +03:00
< p class = "inwebparagraph" > < a id = "SP3_9" > < / a > < b > § 3.9. < / b > < code class = "display" >
< < span class = "cwebmacrodefn" > Subexpression< / span > < span class = "cwebmacronumber" > 3.9< / span > > =
2019-04-27 02:19:28 +03:00
< / code > < / p >
< pre class = "displaydefn" >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > d< / span > < span class = "plain" > = < / span > < span class = "constant" > 0< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > for< / span > < span class = "plain" > (< / span > < span class = "reserved" > inter_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > at< / span > < span class = "plain" > = < / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / span > < span class = "plain" > ; < / span > < span class = "identifier" > at< / span > < span class = "plain" > ; < / span > < span class = "identifier" > at< / span > < span class = "plain" > =< / span > < span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > ) {< / span >
2019-04-27 02:19:28 +03:00
< span class = "identifier" > d< / span > < span class = "plain" > ++;< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::inv_primitive< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > SEQUENTIAL_BIP< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > Produce::down< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > );< / span >
2019-04-27 02:19:28 +03:00
< span class = "plain" > }< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > EmitInterSchemas::emit_inner< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > at< / span > < span class = "plain" > ,< / span >
2019-04-27 23:11:52 +03:00
< span class = "identifier" > VH< / span > < span class = "plain" > , < / span > < span class = "identifier" > sch< / span > < span class = "plain" > , < / span > < span class = "identifier" > opaque_state< / span > < span class = "plain" > , < / span > < span class = "identifier" > prim_cat< / span > < span class = "plain" > , < / span > < span class = "identifier" > first_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > second_call< / span > < span class = "plain" > ,< / span >
< span class = "identifier" > inline_command_handler< / span > < span class = "plain" > , < / span > < span class = "identifier" > i7_source_handler< / span > < span class = "plain" > );< / span >
2019-04-27 02:19:28 +03:00
< span class = "plain" > }< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > while< / span > < span class = "plain" > (< / span > < span class = "identifier" > d< / span > < span class = "plain" > > < / span > < span class = "constant" > 0< / span > < span class = "plain" > ) { < / span > < span class = "functiontext" > Produce::up< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > ); < / span > < span class = "identifier" > d< / span > < span class = "plain" > --; }< / span >
2019-04-27 02:19:28 +03:00
< / pre >
< p class = "inwebparagraph" > < / p >
2019-05-05 16:54:24 +03:00
< p class = "endnote" > This code is used in < a href = "#SP3" > § 3< / a > .< / p >
2019-04-27 02:19:28 +03:00
2019-05-05 16:54:24 +03:00
< p class = "inwebparagraph" > < a id = "SP3_10" > < / a > < b > § 3.10. < / b > < code class = "display" >
< < span class = "cwebmacrodefn" > Statement< / span > < span class = "cwebmacronumber" > 3.10< / span > > =
2019-04-27 02:19:28 +03:00
< / code > < / p >
< pre class = "displaydefn" >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > prim_cat< / span > < span class = "plain" > != < / span > < span class = "identifier" > CODE_PRIM_CAT< / span > < span class = "plain" > ) < / span > < span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "statement in expression"< / 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" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > isn_clarifier< / span > < span class = "plain" > == < / span > < span class = "constant" > CASE_BIP< / span > < span class = "plain" > ) < / span > < span class = "functiontext" > Produce::to_last_level< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > 2< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > Produce::inv_primitive< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > isn_clarifier< / span > < span class = "plain" > );< / span >
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > arity< / span > < span class = "plain" > = < / span > < span class = "functiontext" > InterSchemas::ip_arity< / span > < span class = "plain" > (< / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > isn_clarifier< / span > < span class = "plain" > );< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > arity< / span > < span class = "plain" > > < / span > < span class = "constant" > 0< / span > < span class = "plain" > ) {< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::down< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / 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" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > isn_clarifier< / span > < span class = "plain" > == < / span > < span class = "constant" > OBJECTLOOP_BIP< / span > < span class = "plain" > )< / span >
2019-05-05 16:54:24 +03:00
< < span class = "cwebmacro" > Add the objectloop range tokens< / span > < span class = "cwebmacronumber" > 3.10.1< / span > > < span class = "plain" > ;< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > inter_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > at< / span > < span class = "plain" > = < / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / span > < span class = "plain" > ;< / span >
2019-08-24 13:21:48 +03:00
< span class = "reserved" > inter_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > last< / 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" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > actual_arity< / span > < span class = "plain" > = < / span > < span class = "constant" > 0< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > for< / span > < span class = "plain" > (< / span > < span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > i< / span > < span class = "plain" > = < / span > < span class = "constant" > 0< / span > < span class = "plain" > ; ((< / span > < span class = "identifier" > at< / span > < span class = "plain" > ) & & (< / span > < span class = "identifier" > i< / span > < span class = "plain" > < < / span > < span class = "identifier" > arity< / span > < span class = "plain" > )); < / span > < span class = "identifier" > i< / span > < span class = "plain" > ++) {< / span >
2019-04-27 02:19:28 +03:00
< span class = "identifier" > actual_arity< / span > < span class = "plain" > ++;< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > EmitInterSchemas::emit_inner< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > at< / span > < span class = "plain" > , < / span > < span class = "identifier" > VH< / span > < span class = "plain" > , < / span > < span class = "identifier" > sch< / span > < span class = "plain" > , < / span > < span class = "identifier" > opaque_state< / span > < span class = "plain" > ,< / span >
2020-04-07 03:06:09 +03:00
< span class = "functiontext" > InterSchemas::ip_prim_cat< / span > < span class = "plain" > (< / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > isn_clarifier< / span > < span class = "plain" > , < / span > < span class = "identifier" > i< / span > < span class = "plain" > ),< / span >
2019-04-27 23:11:52 +03:00
< span class = "identifier" > first_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > second_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > inline_command_handler< / span > < span class = "plain" > , < / span > < span class = "identifier" > i7_source_handler< / span > < span class = "plain" > );< / span >
2019-04-27 02:19:28 +03:00
< span class = "identifier" > last< / span > < span class = "plain" > = < / span > < span class = "identifier" > at< / span > < span class = "plain" > ;< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > at< / span > < span class = "plain" > = < / span > < span class = "identifier" > at< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > ;< / span >
2019-04-27 02:19:28 +03:00
< span class = "plain" > }< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (!((< / span > < span class = "identifier" > last< / span > < span class = "plain" > ) & & (< / span > < span class = "identifier" > last< / span > < span class = "plain" > -> < / span > < span class = "element" > unclosed< / span > < span class = "plain" > ))) {< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::up< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > );< / span >
2019-04-27 02:19:28 +03:00
< span class = "plain" > }< / span >
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
2019-05-05 16:54:24 +03:00
< p class = "endnote" > This code is used in < a href = "#SP3" > § 3< / a > .< / p >
2019-04-27 02:19:28 +03:00
2019-05-05 16:54:24 +03:00
< p class = "inwebparagraph" > < a id = "SP3_10_1" > < / a > < b > § 3.10.1. < / b > < code class = "display" >
< < span class = "cwebmacrodefn" > Add the objectloop range tokens< / span > < span class = "cwebmacronumber" > 3.10.1< / span > > =
2019-04-27 02:19:28 +03:00
< / code > < / p >
< pre class = "displaydefn" >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > inter_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > oc_node< / span > < span class = "plain" > = < / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / span > < span class = "plain" > ;< / span >
2019-04-27 02:19:28 +03:00
< span class = "reserved" > while< / span > < span class = "plain" > ((< / span > < span class = "identifier" > oc_node< / span > < span class = "plain" > ) & & < / span >
2020-04-07 03:06:09 +03:00
< span class = "plain" > ((< / span > < span class = "identifier" > oc_node< / span > < span class = "plain" > -> < / span > < span class = "identifier" > isn_type< / span > < span class = "plain" > != < / span > < span class = "constant" > OPERATION_ISNT< / span > < span class = "plain" > ) ||< / span >
< span class = "plain" > (< / span > < span class = "identifier" > oc_node< / span > < span class = "plain" > -> < / span > < span class = "identifier" > isn_clarifier< / span > < span class = "plain" > != < / span > < span class = "constant" > OFCLASS_BIP< / span > < span class = "plain" > )))< / span >
< span class = "identifier" > oc_node< / span > < span class = "plain" > = < / span > < span class = "identifier" > oc_node< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / span > < span class = "plain" > ;< / span >
2019-04-27 02:19:28 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > oc_node< / span > < span class = "plain" > ) {< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > inter_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > var_node< / span > < span class = "plain" > = < / span > < span class = "identifier" > oc_node< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > inter_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > cl_node< / span > < span class = "plain" > = < / span > < span class = "identifier" > var_node< / span > < span class = "plain" > ?(< / span > < span class = "identifier" > var_node< / span > < span class = "plain" > -> < / span > < span class = "element" > next_node< / span > < span class = "plain" > ):< / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
2019-04-27 02:19:28 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > ((< / span > < span class = "identifier" > var_node< / span > < span class = "plain" > ) & & (< / span > < span class = "identifier" > cl_node< / span > < span class = "plain" > )) {< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > EmitInterSchemas::emit_inner< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > var_node< / span > < span class = "plain" > , < / span > < span class = "identifier" > VH< / span > < span class = "plain" > , < / span > < span class = "identifier" > sch< / span > < span class = "plain" > , < / span > < span class = "identifier" > opaque_state< / span > < span class = "plain" > , < / span > < span class = "identifier" > REF_PRIM_CAT< / span > < span class = "plain" > ,< / span >
2019-04-27 23:11:52 +03:00
< span class = "identifier" > first_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > second_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > inline_command_handler< / span > < span class = "plain" > , < / span > < span class = "identifier" > i7_source_handler< / span > < span class = "plain" > );< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > EmitInterSchemas::emit_inner< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > cl_node< / span > < span class = "plain" > , < / span > < span class = "identifier" > VH< / span > < span class = "plain" > , < / span > < span class = "identifier" > sch< / span > < span class = "plain" > , < / span > < span class = "identifier" > opaque_state< / span > < span class = "plain" > , < / span > < span class = "identifier" > VAL_PRIM_CAT< / span > < span class = "plain" > ,< / span >
2019-04-27 23:11:52 +03:00
< span class = "identifier" > first_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > second_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > inline_command_handler< / span > < span class = "plain" > , < / span > < span class = "identifier" > i7_source_handler< / span > < span class = "plain" > );< / span >
2019-04-27 02:19:28 +03:00
< span class = "plain" > } < / span > < span class = "reserved" > else< / span > < span class = "plain" > < / span > < span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "malformed OC node"< / span > < span class = "plain" > );< / span >
< span class = "plain" > } < / span > < span class = "reserved" > else< / span > < span class = "plain" > {< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > inter_schema_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > var_node< / span > < span class = "plain" > = < / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > while< / span > < span class = "plain" > ((< / span > < span class = "identifier" > var_node< / span > < span class = "plain" > ) & & (< / span > < span class = "identifier" > var_node< / span > < span class = "plain" > -> < / span > < span class = "element" > isn_type< / span > < span class = "plain" > != < / span > < span class = "constant" > EXPRESSION_ISNT< / span > < span class = "plain" > ))< / span >
< span class = "identifier" > var_node< / span > < span class = "plain" > = < / span > < span class = "identifier" > var_node< / span > < span class = "plain" > -> < / span > < span class = "element" > child_node< / span > < span class = "plain" > ;< / span >
2019-04-27 02:19:28 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > var_node< / span > < span class = "plain" > ) {< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > EmitInterSchemas::emit_inner< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > var_node< / span > < span class = "plain" > , < / span > < span class = "identifier" > VH< / span > < span class = "plain" > , < / span > < span class = "identifier" > sch< / span > < span class = "plain" > , < / span > < span class = "identifier" > opaque_state< / span > < span class = "plain" > , < / span > < span class = "identifier" > REF_PRIM_CAT< / span > < span class = "plain" > ,< / span >
2019-04-27 23:11:52 +03:00
< span class = "identifier" > first_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > second_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > inline_command_handler< / span > < span class = "plain" > , < / span > < span class = "identifier" > i7_source_handler< / span > < span class = "plain" > );< / span >
2019-08-24 13:21:48 +03:00
< span class = "plain" > #< / span > < span class = "identifier" > ifdef< / span > < span class = "plain" > < / span > < span class = "identifier" > CORE_MODULE< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::val_iname< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > K_value< / span > < span class = "plain" > , < / span > < span class = "identifier" > Kinds::RunTime::I6_classname< / span > < span class = "plain" > (< / span > < span class = "identifier" > K_object< / span > < span class = "plain" > ));< / span >
2019-08-24 13:21:48 +03:00
< span class = "plain" > #< / span > < span class = "identifier" > endif< / span >
< span class = "plain" > #< / span > < span class = "identifier" > ifndef< / span > < span class = "plain" > < / span > < span class = "identifier" > CORE_MODULE< / span >
2019-09-07 22:43:31 +03:00
< span class = "functiontext" > Produce::val_symbol< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > K_value< / span > < span class = "plain" > , < / span > < span class = "functiontext" > Site::veneer_symbol< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > OBJECT_VSYMB< / span > < span class = "plain" > ));< / span >
< span class = "comment" > inter_symbol *plug = Inter::Connectors::find_plug(I, I"Object");< / span >
< span class = "comment" > if (plug == NULL) plug = Inter::Connectors::plug(I, I"Object");< / span >
< span class = "comment" > Produce::val_symbol(I, K_value, plug);< / span >
2019-08-24 13:21:48 +03:00
< span class = "plain" > #< / span > < span class = "identifier" > endif< / span >
2019-04-27 02:19:28 +03:00
< span class = "plain" > } < / span > < span class = "reserved" > else< / span > < span class = "plain" > < / span > < span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "objectloop without visible variable"< / span > < span class = "plain" > );< / span >
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
2019-05-05 16:54:24 +03:00
< p class = "endnote" > This code is used in < a href = "#SP3_10" > § 3.10< / a > .< / p >
2019-04-27 02:19:28 +03:00
2019-05-05 16:54:24 +03:00
< p class = "inwebparagraph" > < a id = "SP3_11" > < / a > < b > § 3.11. < / b > < code class = "display" >
< < span class = "cwebmacrodefn" > Expression< / span > < span class = "cwebmacronumber" > 3.11< / span > > =
2019-04-27 02:19:28 +03:00
< / code > < / p >
< pre class = "displaydefn" >
2019-04-29 04:05:11 +03:00
< span class = "reserved" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > cat_me< / span > < span class = "plain" > = < / span > < span class = "identifier" > FALSE< / span > < span class = "plain" > , < / span > < span class = "identifier" > lab_me< / span > < span class = "plain" > = < / span > < span class = "identifier" > FALSE< / span > < span class = "plain" > , < / span > < span class = "identifier" > print_ret_me< / 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" > int< / span > < span class = "plain" > < / span > < span class = "identifier" > tc< / span > < span class = "plain" > = < / span > < span class = "constant" > 0< / span > < span class = "plain" > ; < / span > < span class = "reserved" > for< / span > < span class = "plain" > (< / span > < span class = "reserved" > inter_schema_token< / span > < span class = "plain" > *< / span > < span class = "identifier" > t< / span > < span class = "plain" > = < / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > expression_tokens< / span > < span class = "plain" > ; < / span > < span class = "identifier" > t< / span > < span class = "plain" > ; < / span > < span class = "identifier" > t< / span > < span class = "plain" > =< / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > next< / span > < span class = "plain" > ) < / span > < span class = "identifier" > tc< / span > < span class = "plain" > ++;< / span >
< span class = "reserved" > if< / span > < span class = "plain" > ((< / span > < span class = "identifier" > tc< / span > < span class = "plain" > > < / span > < span class = "constant" > 1< / span > < span class = "plain" > ) & & (< / span > < span class = "identifier" > prim_cat< / span > < span class = "plain" > == < / span > < span class = "identifier" > VAL_PRIM_CAT< / span > < span class = "plain" > )) < / span > < span class = "identifier" > cat_me< / span > < span class = "plain" > = < / span > < span class = "identifier" > TRUE< / span > < span class = "plain" > ;< / span >
2019-04-27 02:19:28 +03:00
2020-04-07 03:06:09 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > ((< / span > < span class = "identifier" > tc< / span > < span class = "plain" > == < / span > < span class = "constant" > 1< / span > < span class = "plain" > ) & & (< / span > < span class = "identifier" > prim_cat< / span > < span class = "plain" > == < / span > < span class = "identifier" > CODE_PRIM_CAT< / span > < span class = "plain" > ) & & (< / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > expression_tokens< / span > < span class = "plain" > -> < / span > < span class = "element" > ist_type< / span > < span class = "plain" > == < / span > < span class = "constant" > DQUOTED_ISTT< / span > < span class = "plain" > ))< / span >
2019-04-28 05:27:32 +03:00
< span class = "identifier" > print_ret_me< / span > < span class = "plain" > = < / span > < span class = "identifier" > TRUE< / 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" > tc< / span > < span class = "plain" > == < / span > < span class = "constant" > 1< / span > < span class = "plain" > ) & & (< / span > < span class = "identifier" > prim_cat< / span > < span class = "plain" > == < / span > < span class = "identifier" > LAB_PRIM_CAT< / span > < span class = "plain" > )) < / span > < span class = "identifier" > lab_me< / span > < span class = "plain" > = < / span > < span class = "identifier" > TRUE< / span > < span class = "plain" > ;< / span >
2019-04-29 04:05:11 +03:00
2019-08-31 15:56:36 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > cat_me< / span > < span class = "plain" > ) { < / span > < span class = "functiontext" > Produce::evaluation< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > ); < / span > < span class = "functiontext" > Produce::down< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > ); }< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > prim_cat< / span > < span class = "plain" > == < / span > < span class = "identifier" > REF_PRIM_CAT< / span > < span class = "plain" > ) { < / span > < span class = "functiontext" > Produce::reference< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > ); < / span > < span class = "functiontext" > Produce::down< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > ); }< / span >
2019-04-27 02:19:28 +03:00
2020-04-07 03:06:09 +03:00
< span class = "reserved" > for< / span > < span class = "plain" > (< / span > < span class = "reserved" > inter_schema_token< / span > < span class = "plain" > *< / span > < span class = "identifier" > t< / span > < span class = "plain" > = < / span > < span class = "identifier" > isn< / span > < span class = "plain" > -> < / span > < span class = "element" > expression_tokens< / span > < span class = "plain" > ; < / span > < span class = "identifier" > t< / span > < span class = "plain" > ; < / span > < span class = "identifier" > t< / span > < span class = "plain" > =< / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > next< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > switch< / span > < span class = "plain" > (< / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "identifier" > ist_type< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "identifier" > IDENTIFIER_ISTT:< / span > < span class = "plain" > {< / span >
2019-04-29 04:05:11 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > lab_me< / span > < span class = "plain" > )< / span >
2020-04-07 03:06:09 +03:00
< span class = "functiontext" > Produce::lab< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "functiontext" > Produce::reserve_label< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > material< / span > < span class = "plain" > ));< / span >
2019-04-29 04:05:11 +03:00
< span class = "reserved" > else< / span > < span class = "plain" > {< / span >
2019-08-24 13:21:48 +03:00
< span class = "plain" > #< / span > < span class = "identifier" > ifdef< / span > < span class = "plain" > < / span > < span class = "identifier" > CORE_MODULE< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > local_variable< / span > < span class = "plain" > *< / span > < span class = "identifier" > lvar< / span > < span class = "plain" > = < / span > < span class = "identifier" > LocalVariables::by_name_any< / span > < span class = "plain" > (< / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > material< / span > < span class = "plain" > );< / span >
2019-04-29 04:05:11 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > lvar< / span > < span class = "plain" > ) {< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > inter_symbol< / span > < span class = "plain" > *< / span > < span class = "identifier" > lvar_s< / span > < span class = "plain" > = < / span > < span class = "identifier" > LocalVariables::declare_this< / span > < span class = "plain" > (< / span > < span class = "identifier" > lvar< / span > < span class = "plain" > , < / span > < span class = "identifier" > FALSE< / span > < span class = "plain" > , < / span > < span class = "constant" > 8< / span > < span class = "plain" > );< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::val_symbol< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > K_value< / span > < span class = "plain" > , < / span > < span class = "identifier" > lvar_s< / span > < span class = "plain" > );< / span >
2019-04-29 04:05:11 +03:00
< span class = "plain" > } < / span > < span class = "reserved" > else< / span > < span class = "plain" > {< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::val_symbol< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > K_value< / span > < span class = "plain" > , < / span > < span class = "functiontext" > EmitInterSchemas::find_identifier< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > t< / span > < span class = "plain" > , < / span > < span class = "identifier" > first_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > second_call< / span > < span class = "plain" > ));< / span >
2019-04-29 04:05:11 +03:00
< span class = "plain" > }< / span >
2019-08-24 13:21:48 +03:00
< span class = "plain" > #< / span > < span class = "identifier" > endif< / span >
< span class = "plain" > #< / span > < span class = "identifier" > ifndef< / span > < span class = "plain" > < / span > < span class = "identifier" > CORE_MODULE< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::val_symbol< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > K_value< / span > < span class = "plain" > , < / span > < span class = "functiontext" > EmitInterSchemas::find_identifier< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > t< / span > < span class = "plain" > , < / span > < span class = "identifier" > first_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > second_call< / span > < span class = "plain" > ));< / span >
2019-08-24 13:21:48 +03:00
< span class = "plain" > #< / span > < span class = "identifier" > endif< / span >
2019-04-27 02:19:28 +03:00
< span class = "plain" > }< / span >
< span class = "reserved" > break< / span > < span class = "plain" > ;< / 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" > ASM_ARROW_ISTT:< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::val_symbol< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > K_value< / span > < span class = "plain" > , < / span > < span class = "functiontext" > Site::veneer_symbol< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > ASM_ARROW_VSYMB< / span > < span class = "plain" > ));< / span >
2019-04-28 05:27:32 +03:00
< span class = "reserved" > break< / 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" > ASM_SP_ISTT:< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::val_symbol< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > K_value< / span > < span class = "plain" > , < / span > < span class = "functiontext" > Site::veneer_symbol< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > ASM_SP_VSYMB< / span > < span class = "plain" > ));< / span >
2019-04-28 05:27:32 +03:00
< span class = "reserved" > break< / 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" > ASM_NEGATED_LABEL_ISTT:< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > Str::eq< / span > < span class = "plain" > (< / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > material< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "rtrue"< / span > < span class = "plain" > ))< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::val_symbol< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > K_value< / span > < span class = "plain" > , < / span > < span class = "functiontext" > Site::veneer_symbol< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > ASM_NEG_RTRUE_VSYMB< / span > < span class = "plain" > ));< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > else< / span > < span class = "plain" > < / span > < span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > Str::eq< / span > < span class = "plain" > (< / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > material< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "rfalse"< / span > < span class = "plain" > ))< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::val_symbol< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > K_value< / span > < span class = "plain" > , < / span > < span class = "functiontext" > Site::veneer_symbol< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > ASM_NEG_RFALSE_VSYMB< / span > < span class = "plain" > ));< / span >
2019-05-07 00:32:11 +03:00
< span class = "reserved" > else< / span > < span class = "plain" > {< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::val_symbol< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > K_value< / span > < span class = "plain" > , < / span > < span class = "functiontext" > Site::veneer_symbol< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > ASM_NEG_VSYMB< / span > < span class = "plain" > ));< / span >
2020-04-07 03:06:09 +03:00
< span class = "functiontext" > Produce::lab< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "functiontext" > Produce::reserve_label< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > material< / span > < span class = "plain" > ));< / span >
2019-05-07 00:32:11 +03:00
< span class = "plain" > }< / span >
2019-05-05 16:54:24 +03:00
< span class = "reserved" > break< / 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" > ASM_LABEL_ISTT:< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > Str::eq< / span > < span class = "plain" > (< / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > material< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "rtrue"< / span > < span class = "plain" > ))< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::val_symbol< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > K_value< / span > < span class = "plain" > , < / span > < span class = "functiontext" > Site::veneer_symbol< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > ASM_RTRUE_VSYMB< / span > < span class = "plain" > ));< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > else< / span > < span class = "plain" > < / span > < span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > Str::eq< / span > < span class = "plain" > (< / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > material< / span > < span class = "plain" > , < / span > < span class = "identifier" > I< / span > < span class = "string" > "rfalse"< / span > < span class = "plain" > ))< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::val_symbol< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > K_value< / span > < span class = "plain" > , < / span > < span class = "functiontext" > Site::veneer_symbol< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > ASM_RFALSE_VSYMB< / span > < span class = "plain" > ));< / span >
2020-04-07 03:06:09 +03:00
< span class = "reserved" > else< / span > < span class = "plain" > < / span > < span class = "functiontext" > Produce::lab< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "functiontext" > Produce::reserve_label< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > material< / span > < span class = "plain" > ));< / span >
2019-04-28 05:27:32 +03:00
< span class = "reserved" > break< / 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" > NUMBER_ISTT:< / span >
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "identifier" > BIN_NUMBER_ISTT:< / span >
< span class = "reserved" > case< / span > < span class = "plain" > < / span > < span class = "identifier" > HEX_NUMBER_ISTT:< / span > < span class = "plain" > {< / span >
< span class = "identifier" > inter_t< / span > < span class = "plain" > < / span > < span class = "identifier" > v1< / span > < span class = "plain" > = < / span > < span class = "constant" > 0< / span > < span class = "plain" > , < / span > < span class = "identifier" > v2< / span > < span class = "plain" > = < / span > < span class = "constant" > 0< / 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 = "element" > constant_number< / span > < span class = "plain" > > = < / span > < span class = "constant" > 0< / span > < span class = "plain" > ) { < / span > < span class = "identifier" > v1< / span > < span class = "plain" > = < / span > < span class = "identifier" > LITERAL_IVAL< / span > < span class = "plain" > ; < / span > < span class = "identifier" > v2< / span > < span class = "plain" > = (< / span > < span class = "identifier" > inter_t< / span > < span class = "plain" > ) < / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > constant_number< / span > < span class = "plain" > ; }< / span >
< span class = "reserved" > else< / span > < span class = "plain" > < / span > < span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > Inter::Types::read_I6_decimal< / span > < span class = "plain" > (< / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > material< / span > < span class = "plain" > , & < / span > < span class = "identifier" > v1< / span > < span class = "plain" > , & < / span > < span class = "identifier" > v2< / span > < span class = "plain" > ) == < / span > < span class = "identifier" > FALSE< / span > < span class = "plain" > )< / span >
2019-04-27 02:19:28 +03:00
< span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "bad number"< / span > < span class = "plain" > );< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::val< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > K_value< / span > < span class = "plain" > , < / span > < span class = "identifier" > v1< / span > < span class = "plain" > , < / span > < span class = "identifier" > v2< / span > < span class = "plain" > );< / span >
2019-04-27 02:19:28 +03:00
< span class = "reserved" > break< / span > < span class = "plain" > ;< / 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" > REAL_NUMBER_ISTT:< / span >
< span class = "functiontext" > Produce::val_real_from_text< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > material< / span > < span class = "plain" > );< / span >
2019-04-27 02:19:28 +03:00
< span class = "reserved" > break< / 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" > DQUOTED_ISTT:< / span >
2019-04-28 05:27:32 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > print_ret_me< / span > < span class = "plain" > ) {< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::inv_primitive< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "constant" > PRINTRET_BIP< / span > < span class = "plain" > );< / span >
< span class = "functiontext" > Produce::down< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > );< / span >
2019-04-28 05:27:32 +03:00
< span class = "plain" > }< / span >
2020-04-07 03:06:09 +03:00
< span class = "functiontext" > Produce::val_text< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > material< / span > < span class = "plain" > );< / span >
2019-04-28 05:27:32 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > print_ret_me< / span > < span class = "plain" > ) {< / span >
2019-08-31 15:56:36 +03:00
< span class = "functiontext" > Produce::up< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > );< / span >
2019-04-28 05:27:32 +03:00
< span class = "plain" > }< / span >
2019-04-27 02:19:28 +03:00
< span class = "reserved" > break< / 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" > SQUOTED_ISTT:< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > Str::len< / span > < span class = "plain" > (< / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > material< / span > < span class = "plain" > ) == < / span > < span class = "constant" > 1< / span > < span class = "plain" > ) {< / span >
< span class = "functiontext" > Produce::val_char< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > Str::get_at< / span > < span class = "plain" > (< / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > material< / span > < span class = "plain" > , < / span > < span class = "constant" > 0< / span > < span class = "plain" > ));< / span >
2019-04-27 02:19:28 +03:00
< span class = "plain" > } < / span > < span class = "reserved" > else< / span > < span class = "plain" > {< / span >
2020-04-07 03:06:09 +03:00
< span class = "functiontext" > Produce::val_dword< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > material< / span > < span class = "plain" > );< / span >
2019-04-27 02:19:28 +03:00
< span class = "plain" > }< / span >
< span class = "reserved" > break< / 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" > I7_ISTT:< / span >
< span class = "plain" > (*< / span > < span class = "identifier" > i7_source_handler< / span > < span class = "plain" > )(< / span > < span class = "identifier" > VH< / 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 = "element" > material< / span > < span class = "plain" > );< / span >
2019-04-27 02:19:28 +03:00
< span class = "reserved" > break< / 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" > INLINE_ISTT:< / span >
2019-04-27 23:11:52 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > inline_command_handler< / span > < span class = "plain" > )< / span >
< span class = "plain" > (*< / span > < span class = "identifier" > inline_command_handler< / span > < span class = "plain" > )(< / span > < span class = "identifier" > VH< / span > < span class = "plain" > , < / span > < span class = "identifier" > t< / span > < span class = "plain" > , < / span > < span class = "identifier" > opaque_state< / span > < span class = "plain" > , < / span > < span class = "identifier" > prim_cat< / span > < span class = "plain" > );< / span >
2019-04-27 02:19:28 +03:00
< span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > default:< / span >
2019-04-27 02:19:28 +03:00
< span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "bad expression token"< / span > < span class = "plain" > );< / span >
< span class = "plain" > }< / span >
< span class = "plain" > }< / span >
2019-08-31 15:56:36 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > cat_me< / span > < span class = "plain" > ) { < / span > < span class = "functiontext" > Produce::up< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > ); }< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > prim_cat< / span > < span class = "plain" > == < / span > < span class = "identifier" > REF_PRIM_CAT< / span > < span class = "plain" > ) { < / span > < span class = "functiontext" > Produce::up< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > ); }< / span >
2019-04-27 02:19:28 +03:00
< / pre >
< p class = "inwebparagraph" > < / p >
2019-05-05 16:54:24 +03:00
< p class = "endnote" > This code is used in < a href = "#SP3" > § 3< / a > .< / p >
2019-04-27 02:19:28 +03:00
2019-05-05 16:54:24 +03:00
< p class = "inwebparagraph" > < a id = "SP3_12" > < / a > < b > § 3.12. < / b > < code class = "display" >
< < span class = "cwebmacrodefn" > Non-conditional directive< / span > < span class = "cwebmacronumber" > 3.12< / span > > =
2019-04-29 04:05:11 +03:00
< / code > < / p >
< pre class = "displaydefn" >
2019-05-05 16:54:24 +03:00
< span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "unknown directive"< / span > < span class = "plain" > );< / span >
2019-04-29 04:05:11 +03:00
< / pre >
< p class = "inwebparagraph" > < / p >
2019-05-05 16:54:24 +03:00
< p class = "endnote" > This code is used in < a href = "#SP3" > § 3< / a > .< / p >
2019-04-29 04:05:11 +03:00
2019-05-05 16:54:24 +03:00
< p class = "inwebparagraph" > < a id = "SP4" > < / a > < b > § 4. < / b > < / p >
2019-04-27 02:19:28 +03:00
< pre class = "display" >
2019-08-31 15:56:36 +03:00
< span class = "identifier" > inter_symbol< / span > < span class = "plain" > *< / span > < span class = "functiontext" > EmitInterSchemas::find_identifier< / span > < span class = "plain" > (< / span > < span class = "identifier" > inter_tree< / span > < span class = "plain" > *< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "reserved" > inter_schema_token< / span > < span class = "plain" > *< / span > < span class = "identifier" > t< / span > < span class = "plain" > , < / span > < span class = "identifier" > inter_symbols_table< / span > < span class = "plain" > *< / span > < span class = "identifier" > first_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > inter_symbols_table< / span > < span class = "plain" > *< / span > < span class = "identifier" > second_call< / 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" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > as_quoted< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "functiontext" > InterNames::to_symbol< / span > < span class = "plain" > (< / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > as_quoted< / span > < span class = "plain" > );< / span >
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "functiontext" > EmitInterSchemas::find_identifier_text< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "element" > material< / span > < span class = "plain" > , < / span > < span class = "identifier" > first_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > second_call< / span > < span class = "plain" > );< / span >
2019-04-27 02:19:28 +03:00
< span class = "plain" > }< / span >
2019-08-31 15:56:36 +03:00
< span class = "identifier" > inter_symbol< / span > < span class = "plain" > *< / span > < span class = "functiontext" > EmitInterSchemas::find_identifier_text< / span > < span class = "plain" > (< / span > < span class = "identifier" > inter_tree< / span > < span class = "plain" > *< / span > < span class = "identifier" > I< / 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 = "identifier" > inter_symbols_table< / span > < span class = "plain" > *< / span > < span class = "identifier" > first_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > inter_symbols_table< / span > < span class = "plain" > *< / span > < span class = "identifier" > second_call< / 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::get_at< / span > < span class = "plain" > (< / span > < span class = "identifier" > name< / span > < span class = "plain" > , < / span > < span class = "constant" > 0< / span > < span class = "plain" > ) == < / span > < span class = "constant" > 0x00A7< / span > < span class = "plain" > ) {< / span >
2019-05-05 16:54:24 +03:00
< span class = "identifier" > TEMPORARY_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > SR< / span > < span class = "plain" > );< / span >
2019-08-31 15:56:36 +03:00
< span class = "identifier" > Str::copy< / span > < span class = "plain" > (< / span > < span class = "identifier" > SR< / span > < span class = "plain" > , < / span > < span class = "identifier" > name< / span > < span class = "plain" > );< / span >
2019-05-05 16:54:24 +03:00
< span class = "identifier" > Str::delete_first_character< / span > < span class = "plain" > (< / span > < span class = "identifier" > SR< / span > < span class = "plain" > );< / span >
< span class = "identifier" > Str::delete_last_character< / span > < span class = "plain" > (< / span > < span class = "identifier" > SR< / span > < span class = "plain" > );< / span >
2019-08-31 15:56:36 +03:00
< span class = "identifier" > inter_symbol< / span > < span class = "plain" > *< / span > < span class = "identifier" > S< / span > < span class = "plain" > = < / span > < span class = "identifier" > Inter::SymbolsTables::url_name_to_symbol< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > , < / span > < span class = "identifier" > SR< / span > < span class = "plain" > );< / span >
2019-05-05 16:54:24 +03:00
< span class = "identifier" > DISCARD_TEXT< / span > < span class = "plain" > (< / span > < span class = "identifier" > SR< / span > < span class = "plain" > );< / span >
2019-08-31 15:56:36 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > S< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > S< / span > < span class = "plain" > ;< / span >
2019-05-05 16:54:24 +03:00
< span class = "plain" > }< / span >
2019-04-27 23:11:52 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > first_call< / span > < span class = "plain" > ) {< / span >
2019-08-31 15:56:36 +03:00
< span class = "identifier" > inter_symbol< / span > < span class = "plain" > *< / span > < span class = "identifier" > S< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Produce::seek_symbol< / span > < span class = "plain" > (< / span > < span class = "identifier" > first_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > name< / span > < span class = "plain" > );< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > S< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > S< / span > < span class = "plain" > ;< / span >
2019-04-27 23:11:52 +03:00
< span class = "plain" > }< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > second_call< / span > < span class = "plain" > ) {< / span >
2019-08-31 15:56:36 +03:00
< span class = "identifier" > inter_symbol< / span > < span class = "plain" > *< / span > < span class = "identifier" > S< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Produce::seek_symbol< / span > < span class = "plain" > (< / span > < span class = "identifier" > second_call< / span > < span class = "plain" > , < / span > < span class = "identifier" > name< / span > < span class = "plain" > );< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > S< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > S< / span > < span class = "plain" > ;< / span >
2019-04-27 23:11:52 +03:00
< span class = "plain" > }< / span >
2019-09-01 13:50:12 +03:00
< span class = "identifier" > inter_symbol< / span > < span class = "plain" > *< / span > < span class = "identifier" > S< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Veneer::find< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > name< / span > < span class = "plain" > , < / span > < span class = "functiontext" > Produce::kind_to_symbol< / span > < span class = "plain" > (< / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ));< / span >
2019-08-31 15:56:36 +03:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > S< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > S< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > S< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Produce::seek_symbol< / span > < span class = "plain" > (< / span > < span class = "functiontext" > Produce::connectors_scope< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > ), < / span > < span class = "identifier" > name< / span > < span class = "plain" > );< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > S< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > S< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > S< / span > < span class = "plain" > = < / span > < span class = "functiontext" > Produce::seek_symbol< / span > < span class = "plain" > (< / span > < span class = "functiontext" > Produce::main_scope< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > ), < / span > < span class = "identifier" > name< / span > < span class = "plain" > );< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > S< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > S< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > S< / span > < span class = "plain" > = < / span > < span class = "functiontext" > InterNames::to_symbol< / span > < span class = "plain" > (< / span > < span class = "functiontext" > Produce::find_by_name< / span > < span class = "plain" > (< / span > < span class = "identifier" > I< / span > < span class = "plain" > , < / span > < span class = "identifier" > name< / span > < span class = "plain" > ));< / span >
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > S< / span > < span class = "plain" > ) < / span > < span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > S< / span > < span class = "plain" > ;< / span >
2020-04-07 03:06:09 +03:00
< span class = "identifier" > LOG< / span > < span class = "plain" > (< / span > < span class = "string" > "Defeated on %S\n"< / span > < span class = "plain" > , < / span > < span class = "identifier" > name< / span > < span class = "plain" > );< / span >
2019-04-27 23:11:52 +03:00
< span class = "identifier" > internal_error< / span > < span class = "plain" > (< / span > < span class = "string" > "unable to find identifier"< / span > < span class = "plain" > );< / span >
< span class = "reserved" > return< / span > < span class = "plain" > < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
2019-04-27 02:19:28 +03:00
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
2019-05-05 16:54:24 +03:00
< p class = "endnote" > The function EmitInterSchemas::find_identifier is used in < a href = "#SP3_4" > § 3.4< / a > , < a href = "#SP3_11" > § 3.11< / a > .< / p >
2019-04-27 02:19:28 +03:00
2019-08-24 13:21:48 +03:00
< p class = "endnote" > The function EmitInterSchemas::find_identifier_text is used in < a href = "#SP2_1" > § 2.1< / a > .< / p >
2019-04-27 02:19:28 +03:00
< hr class = "tocbar" >
2019-08-28 12:35:44 +03:00
< ul class = "toc" > < li > < a href = "2-is.html" > Back to 'Inter Schemas'< / a > < / li > < li > < i > (This section ends Chapter 2: Blueprints.)< / i > < / li > < / ul > < hr class = "tocbar" >
2019-04-27 02:19:28 +03:00
<!-- End of weave -->
2020-03-19 02:11:25 +02:00
< / main >
2019-04-27 02:19:28 +03:00
< / body >
< / html >