2021-11-28 23:33:48 +00:00
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
< html >
< head >
< title > Simple Tangler< / title >
< link href = "../docs-assets/Breadcrumbs.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< meta name = "viewport" content = "width=device-width initial-scale=1" >
< meta http-equiv = "Content-Type" content = "text/html; charset=utf-8" >
< meta http-equiv = "Content-Language" content = "en-gb" >
< link href = "../docs-assets/Contents.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Progress.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Navigation.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Fonts.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Base.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< script src = "http://code.jquery.com/jquery-1.12.4.min.js"
integrity="sha256-ZosEbRLbNQzLpnKIkEdrPv7lOy9C27hHQ+Xp8a4MxAQ=" crossorigin="anonymous">< / script >
< script src = "../docs-assets/Bigfoot.js" > < / script >
< link href = "../docs-assets/Bigfoot.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< script >
function togglePopup(material_id) {
var popup = document.getElementById(material_id);
popup.classList.toggle("show");
}
< / script >
< link href = "../docs-assets/Popups.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< link href = "../docs-assets/Colours.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< / head >
< body class = "commentary-font" >
< nav role = "navigation" >
< h1 > < a href = "../index.html" >
< img src = "../docs-assets/Octagram.png" width = 72 height = 72" >
< / a > < / h1 >
< ul > < li > < a href = "../inweb/index.html" > inweb< / a > < / li >
< / ul > < h2 > Foundation Module< / h2 > < ul >
< li > < a href = "index.html" > < span class = "selectedlink" > foundation< / span > < / a > < / li >
< li > < a href = "../foundation-test/index.html" > foundation-test< / a > < / li >
< / ul > < h2 > Example Webs< / h2 > < ul >
< li > < a href = "../goldbach/index.html" > goldbach< / a > < / li >
< li > < a href = "../twinprimes/twinprimes.html" > twinprimes< / a > < / li >
< li > < a href = "../eastertide/index.html" > eastertide< / a > < / li >
< / ul > < h2 > Repository< / h2 > < ul >
< li > < a href = "https://github.com/ganelson/inweb" > < img src = "../docs-assets/github.png" height = 18 > github< / a > < / li >
< / ul > < h2 > Related Projects< / h2 > < ul >
2022-04-25 15:46:46 +00:00
< li > < a href = "../../../inform/docs/overview.html" > inform< / a > < / li >
2021-11-28 23:33:48 +00:00
< li > < a href = "../../../intest/docs/index.html" > intest< / a > < / li >
< / ul >
< / nav >
< main role = "main" >
<!-- Weave of 'Simple Tangler' generated by Inweb -->
< div class = "breadcrumbs" >
< ul class = "crumbs" > < li > < a href = "../index.html" > Home< / a > < / li > < li > < a href = "index.html" > foundation< / a > < / li > < li > < a href = "index.html#8" > Chapter 8: Literate Programming< / a > < / li > < li > < b > Simple Tangler< / b > < / li > < / ul > < / div >
< p class = "purpose" > Unravelling (a simple version of) Inweb's literate programming notation to access the tangled content.< / p >
< p class = "commentary firstcommentary" > < a id = "SP1" class = "paragraph-anchor" > < / a > < b > § 1. < / b > Suppose we have a simple form of a web, in the sense of Inweb: one which
makes no use of macros, definitions or enumerations.< sup id = "fnref:1" > < a href = "#fn:1" rel = "footnote" > 1< / a > < / sup > Because the syntax
used is a subset of Inweb syntax, there's no problem weaving such a web:
Inweb can be used for that. But now suppose we want to tangle the web, within
some application. We don't really want to embed the whole of Inweb into such
a program: something much simpler would surely be sufficient. And here it is.
< / p >
< ul class = "footnotetexts" > < li class = "footnote" id = "fn:1" > < p class = "inwebfootnote" > < sup id = "fnref:1" > < a href = "#fn:1" rel = "footnote" > 1< / a > < / sup > Why might we have this? Because kits of Inter code take this form.
< a href = "#fnref:1" title = "return to text" > ↩ < / a > < / p > < / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP2" class = "paragraph-anchor" > < / a > < b > § 2. < / b > The simple tangler is controlled using a parcel of settings. Note also the
< span class = "extract" > < span class = "extract-syntax" > state< / span > < / span > , which is not used by the reader itself, but instead allows the callback
functions to have a shared state of their own.
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > typedef< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > simple_tangle_docket< / span > < span class = "plain-syntax" > {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > (*< / span > < span class = "identifier-syntax" > raw_callback< / span > < span class = "plain-syntax" > )(< / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *, < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > simple_tangle_docket< / span > < span class = "plain-syntax" > *);< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > (*< / span > < span class = "identifier-syntax" > command_callback< / span > < span class = "plain-syntax" > )(< / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *, < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *,< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *, < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > simple_tangle_docket< / span > < span class = "plain-syntax" > *);< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > (*< / span > < span class = "identifier-syntax" > bplus_callback< / span > < span class = "plain-syntax" > )(< / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *, < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > simple_tangle_docket< / span > < span class = "plain-syntax" > *);< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > (*< / span > < span class = "identifier-syntax" > error_callback< / span > < span class = "plain-syntax" > )(< / span > < span class = "reserved-syntax" > char< / span > < span class = "plain-syntax" > *, < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *);< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > state< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > pathname< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > web_path< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > simple_tangle_docket< / span > < span class = "plain-syntax" > ;< / span >
< / pre >
< ul class = "endnotetexts" > < li > The structure simple_tangle_docket is accessed in 3/cla and here.< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP3" class = "paragraph-anchor" > < / a > < b > § 3. < / b > < / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > simple_tangle_docket< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > SimpleTangler::new_docket< / span > < span class = "plain-syntax" > (< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > (*< / span > < span class = "identifier-syntax" > A< / span > < span class = "plain-syntax" > )(< / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *, < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > simple_tangle_docket< / span > < span class = "plain-syntax" > *),< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > (*< / span > < span class = "identifier-syntax" > B< / span > < span class = "plain-syntax" > )(< / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *, < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *,< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *, < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > simple_tangle_docket< / span > < span class = "plain-syntax" > *),< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > (*< / span > < span class = "identifier-syntax" > C< / span > < span class = "plain-syntax" > )(< / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *, < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > simple_tangle_docket< / span > < span class = "plain-syntax" > *),< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > (*< / span > < span class = "identifier-syntax" > D< / span > < span class = "plain-syntax" > )(< / span > < span class = "reserved-syntax" > char< / span > < span class = "plain-syntax" > *, < / span > < span class = "reserved-syntax" > struct< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *),< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > pathname< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > web_path< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > initial_state< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > simple_tangle_docket< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > raw_callback< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > A< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > command_callback< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > B< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > bplus_callback< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > C< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > error_callback< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > D< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > state< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > initial_state< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > .< / span > < span class = "identifier-syntax" > web_path< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > web_path< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > return< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
< p class = "commentary firstcommentary" > < a id = "SP4" class = "paragraph-anchor" > < / a > < b > § 4. < / b > We can tangle either text already in memory, or a file (which the tangler
should open), or a section (which the tangler should find and open), or a
whole web of section files (ditto):
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > SimpleTangler::tangle_text< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > simple_tangle_docket< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > text< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < a href = "8-st.html#SP5" class = "function-link" > < span class = "function-syntax" > SimpleTangler::tangle_L1< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > text< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > , < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > SimpleTangler::tangle_file< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > simple_tangle_docket< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > filename< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > F< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < a href = "8-st.html#SP5" class = "function-link" > < span class = "function-syntax" > SimpleTangler::tangle_L1< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > F< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > , < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > SimpleTangler::tangle_section< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > simple_tangle_docket< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > leafname< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < a href = "8-st.html#SP5" class = "function-link" > < span class = "function-syntax" > SimpleTangler::tangle_L1< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > leafname< / span > < span class = "plain-syntax" > , < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > SimpleTangler::tangle_web< / span > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > simple_tangle_docket< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < a href = "8-st.html#SP5" class = "function-link" > < span class = "function-syntax" > SimpleTangler::tangle_L1< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > , < / span > < span class = "constant-syntax" > TRUE< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
< p class = "commentary firstcommentary" > < a id = "SP5" class = "paragraph-anchor" > < / a > < b > § 5. < / b > < / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > SimpleTangler::tangle_L1< / span > < button class = "popup" onclick = "togglePopup('usagePopup1')" > < span class = "comment-syntax" > ?< / span > < span class = "popuptext" id = "usagePopup1" > Usage of < span class = "code-font" > < span class = "function-syntax" > SimpleTangler::tangle_L1< / span > < / span > :< br / > < a href = "8-st.html#SP4" > § 4< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "reserved-syntax" > simple_tangle_docket< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > text< / span > < span class = "plain-syntax" > ,< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > filename< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > F< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > leafname< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > whole_web< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > TEMPORARY_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > T< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < a href = "8-st.html#SP6" class = "function-link" > < span class = "function-syntax" > SimpleTangler::tangle_L2< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > T< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > text< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > F< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > leafname< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > whole_web< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > (*(< / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > raw_callback< / span > < span class = "plain-syntax" > ))(< / span > < span class = "identifier-syntax" > T< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > DISCARD_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > T< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
< p class = "commentary firstcommentary" > < a id = "SP6" class = "paragraph-anchor" > < / a > < b > § 6. < / b > First, dispose of the "whole web" possibility.
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > SimpleTangler::tangle_L2< / span > < button class = "popup" onclick = "togglePopup('usagePopup2')" > < span class = "comment-syntax" > ?< / span > < span class = "popuptext" id = "usagePopup2" > Usage of < span class = "code-font" > < span class = "function-syntax" > SimpleTangler::tangle_L2< / span > < / span > :< br / > < a href = "8-st.html#SP5" > § 5< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "constant-syntax" > OUTPUT_STREAM< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > text< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > filename< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > F< / span > < span class = "plain-syntax" > ,< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > leafname< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > simple_tangle_docket< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > whole_web< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > whole_web< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > web_md< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > Wm< / span > < span class = "plain-syntax" > = < / span > < a href = "8-ws.html#SP5" class = "function-link" > < span class = "function-syntax" > WebMetadata::get< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > web_path< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > , < / span > < span class = "constant-syntax" > V2_SYNTAX< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > , < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > , < / span > < span class = "constant-syntax" > TRUE< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > chapter_md< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > Cm< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > LOOP_OVER_LINKED_LIST< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Cm< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > chapter_md< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > Wm< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > chapters_md< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > section_md< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > Sm< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > LOOP_OVER_LINKED_LIST< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Sm< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > section_md< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > Cm< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > sections_md< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > filename< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > SF< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > Sm< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > source_file_for_section< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < a href = "8-st.html#SP7" class = "function-link" > < span class = "function-syntax" > SimpleTangler::tangle_L3< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > OUT< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > text< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > Sm< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > sect_title< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > SF< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > {< / span >
< span class = "plain-syntax" > < / span > < a href = "8-st.html#SP7" class = "function-link" > < span class = "function-syntax" > SimpleTangler::tangle_L3< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > OUT< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > text< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > leafname< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > F< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
< p class = "commentary firstcommentary" > < a id = "SP7" class = "paragraph-anchor" > < / a > < b > § 7. < / b > When tangling a file, we begin in < span class = "extract" > < span class = "extract-syntax" > comment< / span > < / span > mode; when tangling other matter,
not so much.
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "reserved-syntax" > void< / span > < span class = "plain-syntax" > < / span > < span class = "function-syntax" > SimpleTangler::tangle_L3< / span > < button class = "popup" onclick = "togglePopup('usagePopup3')" > < span class = "comment-syntax" > ?< / span > < span class = "popuptext" id = "usagePopup3" > Usage of < span class = "code-font" > < span class = "function-syntax" > SimpleTangler::tangle_L3< / span > < / span > :< br / > < a href = "8-st.html#SP6" > § 6< / a > < / span > < / button > < span class = "plain-syntax" > (< / span > < span class = "constant-syntax" > OUTPUT_STREAM< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > text< / span > < span class = "plain-syntax" > ,< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > text_stream< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > leafname< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > simple_tangle_docket< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > , < / span > < span class = "reserved-syntax" > filename< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > F< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > comment< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > FILE< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > Input_File< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < a href = "4-sm.html#SP8" class = "function-link" > < span class = "function-syntax" > Str::len< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > leafname< / span > < span class = "plain-syntax" > ) > < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > ) || (< / span > < span class = "identifier-syntax" > F< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "8-st.html#SP7_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Open the file< / span > < span class = "named-paragraph-number" > 7.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > comment< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > TRUE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "8-st.html#SP7_2" class = "named-paragraph-link" > < span class = "named-paragraph" > Tangle the material< / span > < span class = "named-paragraph-number" > 7.2< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Input_File< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > fclose< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Input_File< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
< p class = "commentary firstcommentary" > < a id = "SP7_1" class = "paragraph-anchor" > < / a > < b > § 7.1. < / b > Note that if we are looking for an explicit section — say, < span class = "extract" > < span class = "extract-syntax" > Juggling.i6t< / span > < / span > —
from a web < span class = "extract" > < span class = "extract-syntax" > W< / span > < / span > , we translate that into the path < span class = "extract" > < span class = "extract-syntax" > W/Sections/Juggling.i6t< / span > < / span > .
< / p >
< p class = "commentary" > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Open the file< / span > < span class = "named-paragraph-number" > 7.1< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > F< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Input_File< / span > < span class = "plain-syntax" > = < / span > < a href = "3-fln.html#SP10" class = "function-link" > < span class = "function-syntax" > Filenames::fopen< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > F< / span > < span class = "plain-syntax" > , < / span > < span class = "string-syntax" > "r"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < a href = "4-sm.html#SP8" class = "function-link" > < span class = "function-syntax" > Str::len< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > leafname< / span > < span class = "plain-syntax" > ) > < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > pathname< / span > < span class = "plain-syntax" > *< / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > = < / span > < a href = "3-pth.html#SP4" class = "function-link" > < span class = "function-syntax" > Pathnames::down< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > web_path< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > I< / span > < span class = "string-syntax" > "Sections"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > Input_File< / span > < span class = "plain-syntax" > = < / span > < a href = "3-fln.html#SP10" class = "function-link" > < span class = "function-syntax" > Filenames::fopen< / span > < / a > < span class = "plain-syntax" > (< / span > < a href = "3-fln.html#SP2" class = "function-link" > < span class = "function-syntax" > Filenames::in< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > P< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > leafname< / span > < span class = "plain-syntax" > ), < / span > < span class = "string-syntax" > "r"< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Input_File< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > (*(< / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > error_callback< / span > < span class = "plain-syntax" > ))(< / span > < span class = "string-syntax" > "unable to open the file '%S'"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > leafname< / span > < span class = "plain-syntax" > );< / span >
< / pre >
< ul class = "endnotetexts" > < li > This code is used in < a href = "8-st.html#SP7" > § 7< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP7_2" class = "paragraph-anchor" > < / a > < b > § 7.2. < / b > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Tangle the material< / span > < span class = "named-paragraph-number" > 7.2< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > TEMPORARY_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > command< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > TEMPORARY_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > argument< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > skip_part< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > extract< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > col< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > sfp< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > do< / span > < span class = "plain-syntax" > {< / span >
< span class = "plain-syntax" > < / span > < a href = "4-sm.html#SP15" class = "function-link" > < span class = "function-syntax" > Str::clear< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > command< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "4-sm.html#SP15" class = "function-link" > < span class = "function-syntax" > Str::clear< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > argument< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "8-st.html#SP7_2_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Read next character< / span > < span class = "named-paragraph-number" > 7.2.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > NewCharacter:< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > EOF< / span > < span class = "plain-syntax" > ) < / span > < span class = "reserved-syntax" > break< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (((< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "character-syntax" > '@'< / span > < span class = "plain-syntax" > ) || (< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "character-syntax" > '='< / span > < span class = "plain-syntax" > )) & & (< / span > < span class = "identifier-syntax" > col< / span > < span class = "plain-syntax" > == < / span > < span class = "constant-syntax" > 1< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inweb_syntax< / span > < span class = "plain-syntax" > = -1;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "character-syntax" > '='< / span > < span class = "plain-syntax" > ) < / span > < span class = "named-paragraph-container code-font" > < a href = "8-st.html#SP7_2_3" class = "named-paragraph-link" > < span class = "named-paragraph" > Read the rest of line as an equals-heading< / span > < span class = "named-paragraph-number" > 7.2.3< / span > < / a > < / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "8-st.html#SP7_2_2" class = "named-paragraph-link" > < span class = "named-paragraph" > Read the rest of line as an at-heading< / span > < span class = "named-paragraph-number" > 7.2.2< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "8-st.html#SP7_2_4" class = "named-paragraph-link" > < span class = "named-paragraph" > Act on the heading, going in or out of comment mode as appropriate< / span > < span class = "named-paragraph-number" > 7.2.4< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > continue< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > comment< / span > < span class = "plain-syntax" > == < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > ) < / span > < span class = "named-paragraph-container code-font" > < a href = "8-st.html#SP7_2_5" class = "named-paragraph-link" > < span class = "named-paragraph" > Deal with material which isn't commentary< / span > < span class = "named-paragraph-number" > 7.2.5< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > while< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > != < / span > < span class = "identifier-syntax" > EOF< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > DISCARD_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > command< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > DISCARD_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > argument< / span > < span class = "plain-syntax" > )< / span >
< / pre >
< ul class = "endnotetexts" > < li > This code is used in < a href = "8-st.html#SP7" > § 7< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP7_2_1" class = "paragraph-anchor" > < / a > < b > § 7.2.1. < / b > Our text files are encoded as ISO Latin-1, not as Unicode UTF-8, so ordinary
< span class = "extract" > < span class = "extract-syntax" > fgetc< / span > < / span > is used, and no BOM marker is parsed. Lines are assumed to be terminated
with either < span class = "extract" > < span class = "extract-syntax" > 0x0a< / span > < / span > or < span class = "extract" > < span class = "extract-syntax" > 0x0d< / span > < / span > . (Since blank lines are harmless, we take no
trouble over < span class = "extract" > < span class = "extract-syntax" > 0a0d< / span > < / span > or < span class = "extract" > < span class = "extract-syntax" > 0d0a< / span > < / span > combinations.) The built-in template files, almost
always the only ones used, are line terminated < span class = "extract" > < span class = "extract-syntax" > 0x0a< / span > < / span > in Unix fashion.
< / p >
< p class = "commentary" > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Read next character< / span > < span class = "named-paragraph-number" > 7.2.1< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Input_File< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > fgetc< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > Input_File< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > text< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > = < / span > < a href = "4-sm.html#SP13" class = "function-link" > < span class = "function-syntax" > Str::get_at< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > text< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > sfp< / span > < span class = "plain-syntax" > ); < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > EOF< / span > < span class = "plain-syntax" > ; < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > sfp< / span > < span class = "plain-syntax" > ++;< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > = < / span > < span class = "identifier-syntax" > EOF< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > col< / span > < span class = "plain-syntax" > ++; < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "constant-syntax" > 10< / span > < span class = "plain-syntax" > ) || (< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "constant-syntax" > 13< / span > < span class = "plain-syntax" > )) < / span > < span class = "identifier-syntax" > col< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > ;< / span >
< / pre >
< ul class = "endnotetexts" > < li > This code is used in < a href = "8-st.html#SP7_2" > § 7.2< / a > , < a href = "8-st.html#SP7_2_2" > § 7.2.2< / a > , < a href = "8-st.html#SP7_2_3" > § 7.2.3< / a > , < a href = "8-st.html#SP7_2_5" > § 7.2.5< / a > (twice), < a href = "8-st.html#SP7_2_5_1" > § 7.2.5.1< / a > , < a href = "8-st.html#SP7_2_5_2" > § 7.2.5.2< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP7_2_2" class = "paragraph-anchor" > < / a > < b > § 7.2.2. < / b > Here we see the limited range of Inweb syntaxes allowed; but some < span class = "extract" > < span class = "extract-syntax" > @< / span > < / span > and < span class = "extract" > < span class = "extract-syntax" > =< / span > < / span >
commands can be used, at least.
< / p >
< pre class = "definitions code-font" > < span class = "definition-keyword" > define< / span > < span class = "constant-syntax" > INWEB_PARAGRAPH_SYNTAX< / span > < span class = "plain-syntax" > < / span > < span class = "constant-syntax" > 1< / span >
< span class = "definition-keyword" > define< / span > < span class = "constant-syntax" > INWEB_CODE_SYNTAX< / span > < span class = "plain-syntax" > < / span > < span class = "constant-syntax" > 2< / span >
< span class = "definition-keyword" > define< / span > < span class = "constant-syntax" > INWEB_DASH_SYNTAX< / span > < span class = "plain-syntax" > < / span > < span class = "constant-syntax" > 3< / span >
< span class = "definition-keyword" > define< / span > < span class = "constant-syntax" > INWEB_PURPOSE_SYNTAX< / span > < span class = "plain-syntax" > < / span > < span class = "constant-syntax" > 4< / span >
< span class = "definition-keyword" > define< / span > < span class = "constant-syntax" > INWEB_FIGURE_SYNTAX< / span > < span class = "plain-syntax" > < / span > < span class = "constant-syntax" > 5< / span >
< span class = "definition-keyword" > define< / span > < span class = "constant-syntax" > INWEB_EQUALS_SYNTAX< / span > < span class = "plain-syntax" > < / span > < span class = "constant-syntax" > 6< / span >
< span class = "definition-keyword" > define< / span > < span class = "constant-syntax" > INWEB_EXTRACT_SYNTAX< / span > < span class = "plain-syntax" > < / span > < span class = "constant-syntax" > 7< / span >
< / pre >
< p class = "commentary" > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Read the rest of line as an at-heading< / span > < span class = "named-paragraph-number" > 7.2.2< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > TEMPORARY_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > at_cmd< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > committed< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > unacceptable_character< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > while< / span > < span class = "plain-syntax" > (< / span > < span class = "constant-syntax" > TRUE< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "8-st.html#SP7_2_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Read next character< / span > < span class = "named-paragraph-number" > 7.2.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > committed< / span > < span class = "plain-syntax" > == < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > ) & & ((< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "constant-syntax" > 10< / span > < span class = "plain-syntax" > ) || (< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "constant-syntax" > 13< / span > < span class = "plain-syntax" > ) || (< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "character-syntax" > ' '< / span > < span class = "plain-syntax" > ))) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < a href = "4-sm.html#SP22" class = "function-link" > < span class = "function-syntax" > Str::eq_wide_string< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > at_cmd< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > L< / span > < span class = "string-syntax" > "p"< / span > < span class = "plain-syntax" > ))< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inweb_syntax< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > INWEB_PARAGRAPH_SYNTAX< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < a href = "4-sm.html#SP22" class = "function-link" > < span class = "function-syntax" > Str::eq_wide_string< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > at_cmd< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > L< / span > < span class = "string-syntax" > "h"< / span > < span class = "plain-syntax" > ))< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inweb_syntax< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > INWEB_PARAGRAPH_SYNTAX< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < a href = "4-sm.html#SP22" class = "function-link" > < span class = "function-syntax" > Str::eq_wide_string< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > at_cmd< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > L< / span > < span class = "string-syntax" > "c"< / span > < span class = "plain-syntax" > ))< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inweb_syntax< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > INWEB_CODE_SYNTAX< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < a href = "4-sm.html#SP13" class = "function-link" > < span class = "function-syntax" > Str::get_first_char< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > at_cmd< / span > < span class = "plain-syntax" > ) == < / span > < span class = "character-syntax" > '-'< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inweb_syntax< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > INWEB_DASH_SYNTAX< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < a href = "4-sm.html#SP21" class = "function-link" > < span class = "function-syntax" > Str::begins_with_wide_string< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > at_cmd< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > L< / span > < span class = "string-syntax" > "Purpose:"< / span > < span class = "plain-syntax" > ))< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inweb_syntax< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > INWEB_PURPOSE_SYNTAX< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > committed< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > TRUE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > inweb_syntax< / span > < span class = "plain-syntax" > == -1) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > unacceptable_character< / span > < span class = "plain-syntax" > == < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > PUT_TO< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > OUT< / span > < span class = "plain-syntax" > , < / span > < span class = "character-syntax" > '@'< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > WRITE_TO< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > OUT< / span > < span class = "plain-syntax" > , < / span > < span class = "string-syntax" > "%S"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > at_cmd< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > PUT_TO< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > OUT< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > break< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > LOG< / span > < span class = "plain-syntax" > (< / span > < span class = "string-syntax" > "heading begins: < %S> \n"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > at_cmd< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > (*(< / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > error_callback< / span > < span class = "plain-syntax" > ))(< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "unknown '@...' marker at column 0: '%S'"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > at_cmd< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (!(((< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > > = < / span > < span class = "character-syntax" > 'A'< / span > < span class = "plain-syntax" > ) & & (< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > < = < / span > < span class = "character-syntax" > 'Z'< / span > < span class = "plain-syntax" > )) || ((< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > > = < / span > < span class = "character-syntax" > 'a'< / span > < span class = "plain-syntax" > ) & & (< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > < = < / span > < span class = "character-syntax" > 'z'< / span > < span class = "plain-syntax" > ))< / span >
< span class = "plain-syntax" > || ((< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > > = < / span > < span class = "character-syntax" > '0'< / span > < span class = "plain-syntax" > ) & & (< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > < = < / span > < span class = "character-syntax" > '9'< / span > < span class = "plain-syntax" > ))< / span >
< span class = "plain-syntax" > || (< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "character-syntax" > '-'< / span > < span class = "plain-syntax" > ) || (< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "character-syntax" > '> '< / span > < span class = "plain-syntax" > ) || (< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "character-syntax" > ':'< / span > < span class = "plain-syntax" > ) || (< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "character-syntax" > '_'< / span > < span class = "plain-syntax" > )))< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > unacceptable_character< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > TRUE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "constant-syntax" > 10< / span > < span class = "plain-syntax" > ) || (< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "constant-syntax" > 13< / span > < span class = "plain-syntax" > )) < / span > < span class = "reserved-syntax" > break< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > PUT_TO< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > at_cmd< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < a href = "4-sm.html#SP17" class = "function-link" > < span class = "function-syntax" > Str::copy< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > command< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > at_cmd< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > DISCARD_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > at_cmd< / span > < span class = "plain-syntax" > )< / span >
< / pre >
< ul class = "endnotetexts" > < li > This code is used in < a href = "8-st.html#SP7_2" > § 7.2< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP7_2_3" class = "paragraph-anchor" > < / a > < b > § 7.2.3. < / b > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Read the rest of line as an equals-heading< / span > < span class = "named-paragraph-number" > 7.2.3< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > TEMPORARY_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > equals_cmd< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > while< / span > < span class = "plain-syntax" > (< / span > < span class = "constant-syntax" > TRUE< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "8-st.html#SP7_2_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Read next character< / span > < span class = "named-paragraph-number" > 7.2.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "constant-syntax" > 10< / span > < span class = "plain-syntax" > ) || (< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "constant-syntax" > 13< / span > < span class = "plain-syntax" > )) < / span > < span class = "reserved-syntax" > break< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > PUT_TO< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > equals_cmd< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > match_results< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > mr< / span > < span class = "plain-syntax" > = < / span > < a href = "4-pm.html#SP9" class = "function-link" > < span class = "function-syntax" > Regexp::create_mr< / span > < / a > < span class = "plain-syntax" > ();< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < a href = "4-pm.html#SP10" class = "function-link" > < span class = "function-syntax" > Regexp::match< / span > < / a > < span class = "plain-syntax" > (& < / span > < span class = "identifier-syntax" > mr< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > equals_cmd< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > L< / span > < span class = "string-syntax" > " %(text%c*%) *"< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inweb_syntax< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > INWEB_EXTRACT_SYNTAX< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < a href = "4-pm.html#SP10" class = "function-link" > < span class = "function-syntax" > Regexp::match< / span > < / a > < span class = "plain-syntax" > (& < / span > < span class = "identifier-syntax" > mr< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > equals_cmd< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > L< / span > < span class = "string-syntax" > " %(figure%c*%) *"< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inweb_syntax< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > INWEB_FIGURE_SYNTAX< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < a href = "4-pm.html#SP10" class = "function-link" > < span class = "function-syntax" > Regexp::match< / span > < / a > < span class = "plain-syntax" > (& < / span > < span class = "identifier-syntax" > mr< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > equals_cmd< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > L< / span > < span class = "string-syntax" > " %(%c*%) *"< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > (*(< / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > error_callback< / span > < span class = "plain-syntax" > ))(< / span >
< span class = "plain-syntax" > < / span > < span class = "string-syntax" > "unsupported '= (...)' marker at column 0"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > inweb_syntax< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > INWEB_EQUALS_SYNTAX< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < a href = "4-pm.html#SP9" class = "function-link" > < span class = "function-syntax" > Regexp::dispose_of< / span > < / a > < span class = "plain-syntax" > (& < / span > < span class = "identifier-syntax" > mr< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > DISCARD_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > equals_cmd< / span > < span class = "plain-syntax" > )< / span >
< / pre >
< ul class = "endnotetexts" > < li > This code is used in < a href = "8-st.html#SP7_2" > § 7.2< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP7_2_4" class = "paragraph-anchor" > < / a > < b > § 7.2.4. < / b > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Act on the heading, going in or out of comment mode as appropriate< / span > < span class = "named-paragraph-number" > 7.2.4< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > switch< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > inweb_syntax< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > case< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > INWEB_PARAGRAPH_SYNTAX:< / span > < span class = "plain-syntax" > {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > TEMPORARY_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > heading_name< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < a href = "4-sm.html#SP17" class = "function-link" > < span class = "function-syntax" > Str::copy_tail< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > heading_name< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > command< / span > < span class = "plain-syntax" > , < / span > < span class = "constant-syntax" > 2< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > c< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > while< / span > < span class = "plain-syntax" > (((< / span > < span class = "identifier-syntax" > c< / span > < span class = "plain-syntax" > = < / span > < a href = "4-sm.html#SP13" class = "function-link" > < span class = "function-syntax" > Str::get_last_char< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > heading_name< / span > < span class = "plain-syntax" > )) != < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > ) & & < / span >
< span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > c< / span > < span class = "plain-syntax" > == < / span > < span class = "character-syntax" > ' '< / span > < span class = "plain-syntax" > ) || (< / span > < span class = "identifier-syntax" > c< / span > < span class = "plain-syntax" > == < / span > < span class = "character-syntax" > '\t'< / span > < span class = "plain-syntax" > ) || (< / span > < span class = "identifier-syntax" > c< / span > < span class = "plain-syntax" > == < / span > < span class = "character-syntax" > '.'< / span > < span class = "plain-syntax" > )))< / span >
< span class = "plain-syntax" > < / span > < a href = "4-sm.html#SP25" class = "function-link" > < span class = "function-syntax" > Str::delete_last_character< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > heading_name< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < a href = "4-sm.html#SP8" class = "function-link" > < span class = "function-syntax" > Str::len< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > heading_name< / span > < span class = "plain-syntax" > ) == < / span > < span class = "constant-syntax" > 0< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > (*(< / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > error_callback< / span > < span class = "plain-syntax" > ))(< / span > < span class = "string-syntax" > "Empty heading name"< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > NULL< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > DISCARD_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > heading_name< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > extract< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > comment< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > TRUE< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > skip_part< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > break< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > case< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > INWEB_CODE_SYNTAX:< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > extract< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > skip_part< / span > < span class = "plain-syntax" > == < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > comment< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > break< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > case< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > INWEB_EQUALS_SYNTAX:< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > extract< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > comment< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > TRUE< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > extract< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > {< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > skip_part< / span > < span class = "plain-syntax" > == < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > comment< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > break< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > case< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > INWEB_EXTRACT_SYNTAX:< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > comment< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > TRUE< / span > < span class = "plain-syntax" > ; < / span > < span class = "identifier-syntax" > extract< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > TRUE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > break< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > case< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > INWEB_DASH_SYNTAX:< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > break< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > case< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > INWEB_PURPOSE_SYNTAX:< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > break< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > case< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > INWEB_FIGURE_SYNTAX:< / span > < span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > break< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
< ul class = "endnotetexts" > < li > This code is used in < a href = "8-st.html#SP7_2" > § 7.2< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP7_2_5" class = "paragraph-anchor" > < / a > < b > § 7.2.5. < / b > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Deal with material which isn't commentary< / span > < span class = "named-paragraph-number" > 7.2.5< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "character-syntax" > '{'< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "8-st.html#SP7_2_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Read next character< / span > < span class = "named-paragraph-number" > 7.2.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "character-syntax" > '-'< / span > < span class = "plain-syntax" > ) & & (< / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > command_callback< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "8-st.html#SP7_2_5_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Read up to the next close brace as a braced command and argument< / span > < span class = "named-paragraph-number" > 7.2.5.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < a href = "4-sm.html#SP13" class = "function-link" > < span class = "function-syntax" > Str::get_first_char< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > command< / span > < span class = "plain-syntax" > ) == < / span > < span class = "character-syntax" > '!'< / span > < span class = "plain-syntax" > ) < / span > < span class = "reserved-syntax" > continue< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > (*(< / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > command_callback< / span > < span class = "plain-syntax" > ))(< / span > < span class = "identifier-syntax" > OUT< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > command< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > argument< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > continue< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > { < / span > < span class = "comment-syntax" > otherwise the open brace was a literal< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > PUT_TO< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > OUT< / span > < span class = "plain-syntax" > , < / span > < span class = "character-syntax" > '{'< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > goto< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > NewCharacter< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "character-syntax" > '('< / span > < span class = "plain-syntax" > ) & & (< / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > bplus_callback< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "8-st.html#SP7_2_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Read next character< / span > < span class = "named-paragraph-number" > 7.2.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "character-syntax" > '+'< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "8-st.html#SP7_2_5_2" class = "named-paragraph-link" > < span class = "named-paragraph" > Read up to the next plus close-bracket as an I7 expression< / span > < span class = "named-paragraph-number" > 7.2.5.2< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > continue< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > } < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > { < / span > < span class = "comment-syntax" > otherwise the open bracket was a literal< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > PUT_TO< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > OUT< / span > < span class = "plain-syntax" > , < / span > < span class = "character-syntax" > '('< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > goto< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > NewCharacter< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > PUT_TO< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > OUT< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > );< / span >
< / pre >
< ul class = "endnotetexts" > < li > This code is used in < a href = "8-st.html#SP7_2" > § 7.2< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP7_2_5_1" class = "paragraph-anchor" > < / a > < b > § 7.2.5.1. < / b > And here we read a normal command. The command name must not include < span class = "extract" > < span class = "extract-syntax" > }< / span > < / span >
or < span class = "extract" > < span class = "extract-syntax" > :< / span > < / span > . If there is no < span class = "extract" > < span class = "extract-syntax" > :< / span > < / span > then the argument is left unset (so that it will
be the empty string: see above). The argument must not include < span class = "extract" > < span class = "extract-syntax" > }< / span > < / span > .
< / p >
< p class = "commentary" > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Read up to the next close brace as a braced command and argument< / span > < span class = "named-paragraph-number" > 7.2.5.1< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < a href = "4-sm.html#SP15" class = "function-link" > < span class = "function-syntax" > Str::clear< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > command< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < a href = "4-sm.html#SP15" class = "function-link" > < span class = "function-syntax" > Str::clear< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > argument< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > int< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > com_mode< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > TRUE< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > while< / span > < span class = "plain-syntax" > (< / span > < span class = "constant-syntax" > TRUE< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "8-st.html#SP7_2_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Read next character< / span > < span class = "named-paragraph-number" > 7.2.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "character-syntax" > '}'< / span > < span class = "plain-syntax" > ) || (< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > EOF< / span > < span class = "plain-syntax" > )) < / span > < span class = "reserved-syntax" > break< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "character-syntax" > ':'< / span > < span class = "plain-syntax" > ) & & (< / span > < span class = "identifier-syntax" > com_mode< / span > < span class = "plain-syntax" > )) { < / span > < span class = "identifier-syntax" > com_mode< / span > < span class = "plain-syntax" > = < / span > < span class = "constant-syntax" > FALSE< / span > < span class = "plain-syntax" > ; < / span > < span class = "reserved-syntax" > continue< / span > < span class = "plain-syntax" > ; }< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > com_mode< / span > < span class = "plain-syntax" > ) < / span > < span class = "identifier-syntax" > PUT_TO< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > command< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > else< / span > < span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > PUT_TO< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > argument< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
< / pre >
< ul class = "endnotetexts" > < li > This code is used in < a href = "8-st.html#SP7_2_5" > § 7.2.5< / a > .< / li > < / ul >
< p class = "commentary firstcommentary" > < a id = "SP7_2_5_2" class = "paragraph-anchor" > < / a > < b > § 7.2.5.2. < / b > And similarly, for the < span class = "extract" > < span class = "extract-syntax" > (+< / span > < / span > ... < span class = "extract" > < span class = "extract-syntax" > +)< / span > < / span > notation which was once used to mark
I7 material within I6:
< / p >
< p class = "commentary" > < span class = "named-paragraph-container code-font" > < span class = "named-paragraph-defn" > Read up to the next plus close-bracket as an I7 expression< / span > < span class = "named-paragraph-number" > 7.2.5.2< / span > < / span > < span class = "comment-syntax" > =< / span >
< / p >
< pre class = "displayed-code all-displayed-code code-font" >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > TEMPORARY_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > material< / span > < span class = "plain-syntax" > )< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > while< / span > < span class = "plain-syntax" > (< / span > < span class = "constant-syntax" > TRUE< / span > < span class = "plain-syntax" > ) {< / span >
< span class = "plain-syntax" > < / span > < span class = "named-paragraph-container code-font" > < a href = "8-st.html#SP7_2_1" class = "named-paragraph-link" > < span class = "named-paragraph" > Read next character< / span > < span class = "named-paragraph-number" > 7.2.1< / span > < / a > < / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "identifier-syntax" > EOF< / span > < span class = "plain-syntax" > ) < / span > < span class = "reserved-syntax" > break< / span > < span class = "plain-syntax" > ;< / span >
< span class = "plain-syntax" > < / span > < span class = "reserved-syntax" > if< / span > < span class = "plain-syntax" > ((< / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > == < / span > < span class = "character-syntax" > ')'< / span > < span class = "plain-syntax" > ) & & (< / span > < a href = "4-sm.html#SP13" class = "function-link" > < span class = "function-syntax" > Str::get_last_char< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > material< / span > < span class = "plain-syntax" > ) == < / span > < span class = "character-syntax" > '+'< / span > < span class = "plain-syntax" > )) {< / span >
< span class = "plain-syntax" > < / span > < a href = "4-sm.html#SP25" class = "function-link" > < span class = "function-syntax" > Str::delete_last_character< / span > < / a > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > material< / span > < span class = "plain-syntax" > ); < / span > < span class = "reserved-syntax" > break< / span > < span class = "plain-syntax" > ; }< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > PUT_TO< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > material< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > cr< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > }< / span >
< span class = "plain-syntax" > (*(< / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > -> < / span > < span class = "element-syntax" > bplus_callback< / span > < span class = "plain-syntax" > ))(< / span > < span class = "identifier-syntax" > material< / span > < span class = "plain-syntax" > , < / span > < span class = "identifier-syntax" > docket< / span > < span class = "plain-syntax" > );< / span >
< span class = "plain-syntax" > < / span > < span class = "identifier-syntax" > DISCARD_TEXT< / span > < span class = "plain-syntax" > (< / span > < span class = "identifier-syntax" > material< / span > < span class = "plain-syntax" > )< / span >
< / pre >
< ul class = "endnotetexts" > < li > This code is used in < a href = "8-st.html#SP7_2_5" > § 7.2.5< / a > .< / li > < / ul >
< nav role = "progress" > < div class = "progresscontainer" >
< ul class = "progressbar" > < li class = "progressprev" > < a href = "8-bf.html" > ❮ < / a > < / li > < li class = "progresschapter" > < a href = "P-abgtf.html" > P< / a > < / li > < li class = "progresschapter" > < a href = "1-fm.html" > 1< / a > < / li > < li class = "progresschapter" > < a href = "2-dl.html" > 2< / a > < / li > < li class = "progresschapter" > < a href = "3-em.html" > 3< / a > < / li > < li class = "progresschapter" > < a href = "4-chr.html" > 4< / a > < / li > < li class = "progresschapter" > < a href = "5-htm.html" > 5< / a > < / li > < li class = "progresschapter" > < a href = "6-bf.html" > 6< / a > < / li > < li class = "progresschapter" > < a href = "7-vn.html" > 7< / a > < / li > < li class = "progresscurrentchapter" > 8< / li > < li class = "progresssection" > < a href = "8-ws.html" > ws< / a > < / li > < li class = "progresssection" > < a href = "8-bdfw.html" > bdfw< / a > < / li > < li class = "progresssection" > < a href = "8-wm.html" > wm< / a > < / li > < li class = "progresssection" > < a href = "8-bf.html" > bf< / a > < / li > < li class = "progresscurrent" > st< / li > < li class = "progressnextoff" > ❯ < / li > < / ul > < / div >
< / nav > <!-- End of weave -->
< / main >
< / body >
< / html >