diff options
Diffstat (limited to 'org/ao_output_debugs.org')
| -rw-r--r-- | org/ao_output_debugs.org | 103 |
1 files changed, 86 insertions, 17 deletions
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"], |