diff options
Diffstat (limited to 'org')
| -rw-r--r-- | org/ao_abstract_doc_source.org | 62 | ||||
| -rw-r--r-- | org/ao_output_debugs.org | 103 | 
2 files changed, 86 insertions, 79 deletions
| diff --git a/org/ao_abstract_doc_source.org b/org/ao_abstract_doc_source.org index af47654..12fd0a5 100644 --- a/org/ao_abstract_doc_source.org +++ b/org/ao_abstract_doc_source.org @@ -763,68 +763,6 @@ auto document_the =  *** misc heading  #+name: abs_post -#+BEGIN_SRC d -debug(heading) {                         // heading -  string spc; -  foreach (o; document_the) { -    if (o.is_a == "heading") { -      switch (o.heading_attrib.lev_markup_number) { -      case 0: -      // case to!string(DocStructMarkupHeading.h_sect_A): -        spc=""; -        break; -      case 1: -      // case to!string(DocStructMarkupHeading.h_sect_B): -        spc="  "; -        break; -      case 2: -      // case to!string(DocStructMarkupHeading.h_sect_C): -        spc="    "; -        break; -      case 3: -      // case to!string(DocStructMarkupHeading.h_sect_D): -        spc="      "; -        break; -      case 4: -      // case to!string(DocStructMarkupHeading.h_text_1): -        spc="        "; -        break; -      case 5: -      // case to!string(DocStructMarkupHeading.h_text_2): -        spc="          "; -        break; -      case 6: -      // case to!string(DocStructMarkupHeading.h_text_3): -        spc="            "; -        break; -      case 7: -      // case to!string(DocStructMarkupHeading.h_text_4): -        spc="              "; -        break; -      case 8: -      // case to!string(DocStructMarkupHeading.h_text_5): -        spc="                "; -        break; -      default: -        spc=""; -        break; -      } -      // writeln( -      //   spc, "* ", " ", -      //   o -      // ); -      writefln( -        "%s* %s\n                (markup level: %s; collapsed level: %s)", -        spc, -        strip(o.object), -        o.heading_attrib.lev_markup_number, -        o.heading_attrib.lev_collapsed_number -      ); -      // writeln(spc, "* ", to!string(o["lev_collapsed_number"]), " ", strip(o["obj"])); -      // tell_l("yellow", spc, strip(o["obj"])); -    } -  } -}  destroy(contents_the_objects);  destroy(endnotes_section);  destroy(bookindex_section); diff --git a/org/ao_output_debugs.org b/org/ao_output_debugs.org index c52b622..4b79a54 100644 --- a/org/ao_output_debugs.org +++ b/org/ao_output_debugs.org @@ -319,32 +319,72 @@ debug(biblio) {  #+END_SRC -** (summary) [+1]                                                   :summary: +** (headings)                                                     :headings:  #+name: ao_output_debugs  #+BEGIN_SRC d -debug(summary) { -  string[string] check = [ -    "last_obj_cite_number" : "NA [debug \"checkdoc\" not run]", -  ]; -#+END_SRC - -*** (checkdoc)                                                     :checkdoc: - -#+name: ao_output_debugs_summary -#+BEGIN_SRC d -debug(checkdoc) { -  foreach (obj; contents) { -    if (obj.use == "content") { -      if (!empty(obj.obj_cite_number)) { -        check["last_obj_cite_number"] = obj.obj_cite_number; +debug(heading) {                         // heading +  string spc; +  foreach (o; contents) { +    if (o.is_a == "heading") { +      switch (o.heading_attrib.lev_markup_number) { +      case 0: +      // case to!string(DocStructMarkupHeading.h_sect_A): +        spc=""; +        break; +      case 1: +      // case to!string(DocStructMarkupHeading.h_sect_B): +        spc="  "; +        break; +      case 2: +      // case to!string(DocStructMarkupHeading.h_sect_C): +        spc="    "; +        break; +      case 3: +      // case to!string(DocStructMarkupHeading.h_sect_D): +        spc="      "; +        break; +      case 4: +      // case to!string(DocStructMarkupHeading.h_text_1): +        spc="        "; +        break; +      case 5: +      // case to!string(DocStructMarkupHeading.h_text_2): +        spc="          "; +        break; +      case 6: +      // case to!string(DocStructMarkupHeading.h_text_3): +        spc="            "; +        break; +      case 7: +      // case to!string(DocStructMarkupHeading.h_text_4): +        spc="              "; +        break; +      case 8: +      // case to!string(DocStructMarkupHeading.h_text_5): +        spc="                "; +        break; +      default: +        spc=""; +        break;        } +      // writeln( +      //   spc, "* ", " ", +      //   o +      // ); +      writefln( +        "%s* %s\n                (markup level: %s; collapsed level: %s)", +        spc, +        strip(o.object), +        o.heading_attrib.lev_markup_number, +        o.heading_attrib.lev_collapsed_number +      );      }    }  }  #+END_SRC -*** (headings)                                                     :headings: +** (summary) [+1]                                                   :summary:  #+name: ao_output_debugs_summary  #+BEGIN_SRC d @@ -368,6 +408,35 @@ debug(headings) {      }    }  } +#+END_SRC + +#+name: ao_output_debugs +#+BEGIN_SRC d +debug(summary) { +  string[string] check = [ +    "last_obj_cite_number" : "NA [debug \"checkdoc\" not run]", +  ]; +#+END_SRC + +*** (checkdoc)                                                     :checkdoc: + +#+name: ao_output_debugs_summary +#+BEGIN_SRC d +debug(checkdoc) { +  foreach (obj; contents) { +    if (obj.use == "content") { +      if (!empty(obj.obj_cite_number)) { +        check["last_obj_cite_number"] = obj.obj_cite_number; +      } +    } +  } +} +#+END_SRC + +*** output summary + +#+name: ao_output_debugs_summary +#+BEGIN_SRC d  writefln(    "%s%s%s\n%s\n%s%s\n%s%s\n%s%s\n%s:%s",    scr_txt_color["green"], | 
