1
0
Fork 0
mirror of https://github.com/ganelson/inform.git synced 2024-07-08 10:04:21 +03:00
inform7/docs/indoc/1-ins.html

828 lines
141 KiB
HTML

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>1/cnf</title>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<meta http-equiv="Content-Language" content="en-gb">
<link href="inweb.css" rel="stylesheet" rev="stylesheet" type="text/css">
</head>
<body>
<!--Weave of '1/ins' generated by 7-->
<ul class="crumbs"><li><a href="../webs.html">&#9733;</a></li><li><a href="index.html">indoc 4</a></li><li><a href="index.html#1">Chapter 1: Setting Up</a></li><li><b>Instructions</b></li></ul><p class="purpose">Instructions of indoc to different output types.</p>
<ul class="toc"><li><a href="#SP1">&#167;1. Definitions</a></li><li><a href="#SP3">&#167;3. Instructions file</a></li><li><a href="#SP6">&#167;6. Parsing values</a></li></ul><hr class="tocbar">
<p class="inwebparagraph"><a id="SP1"></a><b>&#167;1. Definitions. </b>The command-line and Instructions-file-set values provide a large slate of
what used to be global variables in the Perl version of Indoc. Today they
are herded together into an instance of the <code class="display"><span class="extract">settings_block</span></code> structure,
and in particular into a global instance of this called <code class="display"><span class="extract">indoc_settings</span></code>.
</p>
<pre class="definitions">
<span class="definitionkeyword">define</span> <span class="constant">LETTER_ALPHABETIZATION</span><span class="plain"> 1</span>
<span class="definitionkeyword">define</span> <span class="constant">WORD_ALPHABETIZATION</span><span class="plain"> 2</span>
<span class="definitionkeyword">define</span> <span class="constant">EXMODE_open_internal</span><span class="plain"> 1</span>
<span class="definitionkeyword">define</span> <span class="constant">EXMODE_openable_internal</span><span class="plain"> 2</span>
<span class="definitionkeyword">define</span> <span class="constant">BOOK_GRANULARITY</span><span class="plain"> 1</span>
<span class="definitionkeyword">define</span> <span class="constant">CHAPTER_GRANULARITY</span><span class="plain"> 2</span>
<span class="definitionkeyword">define</span> <span class="constant">SECTION_GRANULARITY</span><span class="plain"> 3</span>
<span class="definitionkeyword">define</span> <span class="constant">SAME_AS_MAIN_GRANULARITY</span><span class="plain"> -1</span>
<span class="definitionkeyword">define</span> <span class="constant">HTML_FORMAT</span><span class="plain"> 1</span>
<span class="definitionkeyword">define</span> <span class="constant">PLAIN_FORMAT</span><span class="plain"> 2</span>
<span class="definitionkeyword">define</span> <span class="constant">PASTEMODE_none</span><span class="plain"> 1</span>
<span class="definitionkeyword">define</span> <span class="constant">PASTEMODE_Andrew</span><span class="plain"> 2</span>
<span class="definitionkeyword">define</span> <span class="constant">PASTEMODE_David</span><span class="plain"> 3</span>
<span class="definitionkeyword">define</span> <span class="constant">WRAPPER_none</span><span class="plain"> 1</span>
<span class="definitionkeyword">define</span> <span class="constant">WRAPPER_epub</span><span class="plain"> 2</span>
<span class="definitionkeyword">define</span> <span class="constant">WRAPPER_zip</span><span class="plain"> 3</span>
</pre>
<pre class="display">
<span class="reserved">typedef</span><span class="plain"> </span><span class="reserved">struct</span><span class="plain"> </span><span class="reserved">settings_block</span><span class="plain"> {</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">verbose_mode</span><span class="plain">;</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">test_index_mode</span><span class="plain">;</span>
<span class="reserved">struct</span><span class="plain"> </span><span class="reserved">pathname</span><span class="plain"> *</span><span class="identifier">destination</span><span class="plain">; </span> <span class="comment">path to the directory where documentation will be made</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">destination_modifiable</span><span class="plain">; </span> <span class="comment">can <code class="display"><span class="extract">destination</span></code> still be changed by instructions?</span>
<span class="reserved">struct</span><span class="plain"> </span><span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">manifest_leafname</span><span class="plain">; </span> <span class="comment">within the <code class="display"><span class="extract">destination</span></code> directory</span>
<span class="reserved">struct</span><span class="plain"> </span><span class="reserved">filename</span><span class="plain"> *</span><span class="identifier">standard_rules_filename</span><span class="plain">;</span>
<span class="reserved">struct</span><span class="plain"> </span><span class="reserved">pathname</span><span class="plain"> *</span><span class="identifier">book_folder</span><span class="plain">;</span>
<span class="reserved">filename</span><span class="plain"> *</span><span class="identifier">book_cover_image</span><span class="plain">; </span> <span class="comment">e.g., <code class="display"><span class="extract">cover-image.png</span></code>; by default, none</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">index_alphabetisation_algorithm</span><span class="plain">; </span> <span class="comment">one of the <code class="display"><span class="extract">*_ALPHABETIZATION</span></code> values above</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">granularity</span><span class="plain">; </span> <span class="comment">one of the <code class="display"><span class="extract">*_GRANULARITY</span></code> values above</span>
<span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">contents_leafname</span><span class="plain">;</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">contents_expandable</span><span class="plain">;</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">toc_granularity</span><span class="plain">; </span> <span class="comment">one of the <code class="display"><span class="extract">*_GRANULARITY</span></code> values above</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">book_contains_examples</span><span class="plain">;</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">examples_mode</span><span class="plain">; </span> <span class="comment">one of the <code class="display"><span class="extract">EXMODE_*</span></code> values above</span>
<span class="reserved">struct</span><span class="plain"> </span><span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">examples_alphabetical_leafname</span><span class="plain">;</span>
<span class="reserved">struct</span><span class="plain"> </span><span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">examples_numerical_leafname</span><span class="plain">;</span>
<span class="reserved">struct</span><span class="plain"> </span><span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">examples_thematic_leafname</span><span class="plain">;</span>
<span class="reserved">struct</span><span class="plain"> </span><span class="reserved">pathname</span><span class="plain"> *</span><span class="identifier">examples_directory</span><span class="plain">;</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">examples_granularity</span><span class="plain">; </span> <span class="comment">one of the <code class="display"><span class="extract">*_GRANULARITY</span></code> values above</span>
<span class="reserved">struct</span><span class="plain"> </span><span class="reserved">pathname</span><span class="plain"> *</span><span class="identifier">change_logs_folder</span><span class="plain">;</span>
<span class="reserved">struct</span><span class="plain"> </span><span class="reserved">filename</span><span class="plain"> *</span><span class="identifier">css_source_file</span><span class="plain">;</span>
<span class="reserved">struct</span><span class="plain"> </span><span class="reserved">filename</span><span class="plain"> *</span><span class="identifier">definitions_filename</span><span class="plain">;</span>
<span class="reserved">struct</span><span class="plain"> </span><span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">definitions_index_leafname</span><span class="plain">;</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">format</span><span class="plain">; </span> <span class="comment">one of the <code class="display"><span class="extract">*_FORMAT</span></code> values above</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">XHTML</span><span class="plain">; </span> <span class="comment">a flag: relevant only if <code class="display"><span class="extract">HTML_FORMAT</span></code> is chosen</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">javascript</span><span class="plain">; </span> <span class="comment">a flag</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">javascript_paste_method</span><span class="plain">; </span> <span class="comment">one of the <code class="display"><span class="extract">PASTEMDDE_*</span></code> values above</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">html_for_Inform_application</span><span class="plain">;</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">images_copy</span><span class="plain">;</span>
<span class="reserved">struct</span><span class="plain"> </span><span class="reserved">pathname</span><span class="plain"> *</span><span class="identifier">images_path</span><span class="plain">;</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">inform_definitions_mode</span><span class="plain">;</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">suppress_fonts</span><span class="plain">;</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">assume_Public_Library</span><span class="plain">;</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">retina_images</span><span class="plain">;</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">support_creation</span><span class="plain">;</span>
<span class="reserved">struct</span><span class="plain"> </span><span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">link_to_extensions_index</span><span class="plain">;</span>
<span class="reserved">struct</span><span class="plain"> </span><span class="reserved">filename</span><span class="plain"> *</span><span class="identifier">top_and_tail</span><span class="plain">;</span>
<span class="reserved">struct</span><span class="plain"> </span><span class="reserved">filename</span><span class="plain"> *</span><span class="identifier">top_and_tail_sections</span><span class="plain">;</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">treat_code_as_verbatim</span><span class="plain">;</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">wrapper</span><span class="plain">; </span> <span class="comment">one of the <code class="display"><span class="extract">WRAPPER_*</span></code> values above</span>
<span class="reserved">struct ebook</span><span class="plain"> </span><span class="reserved">*ebook</span><span class="plain">;</span>
<span class="reserved">struct</span><span class="plain"> </span><span class="reserved">navigation_design</span><span class="plain"> *</span><span class="identifier">navigation</span><span class="plain">;</span>
<span class="constant">MEMORY_MANAGEMENT</span>
<span class="plain">} </span><span class="reserved">settings_block</span><span class="plain">;</span>
</pre>
<p class="inwebparagraph"></p>
<p class="endnote">The structure settings_block is accessed in 1/mn, 1/cnf, 2/ss, 2/exm, 2/rnd, 2/rr, 2/utsr, 2/haj, 2/css, 3/iu, 3/cai, 3/ei, 4/nd, 4/cm, 4/ca, 4/ct, 4/cr and here.</p>
<p class="inwebparagraph"><a id="SP2"></a><b>&#167;2. </b></p>
<pre class="display">
<span class="reserved">settings_block</span><span class="plain"> *</span><span class="functiontext">Instructions::clean_slate</span><span class="plain">(</span><span class="reserved">void</span><span class="plain">) {</span>
<span class="reserved">settings_block</span><span class="plain"> *</span><span class="identifier">settings</span><span class="plain"> = </span><span class="identifier">CREATE</span><span class="plain">(</span><span class="reserved">settings_block</span><span class="plain">);</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;verbose_mode</span><span class="plain"> = </span><span class="constant">FALSE</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;test_index_mode</span><span class="plain"> = </span><span class="constant">FALSE</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;destination</span><span class="plain"> = </span><span class="identifier">NULL</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;destination_modifiable</span><span class="plain"> = </span><span class="constant">TRUE</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;manifest_leafname</span><span class="plain"> = </span><span class="identifier">NULL</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;standard_rules_filename</span><span class="plain"> = </span><span class="identifier">NULL</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;book_folder</span><span class="plain"> = </span><span class="functiontext">Pathnames::from_text</span><span class="plain">(</span><span class="identifier">I</span><span class="string">"Documentation"</span><span class="plain">);</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;book_cover_image</span><span class="plain"> = </span><span class="identifier">NULL</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;index_alphabetisation_algorithm</span><span class="plain"> = </span><span class="constant">LETTER_ALPHABETIZATION</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;granularity</span><span class="plain"> = </span><span class="constant">SECTION_GRANULARITY</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;contents_leafname</span><span class="plain"> = </span><span class="identifier">NULL</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;contents_expandable</span><span class="plain"> = </span><span class="constant">FALSE</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;toc_granularity</span><span class="plain"> = </span><span class="constant">SAME_AS_MAIN_GRANULARITY</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;book_contains_examples</span><span class="plain"> = </span><span class="constant">FALSE</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;examples_mode</span><span class="plain"> = </span><span class="constant">EXMODE_open_internal</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;examples_alphabetical_leafname</span><span class="plain"> = </span><span class="identifier">NULL</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;examples_numerical_leafname</span><span class="plain"> = </span><span class="identifier">NULL</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;examples_thematic_leafname</span><span class="plain"> = </span><span class="identifier">NULL</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;examples_directory</span><span class="plain"> = </span><span class="identifier">NULL</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;examples_granularity</span><span class="plain"> = </span><span class="constant">SAME_AS_MAIN_GRANULARITY</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;change_logs_folder</span><span class="plain"> = </span><span class="identifier">NULL</span><span class="plain">; </span> <span class="comment">default not set here, as it depends on book folder</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;css_source_file</span><span class="plain"> = </span><span class="identifier">NULL</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;definitions_filename</span><span class="plain"> = </span><span class="identifier">NULL</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;definitions_index_leafname</span><span class="plain"> = </span><span class="identifier">NULL</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;format</span><span class="plain"> = </span><span class="constant">HTML_FORMAT</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;XHTML</span><span class="plain"> = </span><span class="constant">FALSE</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;javascript</span><span class="plain"> = </span><span class="constant">FALSE</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;javascript_paste_method</span><span class="plain"> = </span><span class="constant">PASTEMODE_none</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;html_for_Inform_application</span><span class="plain"> = </span><span class="constant">FALSE</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;images_copy</span><span class="plain"> = </span><span class="constant">FALSE</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;images_path</span><span class="plain"> = </span><span class="identifier">NULL</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;inform_definitions_mode</span><span class="plain"> = </span><span class="constant">FALSE</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;suppress_fonts</span><span class="plain"> = </span><span class="constant">FALSE</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;assume_Public_Library</span><span class="plain"> = </span><span class="constant">FALSE</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;retina_images</span><span class="plain"> = </span><span class="constant">FALSE</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;support_creation</span><span class="plain"> = </span><span class="constant">FALSE</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;link_to_extensions_index</span><span class="plain"> = </span><span class="identifier">NULL</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;top_and_tail</span><span class="plain"> = </span><span class="identifier">NULL</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;top_and_tail_sections</span><span class="plain"> = </span><span class="identifier">NULL</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;treat_code_as_verbatim</span><span class="plain"> = </span><span class="constant">FALSE</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;wrapper</span><span class="plain"> = </span><span class="constant">WRAPPER_none</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;ebook</span><span class="plain"> = </span><span class="identifier">NULL</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;navigation</span><span class="plain"> = </span><span class="functiontext">Nav::default</span><span class="plain">();</span>
<span class="reserved">return</span><span class="plain"> </span><span class="identifier">settings</span><span class="plain">;</span>
<span class="plain">}</span>
</pre>
<p class="inwebparagraph"></p>
<p class="endnote">The function Instructions::clean_slate is used in 1/mn (<a href="1-mn.html#SP1_1">&#167;1.1</a>).</p>
<p class="inwebparagraph"><a id="SP3"></a><b>&#167;3. Instructions file. </b>Note that <code class="display"><span class="extract">indoc</span></code> reports errors in the instructions file, but doesn't halt on
them until all have been found. (The user may as well get all of the bad news,
not just the beginning of it.)
</p>
<pre class="display">
<span class="reserved">void</span><span class="plain"> </span><span class="functiontext">Instructions::read_instructions</span><span class="plain">(</span><span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">target_sought</span><span class="plain">, </span><span class="reserved">linked_list</span><span class="plain"> *</span><span class="identifier">L</span><span class="plain">,</span>
<span class="reserved">settings_block</span><span class="plain"> *</span><span class="identifier">settings</span><span class="plain">) {</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">found_flag</span><span class="plain"> = </span><span class="constant">FALSE</span><span class="plain">; </span> <span class="comment">was a target of this name actually found?</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;change_logs_folder</span><span class="plain"> = </span><span class="functiontext">Pathnames::subfolder</span><span class="plain">(</span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;book_folder</span><span class="plain">, </span><span class="identifier">I</span><span class="string">"Change Logs"</span><span class="plain">);</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;examples_directory</span><span class="plain"> = </span><span class="functiontext">Pathnames::subfolder</span><span class="plain">(</span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;book_folder</span><span class="plain">, </span><span class="identifier">I</span><span class="string">"Examples"</span><span class="plain">);</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;css_source_file</span><span class="plain"> = </span><span class="functiontext">Filenames::in_folder</span><span class="plain">(</span><span class="identifier">path_to_indoc_materials</span><span class="plain">, </span><span class="identifier">I</span><span class="string">"base.css"</span><span class="plain">);</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;definitions_index_leafname</span><span class="plain"> = </span><span class="functiontext">Str::duplicate</span><span class="plain">(</span><span class="identifier">I</span><span class="string">"general_index.html"</span><span class="plain">);</span>
<span class="reserved">filename</span><span class="plain"> *</span><span class="identifier">F</span><span class="plain">;</span>
<span class="identifier">LOOP_OVER_LINKED_LIST</span><span class="plain">(</span><span class="identifier">F</span><span class="plain">, </span><span class="reserved">filename</span><span class="plain">, </span><span class="identifier">L</span><span class="plain">)</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Instructions::read_instructions_from</span><span class="plain">(</span><span class="identifier">F</span><span class="plain">, </span><span class="identifier">target_sought</span><span class="plain">, </span><span class="identifier">settings</span><span class="plain">))</span>
<span class="identifier">found_flag</span><span class="plain"> = </span><span class="constant">TRUE</span><span class="plain">;</span>
&lt;<span class="cwebmacro">Reconcile any conflicting instructions</span> <span class="cwebmacronumber">3.1</span>&gt;<span class="plain">;</span>
&lt;<span class="cwebmacro">Declare the format and wrapper as symbols</span> <span class="cwebmacronumber">3.2</span>&gt;<span class="plain">;</span>
<span class="functiontext">HTMLUtilities::add_image_source</span><span class="plain">(</span><span class="functiontext">Pathnames::subfolder</span><span class="plain">(</span><span class="identifier">path_to_indoc_materials</span><span class="plain">, </span><span class="identifier">I</span><span class="string">"images"</span><span class="plain">));</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="identifier">found_flag</span><span class="plain"> == </span><span class="constant">FALSE</span><span class="plain">)</span>
<span class="functiontext">Errors::fatal_with_text</span><span class="plain">(</span><span class="string">"unknown target %S"</span><span class="plain">, </span><span class="identifier">target_sought</span><span class="plain">);</span>
<span class="plain">}</span>
</pre>
<p class="inwebparagraph"></p>
<p class="endnote">The function Instructions::read_instructions is used in 1/cnf (<a href="1-cnf.html#SP1">&#167;1</a>).</p>
<p class="inwebparagraph"><a id="SP4"></a><b>&#167;4. </b>The instructions can be either at the top level, which means they apply to
all targets, or grouped in braced blocks relevant to one target only. For
example,
</p>
<p class="inwebparagraph"></p>
<pre class="display">
<span class="plain">superbness = 20</span>
<span class="plain">hypercard {</span>
<span class="plain"> superbness = 40</span>
<span class="plain">}</span>
</pre>
<p class="inwebparagraph">applies 20 for all targets except <code class="display"><span class="extract">hypercard</span></code>, where it applies 40.
</p>
<pre class="display">
<span class="reserved">typedef</span><span class="plain"> </span><span class="reserved">struct</span><span class="plain"> </span><span class="reserved">ins_helper_state</span><span class="plain"> {</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">found_aim</span><span class="plain">;</span>
<span class="reserved">struct</span><span class="plain"> </span><span class="reserved">settings_block</span><span class="plain"> *</span><span class="identifier">settings</span><span class="plain">;</span>
<span class="reserved">struct</span><span class="plain"> </span><span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">desired_target</span><span class="plain">;</span>
<span class="reserved">struct</span><span class="plain"> </span><span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">scanning_target</span><span class="plain">;</span>
<span class="plain">} </span><span class="reserved">ins_helper_state</span><span class="plain">;</span>
<span class="reserved">int</span><span class="plain"> </span><span class="functiontext">Instructions::read_instructions_from</span><span class="plain">(</span><span class="reserved">filename</span><span class="plain"> *</span><span class="identifier">F</span><span class="plain">, </span><span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">desired</span><span class="plain">,</span>
<span class="reserved">settings_block</span><span class="plain"> *</span><span class="identifier">settings</span><span class="plain">) {</span>
<span class="reserved">ins_helper_state</span><span class="plain"> </span><span class="identifier">ihs</span><span class="plain">;</span>
<span class="identifier">ihs</span><span class="element">.scanning_target</span><span class="plain"> = </span><span class="functiontext">Str::new</span><span class="plain">();</span>
<span class="identifier">ihs</span><span class="element">.desired_target</span><span class="plain"> = </span><span class="identifier">desired</span><span class="plain">;</span>
<span class="identifier">ihs</span><span class="element">.found_aim</span><span class="plain"> = </span><span class="constant">FALSE</span><span class="plain">;</span>
<span class="identifier">ihs</span><span class="element">.settings</span><span class="plain"> = </span><span class="identifier">settings</span><span class="plain">;</span>
<span class="functiontext">TextFiles::read</span><span class="plain">(</span><span class="identifier">F</span><span class="plain">, </span><span class="constant">FALSE</span><span class="plain">, </span><span class="string">"can't open instructions file"</span><span class="plain">,</span>
<span class="constant">TRUE</span><span class="plain">, </span><span class="functiontext">Instructions::read_instructions_helper</span><span class="plain">, </span><span class="identifier">NULL</span><span class="plain">, &amp;</span><span class="identifier">ihs</span><span class="plain">);</span>
<span class="reserved">return</span><span class="plain"> </span><span class="identifier">ihs</span><span class="element">.found_aim</span><span class="plain">;</span>
<span class="plain">}</span>
</pre>
<p class="inwebparagraph"></p>
<p class="endnote">The function Instructions::read_instructions_from is used in <a href="#SP3">&#167;3</a>, <a href="#SP5">&#167;5</a>.</p>
<p class="endnote">The structure ins_helper_state is accessed in 1/cnf and here.</p>
<p class="inwebparagraph"><a id="SP5"></a><b>&#167;5. </b></p>
<pre class="display">
<span class="reserved">void</span><span class="plain"> </span><span class="functiontext">Instructions::read_instructions_helper</span><span class="plain">(</span><span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">cl</span><span class="plain">, </span><span class="reserved">text_file_position</span><span class="plain"> *</span><span class="identifier">tfp</span><span class="plain">,</span>
<span class="reserved">void</span><span class="plain"> *</span><span class="identifier">v_ihs</span><span class="plain">) {</span>
<span class="reserved">ins_helper_state</span><span class="plain"> *</span><span class="identifier">ihs</span><span class="plain"> = (</span><span class="reserved">ins_helper_state</span><span class="plain"> *) </span><span class="identifier">v_ihs</span><span class="plain">;</span>
<span class="reserved">settings_block</span><span class="plain"> *</span><span class="identifier">settings</span><span class="plain"> = </span><span class="identifier">ihs</span><span class="plain">-</span><span class="element">&gt;settings</span><span class="plain">;</span>
<span class="reserved">match_results</span><span class="plain"> </span><span class="identifier">mr</span><span class="plain"> = </span><span class="functiontext">Regexp::create_mr</span><span class="plain">();</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr</span><span class="plain">, </span><span class="identifier">cl</span><span class="plain">, </span><span class="identifier">L</span><span class="string">" *#%c*"</span><span class="plain">)) { </span><span class="functiontext">Regexp::dispose_of</span><span class="plain">(&amp;</span><span class="identifier">mr</span><span class="plain">); </span><span class="reserved">return</span><span class="plain">; }</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr</span><span class="plain">, </span><span class="identifier">cl</span><span class="plain">, </span><span class="identifier">L</span><span class="string">" *"</span><span class="plain">)) { </span><span class="functiontext">Regexp::dispose_of</span><span class="plain">(&amp;</span><span class="identifier">mr</span><span class="plain">); </span><span class="reserved">return</span><span class="plain">; }</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr</span><span class="plain">, </span><span class="identifier">cl</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"(%C+) { *"</span><span class="plain">)) {</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::len</span><span class="plain">(</span><span class="identifier">ihs</span><span class="plain">-</span><span class="element">&gt;scanning_target</span><span class="plain">) &gt; 0)</span>
<span class="functiontext">Errors::in_text_file</span><span class="plain">(</span><span class="string">"second target opened while first is still open"</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">);</span>
<span class="functiontext">Str::copy</span><span class="plain">(</span><span class="identifier">ihs</span><span class="plain">-</span><span class="element">&gt;scanning_target</span><span class="plain">, </span><span class="identifier">mr</span><span class="element">.exp</span><span class="plain">[0]);</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq</span><span class="plain">(</span><span class="identifier">ihs</span><span class="plain">-</span><span class="element">&gt;scanning_target</span><span class="plain">, </span><span class="identifier">ihs</span><span class="plain">-</span><span class="element">&gt;desired_target</span><span class="plain">)) </span><span class="identifier">ihs</span><span class="plain">-</span><span class="element">&gt;found_aim</span><span class="plain"> = </span><span class="constant">TRUE</span><span class="plain">;</span>
<span class="plain">} </span><span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr</span><span class="plain">, </span><span class="identifier">cl</span><span class="plain">, </span><span class="identifier">L</span><span class="string">" *} *"</span><span class="plain">)) {</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::len</span><span class="plain">(</span><span class="identifier">ihs</span><span class="plain">-</span><span class="element">&gt;scanning_target</span><span class="plain">) == 0)</span>
<span class="functiontext">Errors::in_text_file</span><span class="plain">(</span><span class="string">"unexpected target end-marker"</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">);</span>
<span class="functiontext">Str::clear</span><span class="plain">(</span><span class="identifier">ihs</span><span class="plain">-</span><span class="element">&gt;scanning_target</span><span class="plain">);</span>
<span class="plain">} </span><span class="reserved">else</span><span class="plain"> {</span>
<span class="reserved">if</span><span class="plain"> ((</span><span class="functiontext">Str::len</span><span class="plain">(</span><span class="identifier">ihs</span><span class="plain">-</span><span class="element">&gt;scanning_target</span><span class="plain">) == 0) ||</span>
<span class="plain">(</span><span class="functiontext">Str::eq</span><span class="plain">(</span><span class="identifier">ihs</span><span class="plain">-</span><span class="element">&gt;scanning_target</span><span class="plain">, </span><span class="identifier">ihs</span><span class="plain">-</span><span class="element">&gt;desired_target</span><span class="plain">))) {</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;verbose_mode</span><span class="plain">)</span>
<span class="identifier">PRINT</span><span class="plain">(</span><span class="string">"%f, line %d: %S\</span><span class="plain">n</span><span class="string">"</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">-</span><span class="element">&gt;text_file_filename</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">-</span><span class="element">&gt;line_count</span><span class="plain">, </span><span class="identifier">cl</span><span class="plain">);</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr</span><span class="plain">, </span><span class="identifier">cl</span><span class="plain">, </span><span class="identifier">L</span><span class="string">" *follow: *(%c*?) *"</span><span class="plain">)) {</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Instructions::read_instructions_from</span><span class="plain">(</span>
<span class="functiontext">Filenames::in_folder</span><span class="plain">(</span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;book_folder</span><span class="plain">, </span><span class="identifier">mr</span><span class="element">.exp</span><span class="plain">[0]),</span>
<span class="identifier">ihs</span><span class="plain">-</span><span class="element">&gt;desired_target</span><span class="plain">, </span><span class="identifier">settings</span><span class="plain">))</span>
<span class="identifier">ihs</span><span class="plain">-</span><span class="element">&gt;found_aim</span><span class="plain"> = </span><span class="constant">TRUE</span><span class="plain">;</span>
<span class="plain">} </span><span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr</span><span class="plain">, </span><span class="identifier">cl</span><span class="plain">, </span><span class="identifier">L</span><span class="string">" *declare: *(%c*?) *"</span><span class="plain">)) {</span>
<span class="functiontext">Symbols::declare_symbol</span><span class="plain">(</span><span class="identifier">mr</span><span class="element">.exp</span><span class="plain">[0]);</span>
<span class="plain">} </span><span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr</span><span class="plain">, </span><span class="identifier">cl</span><span class="plain">, </span><span class="identifier">L</span><span class="string">" *undeclare: *(%c*?) *"</span><span class="plain">)) {</span>
<span class="functiontext">Symbols::undeclare_symbol</span><span class="plain">(</span><span class="identifier">mr</span><span class="element">.exp</span><span class="plain">[0]);</span>
<span class="plain">} </span><span class="reserved">else</span><span class="plain"> </span>&lt;<span class="cwebmacro">This is an instruction</span> <span class="cwebmacronumber">5.1</span>&gt;<span class="plain">;</span>
<span class="plain">}</span>
<span class="plain">}</span>
<span class="functiontext">Regexp::dispose_of</span><span class="plain">(&amp;</span><span class="identifier">mr</span><span class="plain">);</span>
<span class="plain">}</span>
</pre>
<p class="inwebparagraph"></p>
<p class="endnote">The function Instructions::read_instructions_helper is used in <a href="#SP4">&#167;4</a>.</p>
<p class="inwebparagraph"><a id="SP5_1"></a><b>&#167;5.1. </b><code class="display">
&lt;<span class="cwebmacrodefn">This is an instruction</span> <span class="cwebmacronumber">5.1</span>&gt; =
</code></p>
<pre class="displaydefn">
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr</span><span class="plain">, </span><span class="identifier">cl</span><span class="plain">, </span><span class="identifier">L</span><span class="string">" *volume: *(%c*?) *"</span><span class="plain">)) {</span>
&lt;<span class="cwebmacro">Disallow this in a specific target</span> <span class="cwebmacronumber">5.1.1</span>&gt;<span class="plain">;</span>
&lt;<span class="cwebmacro">Act on a volume creation</span> <span class="cwebmacronumber">5.1.2</span>&gt;
<span class="plain">} </span><span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr</span><span class="plain">, </span><span class="identifier">cl</span><span class="plain">, </span><span class="identifier">L</span><span class="string">" *cover: *(%c*?) *"</span><span class="plain">)) {</span>
&lt;<span class="cwebmacro">Disallow this in a specific target</span> <span class="cwebmacronumber">5.1.1</span>&gt;<span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;book_cover_image</span><span class="plain"> = </span><span class="functiontext">Instructions::set_file</span><span class="plain">(</span><span class="identifier">mr</span><span class="element">.exp</span><span class="plain">[0], </span><span class="identifier">settings</span><span class="plain">);</span>
<span class="plain">} </span><span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr</span><span class="plain">, </span><span class="identifier">cl</span><span class="plain">, </span><span class="identifier">L</span><span class="string">" *examples *"</span><span class="plain">)) {</span>
&lt;<span class="cwebmacro">Disallow this in a specific target</span> <span class="cwebmacronumber">5.1.1</span>&gt;<span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;book_contains_examples</span><span class="plain"> = </span><span class="constant">TRUE</span><span class="plain">;</span>
<span class="plain">} </span><span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr</span><span class="plain">, </span><span class="identifier">cl</span><span class="plain">, </span><span class="identifier">L</span><span class="string">" *dc:(%C+): *(%c*?) *"</span><span class="plain">)) {</span>
&lt;<span class="cwebmacro">Disallow this in a specific target</span> <span class="cwebmacronumber">5.1.1</span>&gt;<span class="plain">;</span>
<span class="functiontext">Instructions::create_ebook_metadata</span><span class="plain">(</span><span class="functiontext">Str::duplicate</span><span class="plain">(</span><span class="identifier">mr</span><span class="element">.exp</span><span class="plain">[0]), </span><span class="functiontext">Str::duplicate</span><span class="plain">(</span><span class="identifier">mr</span><span class="element">.exp</span><span class="plain">[1]));</span>
<span class="plain">} </span><span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr</span><span class="plain">, </span><span class="identifier">cl</span><span class="plain">, </span><span class="identifier">L</span><span class="string">" *css: *(%c*?) *"</span><span class="plain">)) {</span>
&lt;<span class="cwebmacro">Act on a CSS tweak</span> <span class="cwebmacronumber">5.1.3</span>&gt;<span class="plain">;</span>
<span class="plain">} </span><span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr</span><span class="plain">, </span><span class="identifier">cl</span><span class="plain">, </span><span class="identifier">L</span><span class="string">" *index: *(%c*?) *"</span><span class="plain">)) {</span>
&lt;<span class="cwebmacro">Act on an indexing notation</span> <span class="cwebmacronumber">5.1.4</span>&gt;<span class="plain">;</span>
<span class="plain">} </span><span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr</span><span class="plain">, </span><span class="identifier">cl</span><span class="plain">, </span><span class="identifier">L</span><span class="string">" *images: *(%c*?) *"</span><span class="plain">)) {</span>
<span class="functiontext">HTMLUtilities::add_image_source</span><span class="plain">(</span><span class="functiontext">Instructions::set_path</span><span class="plain">(</span><span class="identifier">mr</span><span class="element">.exp</span><span class="plain">[0], </span><span class="identifier">settings</span><span class="plain">));</span>
<span class="plain">} </span><span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr</span><span class="plain">, </span><span class="identifier">cl</span><span class="plain">, </span><span class="identifier">L</span><span class="string">" *(%C+) *= *(%c*?) *"</span><span class="plain">)) {</span>
&lt;<span class="cwebmacro">Act on an instructions setting</span> <span class="cwebmacronumber">5.1.5</span>&gt;<span class="plain">;</span>
<span class="plain">} </span><span class="reserved">else</span><span class="plain"> {</span>
<span class="functiontext">Errors::in_text_file</span><span class="plain">(</span><span class="string">"unknown syntax in instructions file"</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">);</span>
<span class="plain">}</span>
</pre>
<p class="inwebparagraph"></p>
<p class="endnote">This code is used in <a href="#SP5">&#167;5</a>.</p>
<p class="inwebparagraph"><a id="SP5_1_1"></a><b>&#167;5.1.1. </b><code class="display">
&lt;<span class="cwebmacrodefn">Disallow this in a specific target</span> <span class="cwebmacronumber">5.1.1</span>&gt; =
</code></p>
<pre class="displaydefn">
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::len</span><span class="plain">(</span><span class="identifier">ihs</span><span class="plain">-</span><span class="element">&gt;scanning_target</span><span class="plain">) &gt; 0)</span>
<span class="functiontext">Errors::in_text_file</span><span class="plain">(</span>
<span class="string">"structural settings like this one must apply to all targets"</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">);</span>
</pre>
<p class="inwebparagraph"></p>
<p class="endnote">This code is used in <a href="#SP5_1">&#167;5.1</a> (four times), <a href="#SP5_1_2">&#167;5.1.2</a>.</p>
<p class="inwebparagraph"><a id="SP5_1_2"></a><b>&#167;5.1.2. </b>Here's where we parse the specifier part of lines like
</p>
<p class="inwebparagraph"></p>
<pre class="display">
<span class="plain">volume: The Inform Recipe Book (RB) = The Recipe Book.txt</span>
</pre>
<p class="inwebparagraph">which reads:
</p>
<p class="inwebparagraph"></p>
<pre class="display">
<span class="plain">The Inform Recipe Book (RB) = The Recipe Book.txt</span>
&lt;<span class="cwebmacrodefn">Act on a volume creation</span> <span class="cwebmacronumber">5.1.2</span>&gt; =
&lt;<span class="cwebmacro">Disallow this in a specific target</span> <span class="cwebmacronumber">5.1.1</span>&gt;<span class="plain">;</span>
<span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">title</span><span class="plain"> = </span><span class="identifier">mr</span><span class="element">.exp</span><span class="plain">[0];</span>
<span class="identifier">TEMPORARY_TEXT</span><span class="plain">(</span><span class="identifier">file</span><span class="plain">);</span>
<span class="identifier">TEMPORARY_TEXT</span><span class="plain">(</span><span class="identifier">abbrev</span><span class="plain">);</span>
<span class="reserved">match_results</span><span class="plain"> </span><span class="identifier">mr2</span><span class="plain"> = </span><span class="functiontext">Regexp::create_mr</span><span class="plain">();</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr2</span><span class="plain">, </span><span class="identifier">title</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"(%c+?) *= *(%c+?)"</span><span class="plain">)) { </span> <span class="comment">the optional filename syntax</span>
<span class="functiontext">Str::copy</span><span class="plain">(</span><span class="identifier">title</span><span class="plain">, </span><span class="identifier">mr2</span><span class="element">.exp</span><span class="plain">[0]); </span><span class="functiontext">Str::copy</span><span class="plain">(</span><span class="identifier">file</span><span class="plain">, </span><span class="identifier">mr2</span><span class="element">.exp</span><span class="plain">[1]);</span>
<span class="plain">} </span><span class="reserved">else</span><span class="plain"> {</span>
<span class="identifier">WRITE_TO</span><span class="plain">(</span><span class="identifier">file</span><span class="plain">, </span><span class="string">"%S.txt"</span><span class="plain">, </span><span class="identifier">title</span><span class="plain">);</span>
<span class="plain">}</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr2</span><span class="plain">, </span><span class="identifier">title</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"(%c*?) *%((%c*?)%)"</span><span class="plain">)) { </span> <span class="comment">the optional abbreviation syntax</span>
<span class="functiontext">Str::copy</span><span class="plain">(</span><span class="identifier">title</span><span class="plain">, </span><span class="identifier">mr2</span><span class="element">.exp</span><span class="plain">[0]); </span><span class="functiontext">Str::copy</span><span class="plain">(</span><span class="identifier">abbrev</span><span class="plain">, </span><span class="identifier">mr2</span><span class="element">.exp</span><span class="plain">[1]);</span>
<span class="plain">}</span>
<span class="functiontext">Scanner::create_volume</span><span class="plain">(</span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;book_folder</span><span class="plain">, </span><span class="identifier">file</span><span class="plain">, </span><span class="identifier">title</span><span class="plain">, </span><span class="identifier">abbrev</span><span class="plain">);</span>
<span class="identifier">DISCARD_TEXT</span><span class="plain">(</span><span class="identifier">file</span><span class="plain">);</span>
<span class="identifier">DISCARD_TEXT</span><span class="plain">(</span><span class="identifier">abbrev</span><span class="plain">);</span>
<span class="functiontext">Regexp::dispose_of</span><span class="plain">(&amp;</span><span class="identifier">mr2</span><span class="plain">);</span>
</pre>
<p class="inwebparagraph"></p>
<p class="endnote">This code is used in <a href="#SP5_1">&#167;5.1</a>.</p>
<p class="inwebparagraph"><a id="SP5_1_3"></a><b>&#167;5.1.3. </b><code class="display">
&lt;<span class="cwebmacrodefn">Act on a CSS tweak</span> <span class="cwebmacronumber">5.1.3</span>&gt; =
</code></p>
<pre class="displaydefn">
<span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">tweak</span><span class="plain"> = </span><span class="identifier">mr</span><span class="element">.exp</span><span class="plain">[0];</span>
<span class="reserved">match_results</span><span class="plain"> </span><span class="identifier">mr2</span><span class="plain"> = </span><span class="functiontext">Regexp::create_mr</span><span class="plain">();</span>
<span class="reserved">match_results</span><span class="plain"> </span><span class="identifier">mr3</span><span class="plain"> = </span><span class="functiontext">Regexp::create_mr</span><span class="plain">();</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr2</span><span class="plain">, </span><span class="identifier">tweak</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"(%C+)text(%C+) = (%C+)"</span><span class="plain">)) {</span>
<span class="functiontext">CSS::add_span_notation</span><span class="plain">(</span><span class="identifier">mr2</span><span class="element">.exp</span><span class="plain">[0], </span><span class="identifier">mr2</span><span class="element">.exp</span><span class="plain">[1], </span><span class="identifier">mr2</span><span class="element">.exp</span><span class="plain">[2], </span><span class="constant">MARKUP_SPP</span><span class="plain">);</span>
<span class="plain">} </span><span class="reserved">else</span><span class="plain"> {</span>
<span class="reserved">volume</span><span class="plain"> *</span><span class="identifier">act_on</span><span class="plain"> = </span><span class="identifier">NULL</span><span class="plain">;</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr2</span><span class="plain">, </span><span class="identifier">tweak</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"(%C+) *: *(%c+)"</span><span class="plain">)) {</span>
<span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">abbrev</span><span class="plain"> = </span><span class="identifier">mr2</span><span class="element">.exp</span><span class="plain">[0];</span>
<span class="functiontext">Str::copy</span><span class="plain">(</span><span class="identifier">tweak</span><span class="plain">, </span><span class="identifier">mr2</span><span class="element">.exp</span><span class="plain">[1]);</span>
<span class="reserved">volume</span><span class="plain"> *</span><span class="identifier">V</span><span class="plain">;</span>
<span class="identifier">LOOP_OVER</span><span class="plain">(</span><span class="identifier">V</span><span class="plain">, </span><span class="reserved">volume</span><span class="plain">)</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq</span><span class="plain">(</span><span class="identifier">V</span><span class="plain">-</span><span class="element">&gt;vol_abbrev</span><span class="plain">, </span><span class="identifier">abbrev</span><span class="plain">))</span>
<span class="identifier">act_on</span><span class="plain"> = </span><span class="identifier">V</span><span class="plain">;</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="identifier">act_on</span><span class="plain"> == </span><span class="identifier">NULL</span><span class="plain">) </span><span class="functiontext">Errors::in_text_file</span><span class="plain">(</span><span class="string">"unknown volume abbreviation"</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">);</span>
<span class="plain">}</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr2</span><span class="plain">, </span><span class="identifier">tweak</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"(%c+?) *{ *"</span><span class="plain">)) {</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">plus</span><span class="plain"> = 0;</span>
<span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">tag</span><span class="plain"> = </span><span class="identifier">mr2</span><span class="element">.exp</span><span class="plain">[0];</span>
<span class="identifier">TEMPORARY_TEXT</span><span class="plain">(</span><span class="identifier">want</span><span class="plain">);</span>
<span class="identifier">TEMPORARY_TEXT</span><span class="plain">(</span><span class="identifier">ncl</span><span class="plain">);</span>
<span class="reserved">while</span><span class="plain"> ((</span><span class="functiontext">TextFiles::read_line</span><span class="plain">(</span><span class="identifier">ncl</span><span class="plain">, </span><span class="constant">FALSE</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">)), (</span><span class="functiontext">Str::len</span><span class="plain">(</span><span class="identifier">ncl</span><span class="plain">) &gt; 0)) {</span>
<span class="functiontext">Str::trim_white_space</span><span class="plain">(</span><span class="identifier">ncl</span><span class="plain">);</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr3</span><span class="plain">, </span><span class="identifier">ncl</span><span class="plain">, </span><span class="identifier">L</span><span class="string">" *} *"</span><span class="plain">)) </span><span class="reserved">break</span><span class="plain">;</span>
<span class="identifier">WRITE_TO</span><span class="plain">(</span><span class="identifier">want</span><span class="plain">, </span><span class="string">"%S\</span><span class="plain">n</span><span class="string">"</span><span class="plain">, </span><span class="identifier">ncl</span><span class="plain">);</span>
<span class="plain">}</span>
<span class="identifier">DISCARD_TEXT</span><span class="plain">(</span><span class="identifier">ncl</span><span class="plain">);</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr3</span><span class="plain">, </span><span class="identifier">tag</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"(%c*?) *%+%+ *"</span><span class="plain">)) { </span><span class="identifier">plus</span><span class="plain"> = 2; </span><span class="identifier">tag</span><span class="plain"> = </span><span class="identifier">mr3</span><span class="element">.exp</span><span class="plain">[0]; }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr3</span><span class="plain">, </span><span class="identifier">tag</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"(%c*?) *%+ *"</span><span class="plain">)) { </span><span class="identifier">plus</span><span class="plain"> = 1; </span><span class="identifier">tag</span><span class="plain"> = </span><span class="identifier">mr3</span><span class="element">.exp</span><span class="plain">[0]; }</span>
<span class="functiontext">CSS::request_css_tweak</span><span class="plain">(</span><span class="identifier">act_on</span><span class="plain">, </span><span class="identifier">tag</span><span class="plain">, </span><span class="identifier">want</span><span class="plain">, </span><span class="identifier">plus</span><span class="plain">);</span>
<span class="identifier">DISCARD_TEXT</span><span class="plain">(</span><span class="identifier">want</span><span class="plain">);</span>
<span class="plain">} </span><span class="reserved">else</span><span class="plain"> </span><span class="functiontext">Errors::in_text_file</span><span class="plain">(</span><span class="string">"bad CSS tweaking syntax"</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">);</span>
<span class="plain">}</span>
<span class="functiontext">Regexp::dispose_of</span><span class="plain">(&amp;</span><span class="identifier">mr2</span><span class="plain">);</span>
<span class="functiontext">Regexp::dispose_of</span><span class="plain">(&amp;</span><span class="identifier">mr3</span><span class="plain">);</span>
</pre>
<p class="inwebparagraph"></p>
<p class="endnote">This code is used in <a href="#SP5_1">&#167;5.1</a>.</p>
<p class="inwebparagraph"><a id="SP5_1_4"></a><b>&#167;5.1.4. </b><code class="display">
&lt;<span class="cwebmacrodefn">Act on an indexing notation</span> <span class="cwebmacronumber">5.1.4</span>&gt; =
</code></p>
<pre class="displaydefn">
<span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">tweak</span><span class="plain"> = </span><span class="identifier">mr</span><span class="element">.exp</span><span class="plain">[0];</span>
<span class="reserved">match_results</span><span class="plain"> </span><span class="identifier">mr2</span><span class="plain"> = </span><span class="functiontext">Regexp::create_mr</span><span class="plain">();</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;test_index_mode</span><span class="plain">) </span><span class="identifier">PRINT</span><span class="plain">(</span><span class="string">"Read in: %S\</span><span class="plain">n</span><span class="string">"</span><span class="plain">, </span><span class="identifier">tweak</span><span class="plain">);</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr2</span><span class="plain">, </span><span class="identifier">tweak</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"^{(%C*)headword(%C*)} = (%C+) *(%c*)"</span><span class="plain">)) {</span>
<span class="functiontext">Indexes::add_indexing_notation</span><span class="plain">(</span><span class="identifier">mr2</span><span class="element">.exp</span><span class="plain">[0], </span><span class="identifier">mr2</span><span class="element">.exp</span><span class="plain">[1], </span><span class="identifier">mr2</span><span class="element">.exp</span><span class="plain">[2], </span><span class="identifier">mr2</span><span class="element">.exp</span><span class="plain">[3]);</span>
<span class="plain">} </span><span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr2</span><span class="plain">, </span><span class="identifier">tweak</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"{(%C+?)} = (%C+) *(%c*)"</span><span class="plain">)) {</span>
<span class="functiontext">Indexes::add_indexing_notation_for_symbols</span><span class="plain">(</span><span class="identifier">mr2</span><span class="element">.exp</span><span class="plain">[0], </span><span class="identifier">mr2</span><span class="element">.exp</span><span class="plain">[1], </span><span class="identifier">mr2</span><span class="element">.exp</span><span class="plain">[2]);</span>
<span class="plain">} </span><span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr2</span><span class="plain">, </span><span class="identifier">tweak</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"definition = (%C+) *(%c*)"</span><span class="plain">)) {</span>
<span class="functiontext">Indexes::add_indexing_notation_for_definitions</span><span class="plain">(</span><span class="identifier">mr2</span><span class="element">.exp</span><span class="plain">[0], </span><span class="identifier">mr2</span><span class="element">.exp</span><span class="plain">[1], </span><span class="identifier">NULL</span><span class="plain">);</span>
<span class="plain">} </span><span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr2</span><span class="plain">, </span><span class="identifier">tweak</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"(%C+)-definition = (%C+) *(%c*)"</span><span class="plain">)) {</span>
<span class="functiontext">Indexes::add_indexing_notation_for_definitions</span><span class="plain">(</span><span class="identifier">mr2</span><span class="element">.exp</span><span class="plain">[1], </span><span class="identifier">mr2</span><span class="element">.exp</span><span class="plain">[2], </span><span class="identifier">mr2</span><span class="element">.exp</span><span class="plain">[0]);</span>
<span class="plain">} </span><span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr2</span><span class="plain">, </span><span class="identifier">tweak</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"example = (%C+) *(%c*)"</span><span class="plain">)) {</span>
<span class="functiontext">Indexes::add_indexing_notation_for_examples</span><span class="plain">(</span><span class="identifier">mr2</span><span class="element">.exp</span><span class="plain">[0], </span><span class="identifier">mr2</span><span class="element">.exp</span><span class="plain">[1]);</span>
<span class="plain">} </span><span class="reserved">else</span><span class="plain"> {</span>
<span class="functiontext">Errors::in_text_file</span><span class="plain">(</span><span class="string">"bad indexing notation"</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">);</span>
<span class="plain">}</span>
<span class="functiontext">Regexp::dispose_of</span><span class="plain">(&amp;</span><span class="identifier">mr2</span><span class="plain">);</span>
</pre>
<p class="inwebparagraph"></p>
<p class="endnote">This code is used in <a href="#SP5_1">&#167;5.1</a>.</p>
<p class="inwebparagraph"><a id="SP5_1_5"></a><b>&#167;5.1.5. </b><code class="display">
&lt;<span class="cwebmacrodefn">Act on an instructions setting</span> <span class="cwebmacronumber">5.1.5</span>&gt; =
</code></p>
<pre class="displaydefn">
<span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">key</span><span class="plain"> = </span><span class="identifier">mr</span><span class="element">.exp</span><span class="plain">[0];</span>
<span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">val</span><span class="plain"> = </span><span class="identifier">mr</span><span class="element">.exp</span><span class="plain">[1];</span>
&lt;<span class="cwebmacro">Deal with braced write values</span> <span class="cwebmacronumber">5.1.5.1</span>&gt;<span class="plain">;</span>
&lt;<span class="cwebmacro">Set an instructions option</span> <span class="cwebmacronumber">5.1.5.2</span>&gt;<span class="plain">;</span>
</pre>
<p class="inwebparagraph"></p>
<p class="endnote">This code is used in <a href="#SP5_1">&#167;5.1</a>.</p>
<p class="inwebparagraph"><a id="SP5_1_5_1"></a><b>&#167;5.1.5.1. </b>The write value can span multiple lines if the first line consists only
of <code class="display"><span class="extract">{</span></code> and the last only of <code class="display"><span class="extract">}</span></code> (plus leading or trailing white space to
taste). In a multiple-line value, each line is terminated with a newline.
</p>
<p class="macrodefinition"><code class="display">
&lt;<span class="cwebmacrodefn">Deal with braced write values</span> <span class="cwebmacronumber">5.1.5.1</span>&gt; =
</code></p>
<pre class="displaydefn">
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">I</span><span class="string">"{"</span><span class="plain">)) {</span>
<span class="functiontext">Str::clear</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">);</span>
<span class="reserved">match_results</span><span class="plain"> </span><span class="identifier">mr2</span><span class="plain"> = </span><span class="functiontext">Regexp::create_mr</span><span class="plain">();</span>
<span class="identifier">TEMPORARY_TEXT</span><span class="plain">(</span><span class="identifier">ncl</span><span class="plain">);</span>
<span class="reserved">while</span><span class="plain"> ((</span><span class="functiontext">TextFiles::read_line</span><span class="plain">(</span><span class="identifier">ncl</span><span class="plain">, </span><span class="constant">FALSE</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">)), (</span><span class="functiontext">Str::len</span><span class="plain">(</span><span class="identifier">ncl</span><span class="plain">) &gt; 0)) {</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr2</span><span class="plain">, </span><span class="identifier">ncl</span><span class="plain">, </span><span class="identifier">L</span><span class="string">" *} *"</span><span class="plain">)) </span><span class="reserved">break</span><span class="plain">;</span>
<span class="identifier">WRITE_TO</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, </span><span class="string">"%S\</span><span class="plain">n</span><span class="string">"</span><span class="plain">, </span><span class="identifier">ncl</span><span class="plain">);</span>
<span class="plain">}</span>
<span class="identifier">DISCARD_TEXT</span><span class="plain">(</span><span class="identifier">ncl</span><span class="plain">);</span>
<span class="functiontext">Regexp::dispose_of</span><span class="plain">(&amp;</span><span class="identifier">mr2</span><span class="plain">);</span>
<span class="plain">}</span>
</pre>
<p class="inwebparagraph"></p>
<p class="endnote">This code is used in <a href="#SP5_1_5">&#167;5.1.5</a>.</p>
<p class="inwebparagraph"><a id="SP5_1_5_2"></a><b>&#167;5.1.5.2. </b><code class="display">
&lt;<span class="cwebmacrodefn">Set an instructions option</span> <span class="cwebmacronumber">5.1.5.2</span>&gt; =
</code></p>
<pre class="displaydefn">
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"alphabetization"</span><span class="plain">)) {</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"word-by-word"</span><span class="plain">))</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;index_alphabetisation_algorithm</span><span class="plain"> = </span><span class="constant">WORD_ALPHABETIZATION</span><span class="plain">;</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"letter-by-letter"</span><span class="plain">))</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;index_alphabetisation_algorithm</span><span class="plain"> = </span><span class="constant">LETTER_ALPHABETIZATION</span><span class="plain">;</span>
<span class="reserved">else</span><span class="plain"> </span><span class="functiontext">Errors::in_text_file</span><span class="plain">(</span><span class="string">"no such alphabetization"</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">);</span>
<span class="plain">}</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"assume_Public_Library"</span><span class="plain">))</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;assume_Public_Library</span><span class="plain"> = </span><span class="functiontext">Instructions::set_yn</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">);</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"change_logs_directory"</span><span class="plain">))</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;change_logs_folder</span><span class="plain"> = </span><span class="functiontext">Instructions::set_path</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">settings</span><span class="plain">);</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"contents_leafname"</span><span class="plain">))</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;contents_leafname</span><span class="plain"> = </span><span class="functiontext">Str::duplicate</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">);</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"contents_expandable"</span><span class="plain">))</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;contents_expandable</span><span class="plain"> = </span><span class="functiontext">Instructions::set_yn</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">);</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"css_source_file"</span><span class="plain">)) { </span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;css_source_file</span><span class="plain"> = </span><span class="functiontext">Instructions::set_file</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">settings</span><span class="plain">); }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"definitions_filename"</span><span class="plain">)) { </span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;definitions_filename</span><span class="plain"> = </span><span class="functiontext">Instructions::set_file</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">settings</span><span class="plain">); }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"definitions_index_filename"</span><span class="plain">)) {</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;definitions_index_leafname</span><span class="plain"> = </span><span class="functiontext">Str::duplicate</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">); }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"destination"</span><span class="plain">)) {</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;destination_modifiable</span><span class="plain">)</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;destination</span><span class="plain"> = </span><span class="functiontext">Instructions::set_path</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">settings</span><span class="plain">);</span>
<span class="plain">}</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"examples_directory"</span><span class="plain">)) {</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;examples_directory</span><span class="plain"> = </span><span class="functiontext">Instructions::set_path</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">settings</span><span class="plain">); }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"examples_alphabetical_leafname"</span><span class="plain">)) {</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;examples_alphabetical_leafname</span><span class="plain"> = </span><span class="functiontext">Str::duplicate</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">); }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"examples_granularity"</span><span class="plain">)) {</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;examples_granularity</span><span class="plain"> = </span><span class="functiontext">Instructions::set_range</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">val</span><span class="plain">, 1, 3, </span><span class="identifier">tfp</span><span class="plain">); }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"examples_mode"</span><span class="plain">)) {</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"open"</span><span class="plain">)) { </span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;examples_mode</span><span class="plain"> = </span><span class="constant">EXMODE_open_internal</span><span class="plain">; }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"openable"</span><span class="plain">)) { </span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;examples_mode</span><span class="plain"> = </span><span class="constant">EXMODE_openable_internal</span><span class="plain">; }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="functiontext">Errors::in_text_file</span><span class="plain">(</span><span class="string">"no such examples mode"</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">);</span>
<span class="plain">}</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"examples_numerical_leafname"</span><span class="plain">)) {</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;examples_numerical_leafname</span><span class="plain"> = </span><span class="functiontext">Str::duplicate</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">); }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"examples_thematic_leafname"</span><span class="plain">)) {</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;examples_thematic_leafname</span><span class="plain"> = </span><span class="functiontext">Str::duplicate</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">); }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"format"</span><span class="plain">)) {</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"HTML"</span><span class="plain">)) { </span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;format</span><span class="plain"> = </span><span class="constant">HTML_FORMAT</span><span class="plain">; }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"text"</span><span class="plain">)) { </span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;format</span><span class="plain"> = </span><span class="constant">PLAIN_FORMAT</span><span class="plain">; }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="functiontext">Errors::in_text_file</span><span class="plain">(</span><span class="string">"no such format"</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">);</span>
<span class="plain">}</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"granularity"</span><span class="plain">)) { </span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;granularity</span><span class="plain"> = </span><span class="functiontext">Instructions::set_range</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">val</span><span class="plain">, 1, 3, </span><span class="identifier">tfp</span><span class="plain">); }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"html_for_Inform_application"</span><span class="plain">)) {</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;html_for_Inform_application</span><span class="plain"> = </span><span class="functiontext">Instructions::set_yn</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">); }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"images_path"</span><span class="plain">)) { </span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;images_path</span><span class="plain"> = </span><span class="functiontext">Instructions::set_path</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">settings</span><span class="plain">); }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"images_copy"</span><span class="plain">)) { </span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;images_copy</span><span class="plain"> = </span><span class="functiontext">Instructions::set_yn</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">); }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"inform_definitions_mode"</span><span class="plain">)) {</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;inform_definitions_mode</span><span class="plain"> = </span><span class="functiontext">Instructions::set_yn</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">); }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"javascript"</span><span class="plain">)) { </span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;javascript</span><span class="plain"> = </span><span class="functiontext">Instructions::set_yn</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">); }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"javascript_paste_method"</span><span class="plain">)) {</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"none"</span><span class="plain">)) { </span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;javascript_paste_method</span><span class="plain"> = </span><span class="constant">PASTEMODE_none</span><span class="plain">; }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"Andrew"</span><span class="plain">)) { </span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;javascript_paste_method</span><span class="plain"> = </span><span class="constant">PASTEMODE_Andrew</span><span class="plain">; }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"David"</span><span class="plain">)) { </span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;javascript_paste_method</span><span class="plain"> = </span><span class="constant">PASTEMODE_David</span><span class="plain">; }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="functiontext">Errors::in_text_file</span><span class="plain">(</span><span class="string">"no such Javascript paste mode"</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">);</span>
<span class="plain">}</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"link_to_extensions_index"</span><span class="plain">)) {</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;link_to_extensions_index</span><span class="plain"> = </span><span class="functiontext">Str::duplicate</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">); }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"manifest_leafname"</span><span class="plain">)) { </span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;manifest_leafname</span><span class="plain"> = </span><span class="functiontext">Str::duplicate</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">); }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"navigation"</span><span class="plain">)) {</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;navigation</span><span class="plain"> = </span><span class="functiontext">Nav::parse</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">);</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;navigation</span><span class="plain"> == </span><span class="identifier">NULL</span><span class="plain">) </span><span class="functiontext">Errors::in_text_file</span><span class="plain">(</span><span class="string">"no such navigation mode"</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">);</span>
<span class="plain">}</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"retina_images"</span><span class="plain">)) {</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;retina_images</span><span class="plain"> = </span><span class="functiontext">Instructions::set_yn</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">); }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"support_creation"</span><span class="plain">)) {</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;support_creation</span><span class="plain"> = </span><span class="functiontext">Instructions::set_yn</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">); }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"suppress_fonts"</span><span class="plain">)) {</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;suppress_fonts</span><span class="plain"> = </span><span class="functiontext">Instructions::set_yn</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">); }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"toc_granularity"</span><span class="plain">)) {</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;toc_granularity</span><span class="plain"> = </span><span class="functiontext">Instructions::set_range</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">val</span><span class="plain">, 1, 3, </span><span class="identifier">tfp</span><span class="plain">); }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"top_and_tail_sections"</span><span class="plain">)) {</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;top_and_tail_sections</span><span class="plain"> = </span><span class="functiontext">Instructions::set_file</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">settings</span><span class="plain">); }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"top_and_tail"</span><span class="plain">)) { </span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;top_and_tail</span><span class="plain"> = </span><span class="functiontext">Instructions::set_file</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">settings</span><span class="plain">); }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"treat_code_as_verbatim"</span><span class="plain">)) {</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;treat_code_as_verbatim</span><span class="plain"> = </span><span class="functiontext">Instructions::set_yn</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">); }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"wrapper"</span><span class="plain">)) {</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"EPUB"</span><span class="plain">)) { </span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;wrapper</span><span class="plain"> = </span><span class="constant">WRAPPER_epub</span><span class="plain">; }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"zip"</span><span class="plain">)) { </span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;wrapper</span><span class="plain"> = </span><span class="constant">WRAPPER_zip</span><span class="plain">; }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"none"</span><span class="plain">)) { </span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;wrapper</span><span class="plain"> = </span><span class="constant">WRAPPER_none</span><span class="plain">; }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="functiontext">Errors::in_text_file</span><span class="plain">(</span><span class="string">"no such wrapper"</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">);</span>
<span class="plain">}</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"XHTML"</span><span class="plain">)) { </span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;XHTML</span><span class="plain"> = </span><span class="functiontext">Instructions::set_yn</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">); }</span>
<span class="reserved">else</span><span class="plain"> </span><span class="functiontext">Errors::in_text_file</span><span class="plain">(</span><span class="string">"no such setting"</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">);</span>
</pre>
<p class="inwebparagraph"></p>
<p class="endnote">This code is used in <a href="#SP5_1_5">&#167;5.1.5</a>.</p>
<p class="inwebparagraph"><a id="SP3_1"></a><b>&#167;3.1. </b><code class="display">
&lt;<span class="cwebmacrodefn">Reconcile any conflicting instructions</span> <span class="cwebmacronumber">3.1</span>&gt; =
</code></p>
<pre class="displaydefn">
<span class="reserved">if</span><span class="plain"> (</span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;wrapper</span><span class="plain"> == </span><span class="constant">WRAPPER_epub</span><span class="plain">) {</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;javascript</span><span class="plain"> = </span><span class="constant">FALSE</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;javascript_paste_method</span><span class="plain"> = </span><span class="constant">PASTEMODE_none</span><span class="plain">;</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;examples_mode</span><span class="plain"> == </span><span class="constant">EXMODE_openable_internal</span><span class="plain">) {</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;examples_mode</span><span class="plain"> = </span><span class="constant">EXMODE_open_internal</span><span class="plain">;</span>
<span class="plain">}</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;contents_expandable</span><span class="plain"> = </span><span class="constant">FALSE</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;images_copy</span><span class="plain"> = 1;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;navigation</span><span class="plain"> = </span><span class="functiontext">Nav::for_ebook</span><span class="plain">(</span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;navigation</span><span class="plain">);</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;format</span><span class="plain"> = </span><span class="constant">HTML_FORMAT</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;XHTML</span><span class="plain"> = </span><span class="constant">TRUE</span><span class="plain">;</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;ebook</span><span class="plain"> = </span><span class="functiontext">Epub::new</span><span class="plain">(</span><span class="identifier">I</span><span class="string">"untitled ebook"</span><span class="plain">, </span><span class="string">""</span><span class="plain">);</span>
<span class="plain">}</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;javascript_paste_method</span><span class="plain"> != </span><span class="constant">PASTEMODE_none</span><span class="plain">)</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;javascript</span><span class="plain"> = </span><span class="constant">TRUE</span><span class="plain">;</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;examples_granularity</span><span class="plain"> == </span><span class="constant">SAME_AS_MAIN_GRANULARITY</span><span class="plain">)</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;examples_granularity</span><span class="plain"> = </span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;granularity</span><span class="plain">;</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;toc_granularity</span><span class="plain"> == </span><span class="constant">SAME_AS_MAIN_GRANULARITY</span><span class="plain">)</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;toc_granularity</span><span class="plain"> = </span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;granularity</span><span class="plain">;</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;examples_granularity</span><span class="plain"> &lt; </span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;granularity</span><span class="plain">) {</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;examples_granularity</span><span class="plain"> = </span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;granularity</span><span class="plain">;</span>
<span class="functiontext">Errors::nowhere</span><span class="plain">(</span><span class="string">"examples granularity can't be less than granularity"</span><span class="plain">);</span>
<span class="plain">}</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;toc_granularity</span><span class="plain"> &lt; </span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;granularity</span><span class="plain">) {</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;toc_granularity</span><span class="plain"> = </span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;granularity</span><span class="plain">;</span>
<span class="functiontext">Errors::nowhere</span><span class="plain">(</span><span class="string">"TOC granularity can't be less than granularity"</span><span class="plain">);</span>
<span class="plain">}</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;format</span><span class="plain"> == </span><span class="constant">PLAIN_FORMAT</span><span class="plain">)</span>
<span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;navigation</span><span class="plain"> = </span><span class="functiontext">Nav::for_plain_text</span><span class="plain">(</span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;navigation</span><span class="plain">);</span>
</pre>
<p class="inwebparagraph"></p>
<p class="endnote">This code is used in <a href="#SP3">&#167;3</a>.</p>
<p class="inwebparagraph"><a id="SP3_2"></a><b>&#167;3.2. </b><code class="display">
&lt;<span class="cwebmacrodefn">Declare the format and wrapper as symbols</span> <span class="cwebmacronumber">3.2</span>&gt; =
</code></p>
<pre class="displaydefn">
<span class="reserved">if</span><span class="plain"> (</span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;wrapper</span><span class="plain"> == </span><span class="constant">WRAPPER_epub</span><span class="plain">) </span><span class="functiontext">Symbols::declare_symbol</span><span class="plain">(</span><span class="identifier">I</span><span class="string">"EPUB"</span><span class="plain">);</span>
<span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;wrapper</span><span class="plain"> == </span><span class="constant">WRAPPER_zip</span><span class="plain">) </span><span class="functiontext">Symbols::declare_symbol</span><span class="plain">(</span><span class="identifier">I</span><span class="string">"zip"</span><span class="plain">);</span>
<span class="reserved">else</span><span class="plain"> </span><span class="functiontext">Symbols::declare_symbol</span><span class="plain">(</span><span class="identifier">I</span><span class="string">"unwrapped"</span><span class="plain">);</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;format</span><span class="plain"> == </span><span class="constant">HTML_FORMAT</span><span class="plain">) </span><span class="functiontext">Symbols::declare_symbol</span><span class="plain">(</span><span class="identifier">I</span><span class="string">"HTML"</span><span class="plain">);</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;format</span><span class="plain"> == </span><span class="constant">PLAIN_FORMAT</span><span class="plain">) </span><span class="functiontext">Symbols::declare_symbol</span><span class="plain">(</span><span class="identifier">I</span><span class="string">"text"</span><span class="plain">);</span>
</pre>
<p class="inwebparagraph"></p>
<p class="endnote">This code is used in <a href="#SP3">&#167;3</a>.</p>
<p class="inwebparagraph"><a id="SP6"></a><b>&#167;6. Parsing values. </b>Note the Unix-style conveniences for pathnames: an initial <code class="display"><span class="extract">~</span></code> means the
home folder, <code class="display"><span class="extract">~~</span></code> means the book folder.
</p>
<pre class="display">
<span class="reserved">pathname</span><span class="plain"> *</span><span class="functiontext">Instructions::set_path</span><span class="plain">(</span><span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">val</span><span class="plain">, </span><span class="reserved">settings_block</span><span class="plain"> *</span><span class="identifier">settings</span><span class="plain">) {</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::get_at</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, 0) == </span><span class="character">'~'</span><span class="plain">) {</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::get_at</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, 1) == </span><span class="character">'~'</span><span class="plain">) {</span>
<span class="reserved">if</span><span class="plain"> ((</span><span class="functiontext">Str::get_at</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, 2) == </span><span class="character">'/'</span><span class="plain">) || (</span><span class="functiontext">Str::get_at</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, 2) == </span><span class="constant">FOLDER_SEPARATOR</span><span class="plain">)) {</span>
<span class="identifier">TEMPORARY_TEXT</span><span class="plain">(</span><span class="identifier">t</span><span class="plain">);</span>
<span class="functiontext">Str::copy_tail</span><span class="plain">(</span><span class="identifier">t</span><span class="plain">, </span><span class="identifier">val</span><span class="plain">, 3);</span>
<span class="reserved">pathname</span><span class="plain"> *</span><span class="identifier">P</span><span class="plain"> = </span><span class="functiontext">Pathnames::from_text_relative</span><span class="plain">(</span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;book_folder</span><span class="plain">, </span><span class="identifier">t</span><span class="plain">);</span>
<span class="identifier">DISCARD_TEXT</span><span class="plain">(</span><span class="identifier">t</span><span class="plain">);</span>
<span class="reserved">return</span><span class="plain"> </span><span class="identifier">P</span><span class="plain">;</span>
<span class="plain">} </span><span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::get_at</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, 2) == 0) </span><span class="reserved">return</span><span class="plain"> </span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;book_folder</span><span class="plain">;</span>
<span class="plain">}</span>
<span class="reserved">if</span><span class="plain"> ((</span><span class="functiontext">Str::get_at</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, 1) == </span><span class="character">'/'</span><span class="plain">) || (</span><span class="functiontext">Str::get_at</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, 1) == </span><span class="constant">FOLDER_SEPARATOR</span><span class="plain">)) {</span>
<span class="identifier">TEMPORARY_TEXT</span><span class="plain">(</span><span class="identifier">t</span><span class="plain">);</span>
<span class="functiontext">Str::copy_tail</span><span class="plain">(</span><span class="identifier">t</span><span class="plain">, </span><span class="identifier">val</span><span class="plain">, 2);</span>
<span class="reserved">pathname</span><span class="plain"> *</span><span class="identifier">P</span><span class="plain"> = </span><span class="functiontext">Pathnames::from_text_relative</span><span class="plain">(</span><span class="identifier">home_path</span><span class="plain">, </span><span class="identifier">t</span><span class="plain">);</span>
<span class="identifier">DISCARD_TEXT</span><span class="plain">(</span><span class="identifier">t</span><span class="plain">);</span>
<span class="reserved">return</span><span class="plain"> </span><span class="identifier">P</span><span class="plain">;</span>
<span class="plain">} </span><span class="reserved">else</span><span class="plain"> </span><span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::get_at</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, 1) == 0) </span><span class="reserved">return</span><span class="plain"> </span><span class="identifier">home_path</span><span class="plain">;</span>
<span class="plain">}</span>
<span class="reserved">return</span><span class="plain"> </span><span class="functiontext">Pathnames::from_text</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">);</span>
<span class="plain">}</span>
</pre>
<p class="inwebparagraph"></p>
<p class="endnote">The function Instructions::set_path is used in <a href="#SP5_1">&#167;5.1</a>, <a href="#SP5_1_5_2">&#167;5.1.5.2</a>.</p>
<p class="inwebparagraph"><a id="SP7"></a><b>&#167;7. </b></p>
<pre class="display">
<span class="reserved">filename</span><span class="plain"> *</span><span class="functiontext">Instructions::set_file</span><span class="plain">(</span><span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">val</span><span class="plain">, </span><span class="reserved">settings_block</span><span class="plain"> *</span><span class="identifier">settings</span><span class="plain">) {</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::get_at</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, 0) == </span><span class="character">'~'</span><span class="plain">) {</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::get_at</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, 1) == </span><span class="character">'~'</span><span class="plain">) {</span>
<span class="reserved">if</span><span class="plain"> ((</span><span class="functiontext">Str::get_at</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, 2) == </span><span class="character">'/'</span><span class="plain">) || (</span><span class="functiontext">Str::get_at</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, 2) == </span><span class="constant">FOLDER_SEPARATOR</span><span class="plain">)) {</span>
<span class="identifier">TEMPORARY_TEXT</span><span class="plain">(</span><span class="identifier">t</span><span class="plain">);</span>
<span class="functiontext">Str::copy_tail</span><span class="plain">(</span><span class="identifier">t</span><span class="plain">, </span><span class="identifier">val</span><span class="plain">, 3);</span>
<span class="reserved">filename</span><span class="plain"> *</span><span class="identifier">F</span><span class="plain"> = </span><span class="functiontext">Filenames::from_text_relative</span><span class="plain">(</span><span class="identifier">settings</span><span class="plain">-</span><span class="element">&gt;book_folder</span><span class="plain">, </span><span class="identifier">t</span><span class="plain">);</span>
<span class="identifier">DISCARD_TEXT</span><span class="plain">(</span><span class="identifier">t</span><span class="plain">);</span>
<span class="reserved">return</span><span class="plain"> </span><span class="identifier">F</span><span class="plain">;</span>
<span class="plain">}</span>
<span class="plain">}</span>
<span class="reserved">if</span><span class="plain"> ((</span><span class="functiontext">Str::get_at</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, 1) == </span><span class="character">'/'</span><span class="plain">) || (</span><span class="functiontext">Str::get_at</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, 1) == </span><span class="constant">FOLDER_SEPARATOR</span><span class="plain">)) {</span>
<span class="identifier">TEMPORARY_TEXT</span><span class="plain">(</span><span class="identifier">t</span><span class="plain">);</span>
<span class="functiontext">Str::copy_tail</span><span class="plain">(</span><span class="identifier">t</span><span class="plain">, </span><span class="identifier">val</span><span class="plain">, 2);</span>
<span class="reserved">filename</span><span class="plain"> *</span><span class="identifier">F</span><span class="plain"> = </span><span class="functiontext">Filenames::from_text_relative</span><span class="plain">(</span><span class="identifier">home_path</span><span class="plain">, </span><span class="identifier">t</span><span class="plain">);</span>
<span class="identifier">DISCARD_TEXT</span><span class="plain">(</span><span class="identifier">t</span><span class="plain">);</span>
<span class="reserved">return</span><span class="plain"> </span><span class="identifier">F</span><span class="plain">;</span>
<span class="plain">}</span>
<span class="plain">}</span>
<span class="reserved">return</span><span class="plain"> </span><span class="functiontext">Filenames::from_text</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">);</span>
<span class="plain">}</span>
</pre>
<p class="inwebparagraph"></p>
<p class="endnote">The function Instructions::set_file is used in <a href="#SP5_1">&#167;5.1</a>, <a href="#SP5_1_5_2">&#167;5.1.5.2</a>.</p>
<p class="inwebparagraph"><a id="SP8"></a><b>&#167;8. </b>An integer value within or at the edges of the given range.
</p>
<pre class="display">
<span class="reserved">int</span><span class="plain"> </span><span class="functiontext">Instructions::set_range</span><span class="plain">(</span><span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">key</span><span class="plain">, </span><span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">val</span><span class="plain">,</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">min</span><span class="plain">, </span><span class="reserved">int</span><span class="plain"> </span><span class="identifier">max</span><span class="plain">, </span><span class="reserved">text_file_position</span><span class="plain"> *</span><span class="identifier">tfp</span><span class="plain">) {</span>
<span class="reserved">match_results</span><span class="plain"> </span><span class="identifier">mr</span><span class="plain"> = </span><span class="functiontext">Regexp::create_mr</span><span class="plain">();</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Regexp::match</span><span class="plain">(&amp;</span><span class="identifier">mr</span><span class="plain">, </span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"%d+"</span><span class="plain">)) {</span>
<span class="reserved">int</span><span class="plain"> </span><span class="identifier">v</span><span class="plain"> = </span><span class="functiontext">Str::atoi</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, 0);</span>
<span class="functiontext">Regexp::dispose_of</span><span class="plain">(&amp;</span><span class="identifier">mr</span><span class="plain">);</span>
<span class="reserved">if</span><span class="plain"> ((</span><span class="identifier">v</span><span class="plain"> &gt;= </span><span class="identifier">min</span><span class="plain">) &amp;&amp; (</span><span class="identifier">v</span><span class="plain"> &lt;= </span><span class="identifier">max</span><span class="plain">)) </span><span class="reserved">return</span><span class="plain"> </span><span class="identifier">v</span><span class="plain">;</span>
<span class="plain">}</span>
<span class="identifier">TEMPORARY_TEXT</span><span class="plain">(</span><span class="identifier">ERM</span><span class="plain">);</span>
<span class="identifier">WRITE_TO</span><span class="plain">(</span><span class="identifier">ERM</span><span class="plain">, </span><span class="string">"'%S' must a number from %d to %d, not '%S'"</span><span class="plain">, </span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">min</span><span class="plain">, </span><span class="identifier">max</span><span class="plain">, </span><span class="identifier">val</span><span class="plain">);</span>
<span class="functiontext">Errors::in_text_file_S</span><span class="plain">(</span><span class="identifier">ERM</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">);</span>
<span class="identifier">DISCARD_TEXT</span><span class="plain">(</span><span class="identifier">ERM</span><span class="plain">);</span>
<span class="reserved">return</span><span class="plain"> </span><span class="identifier">min</span><span class="plain">;</span>
<span class="plain">}</span>
</pre>
<p class="inwebparagraph"></p>
<p class="endnote">The function Instructions::set_range is used in <a href="#SP5_1_5_2">&#167;5.1.5.2</a>.</p>
<p class="inwebparagraph"><a id="SP9"></a><b>&#167;9. </b>A yes-no answer.
</p>
<pre class="display">
<span class="reserved">int</span><span class="plain"> </span><span class="functiontext">Instructions::set_yn</span><span class="plain">(</span><span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">key</span><span class="plain">, </span><span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">val</span><span class="plain">, </span><span class="reserved">text_file_position</span><span class="plain"> *</span><span class="identifier">tfp</span><span class="plain">) {</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"yes"</span><span class="plain">)) { </span><span class="reserved">return</span><span class="plain"> 1; }</span>
<span class="reserved">if</span><span class="plain"> (</span><span class="functiontext">Str::eq_wide_string</span><span class="plain">(</span><span class="identifier">val</span><span class="plain">, </span><span class="identifier">L</span><span class="string">"no"</span><span class="plain">)) { </span><span class="reserved">return</span><span class="plain"> 0; }</span>
<span class="identifier">TEMPORARY_TEXT</span><span class="plain">(</span><span class="identifier">ERM</span><span class="plain">);</span>
<span class="identifier">WRITE_TO</span><span class="plain">(</span><span class="identifier">ERM</span><span class="plain">, </span><span class="string">"'%S' must be 'yes' or 'no', not '%S'"</span><span class="plain">, </span><span class="identifier">key</span><span class="plain">, </span><span class="identifier">val</span><span class="plain">);</span>
<span class="functiontext">Errors::in_text_file_S</span><span class="plain">(</span><span class="identifier">ERM</span><span class="plain">, </span><span class="identifier">tfp</span><span class="plain">);</span>
<span class="identifier">DISCARD_TEXT</span><span class="plain">(</span><span class="identifier">ERM</span><span class="plain">);</span>
<span class="reserved">return</span><span class="plain"> 0;</span>
<span class="plain">}</span>
</pre>
<p class="inwebparagraph"></p>
<p class="endnote">The function Instructions::set_yn is used in <a href="#SP5_1_5_2">&#167;5.1.5.2</a>.</p>
<p class="inwebparagraph"><a id="SP10"></a><b>&#167;10. </b>For ebooks only.
</p>
<pre class="display">
<span class="reserved">typedef</span><span class="plain"> </span><span class="reserved">struct</span><span class="plain"> </span><span class="reserved">dc_metadatum</span><span class="plain"> {</span>
<span class="reserved">struct</span><span class="plain"> </span><span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">dc_key</span><span class="plain">;</span>
<span class="reserved">struct</span><span class="plain"> </span><span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">dc_val</span><span class="plain">;</span>
<span class="constant">MEMORY_MANAGEMENT</span>
<span class="plain">} </span><span class="reserved">dc_metadatum</span><span class="plain">;</span>
<span class="reserved">void</span><span class="plain"> </span><span class="functiontext">Instructions::create_ebook_metadata</span><span class="plain">(</span><span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">key</span><span class="plain">, </span><span class="reserved">text_stream</span><span class="plain"> *</span><span class="identifier">value</span><span class="plain">) {</span>
<span class="reserved">dc_metadatum</span><span class="plain"> *</span><span class="identifier">dcm</span><span class="plain"> = </span><span class="identifier">CREATE</span><span class="plain">(</span><span class="reserved">dc_metadatum</span><span class="plain">);</span>
<span class="identifier">dcm</span><span class="plain">-</span><span class="element">&gt;dc_key</span><span class="plain"> = </span><span class="functiontext">Str::duplicate</span><span class="plain">(</span><span class="identifier">key</span><span class="plain">);</span>
<span class="identifier">dcm</span><span class="plain">-</span><span class="element">&gt;dc_val</span><span class="plain"> = </span><span class="functiontext">Str::duplicate</span><span class="plain">(</span><span class="identifier">value</span><span class="plain">);</span>
<span class="plain">}</span>
<span class="reserved">void</span><span class="plain"> </span><span class="functiontext">Instructions::apply_ebook_metadata</span><span class="reserved">(ebook</span><span class="plain"> *</span><span class="identifier">E</span><span class="plain">) {</span>
<span class="reserved">dc_metadatum</span><span class="plain"> *</span><span class="identifier">dcm</span><span class="plain">;</span>
<span class="identifier">LOOP_OVER</span><span class="plain">(</span><span class="identifier">dcm</span><span class="plain">, </span><span class="reserved">dc_metadatum</span><span class="plain">) {</span>
<span class="identifier">wchar_t</span><span class="plain"> </span><span class="identifier">K</span><span class="plain">[1024];</span>
<span class="functiontext">Str::copy_to_wide_string</span><span class="plain">(</span><span class="identifier">K</span><span class="plain">, </span><span class="identifier">dcm</span><span class="plain">-</span><span class="element">&gt;dc_key</span><span class="plain">, 1024);</span>
<span class="functiontext">Epub::attach_metadata</span><span class="plain">(</span><span class="identifier">E</span><span class="plain">, </span><span class="identifier">K</span><span class="plain">, </span><span class="identifier">dcm</span><span class="plain">-</span><span class="element">&gt;dc_val</span><span class="plain">);</span>
<span class="plain">}</span>
<span class="plain">}</span>
</pre>
<p class="inwebparagraph"></p>
<p class="endnote">The function Instructions::create_ebook_metadata is used in <a href="#SP5_1">&#167;5.1</a>.</p>
<p class="endnote">The function Instructions::apply_ebook_metadata is used in 1/mn (<a href="1-mn.html#SP1_1">&#167;1.1</a>).</p>
<p class="endnote">The structure dc_metadatum is private to this section.</p>
<hr class="tocbar">
<ul class="toc"><li><a href="1-cnf.html">Back to 'Configuration'</a></li><li><a href="1-cs.html">Continue with 'Context Symbols'</a></li></ul><hr class="tocbar">
<!--End of weave-->
</body>
</html>