aboutsummaryrefslogtreecommitdiffhomepage
path: root/org
diff options
context:
space:
mode:
Diffstat (limited to 'org')
-rw-r--r--org/meta_abstraction.org331
-rw-r--r--org/sdp.org66
2 files changed, 225 insertions, 172 deletions
diff --git a/org/meta_abstraction.org b/org/meta_abstraction.org
index e3b7b5f..1ddec75 100644
--- a/org/meta_abstraction.org
+++ b/org/meta_abstraction.org
@@ -198,6 +198,8 @@ enum DocStructMarkupHeading {
h_text_5, // extra level, drop
content_non_header
} // header section A-D; header text 1-4
+enum OCNstatus { inc, exc, bkidx, closing, reset, }
+enum OCNtype { ocn, non, bkidx, }
/+ biblio variables +/
string biblio_tag_name, biblio_tag_entry, st;
string[] biblio_arr_json;
@@ -218,7 +220,7 @@ string content_non_header = "8";
static auto obj_im = ObjInlineMarkup();
static auto obj_att = ObjAttributes();
/+ ocn +/
-int obj_cite_number, obj_cite_number_;
+int obj_cite_digit, obj_cite_digit_, obj_cite_digit_bkidx;
auto object_citation_number = OCNemitter();
int[] dom_markedup = [ 0, 0, 0, 0, 0, 0, 0, 0, 0,];
int[] dom_markedup_buffer = [ 0, 0, 0, 0, 0, 0, 0, 0, 0,];
@@ -684,7 +686,7 @@ if there is a glossary section you need to:
comp_obj_para.bullet = bullet;
the_glossary_section ~= comp_obj_para;
}
- obj_type_status["ocn_status"] = TriState.off;
+ obj_type_status["ocn_status"] = OCNstatus.inc;
}
continue;
#+END_SRC
@@ -790,7 +792,7 @@ if there is a blurb section you need to:
comp_obj_para.bullet = bullet;
the_blurb_section ~= comp_obj_para;
}
- obj_type_status["ocn_status"] = TriState.off;
+ obj_type_status["ocn_status"] = OCNstatus.inc;
}
continue;
#+END_SRC
@@ -878,7 +880,7 @@ if (line.matchFirst(rgx.block_poem_open)) {
/+ poem to verse exceptions! +/
object_reset(an_object);
processing.remove("verse");
- obj_cite_number_poem["start"] = obj_cite_number.to!string;
+ obj_cite_number_poem["start"] = obj_cite_digit.to!string;
}
_start_block_(line, obj_type_status, obj_cite_number_poem);
continue;
@@ -1031,7 +1033,7 @@ _block_flag_line_empty_(
an_object,
the_document_body_section,
bookindex_unordered_hashes,
- obj_cite_number,
+ obj_cite_digit,
comp_obj_heading,
cntr,
obj_type_status,
@@ -1063,9 +1065,9 @@ assert(
if ((obj_type_status["heading"] == State.on)
&& (line_occur["heading"] > State.off)) {
/+ heading object (current line empty) +/
- obj_cite_number = (an_object["lev_markup_number"].to!int == 0)
- ? (ocn_emit(3))
- : (obj_cite_number = ocn_emit(obj_type_status["ocn_status"]));
+ obj_cite_digit = (an_object["lev_markup_number"].to!int == 0)
+ ? (ocn_emit(OCNstatus.reset))
+ : (obj_cite_digit = ocn_emit(obj_type_status["ocn_status"]));
an_object["is"] = "heading";
an_object_key="body_nugget";
auto substantive_object_and_anchor_tags_tuple =
@@ -1078,7 +1080,7 @@ if ((obj_type_status["heading"] == State.on)
anchor_tag_ = anchor_tags[0];
} else if (an_object["lev_markup_number"].to!int > 4) {
segment_anchor_tag_that_object_belongs_to = anchor_tag_;
- segment_anchor_tag_that_object_belongs_to_uri = anchor_tag_ ~ ".fnSuffix#" ~ obj_cite_number.to!string;
+ segment_anchor_tag_that_object_belongs_to_uri = anchor_tag_ ~ ".fnSuffix#" ~ obj_cite_digit.to!string;
} else if (an_object["lev_markup_number"].to!int < 4) {
string segn;
switch (an_object["lev_markup_number"].to!int) {
@@ -1106,9 +1108,9 @@ if ((obj_type_status["heading"] == State.on)
an_object["bookindex_nugget"] =
("bookindex_nugget" in an_object) ? an_object["bookindex_nugget"] : "";
bookindex_unordered_hashes =
- bookindex_extract_hash.bookindex_nugget_hash(an_object["bookindex_nugget"], obj_cite_number, segment_anchor_tag_that_object_belongs_to);
+ bookindex_extract_hash.bookindex_nugget_hash(an_object["bookindex_nugget"], obj_cite_digit, segment_anchor_tag_that_object_belongs_to);
/+ (incrementally build toc) table of contents here! +/
- _anchor_tag=to!string(obj_cite_number);
+ _anchor_tag=to!string(obj_cite_digit);
the_table_of_contents_section = obj_im.table_of_contents_gather_headings(
an_object,
dochead_make_aa,
@@ -1129,7 +1131,7 @@ if ((obj_type_status["heading"] == State.on)
an_object["lev_markup_number"], // string
an_object["lev_collapsed_number"], // string
segment_anchor_tag_that_object_belongs_to, // string
- obj_cite_number, // int
+ obj_cite_digit, // int
cntr, // int
heading_ptr, // int
lv_ancestors_txt, // string[]
@@ -1162,17 +1164,17 @@ if ((obj_type_status["heading"] == State.on)
} else if ((obj_type_status["para"] == State.on)
&& (line_occur["para"] > State.off)) {
/+ paragraph object (current line empty) +/
- obj_cite_number = ocn_emit(obj_type_status["ocn_status"]);
+ obj_cite_digit = ocn_emit(obj_type_status["ocn_status"]);
an_object["bookindex_nugget"] =
("bookindex_nugget" in an_object) ? an_object["bookindex_nugget"] : "";
bookindex_unordered_hashes =
- bookindex_extract_hash.bookindex_nugget_hash(an_object["bookindex_nugget"], obj_cite_number, segment_anchor_tag_that_object_belongs_to);
+ bookindex_extract_hash.bookindex_nugget_hash(an_object["bookindex_nugget"], obj_cite_digit, segment_anchor_tag_that_object_belongs_to);
an_object["is"] = "para";
auto comp_obj_heading =
node_construct.node_location_emitter(
content_non_header,
segment_anchor_tag_that_object_belongs_to,
- obj_cite_number,
+ obj_cite_digit,
cntr,
heading_ptr-1,
an_object["is"],
@@ -1187,8 +1189,8 @@ if ((obj_type_status["heading"] == State.on)
comp_obj_para.is_of = "para";
comp_obj_para.is_a = "para";
comp_obj_para.text = an_object["substantive"].to!string.strip;
- comp_obj_para.ocn = obj_cite_number;
- comp_obj_para.obj_cite_number = (obj_cite_number==0) ? "" : obj_cite_number.to!string;
+ comp_obj_para.ocn = obj_cite_digit;
+ comp_obj_para.obj_cite_number = (obj_cite_digit==0) ? "" : obj_cite_digit.to!string;
comp_obj_para.indent_hang = indent["hang_position"];
comp_obj_para.indent_base = indent["base_position"];
comp_obj_para.bullet = bullet;
@@ -1242,7 +1244,7 @@ if (the_document_body_section.length > 0) {
note_section.gather_notes_for_endnote_section(
the_document_body_section,
segment_anchor_tag_that_object_belongs_to,
- to!int(i),
+ (i).to!int,
);
}
}
@@ -1257,7 +1259,7 @@ if (the_document_body_section.length > 0) {
note_section.gather_notes_for_endnote_section(
the_document_body_section,
segment_anchor_tag_that_object_belongs_to,
- to!int(the_document_body_section.length-1),
+ (the_document_body_section.length-1).to!int,
);
}
}
@@ -1284,10 +1286,10 @@ if (the_document_body_section.length > 0) {
#+name: abs_post
#+BEGIN_SRC d
auto en_tuple =
- note_section.endnote_objects(obj_cite_number, opt_action);
+ note_section.endnote_objects(obj_cite_digit, opt_action);
static assert(!isTypeTuple!(en_tuple));
auto the_endnotes_section = en_tuple[0];
-obj_cite_number = en_tuple[1];
+obj_cite_digit = en_tuple[1];
debug(endnotes) {
writefln(
"%s %s",
@@ -1476,13 +1478,13 @@ auto bi = BookIndexReportSection();
auto bi_tuple =
bi.bookindex_build_abstraction_section(
bookindex_unordered_hashes,
- obj_cite_number,
+ obj_cite_digit,
opt_action,
);
destroy(bookindex_unordered_hashes);
static assert(!isTypeTuple!(bi_tuple));
auto the_bookindex_section = bi_tuple[0];
-obj_cite_number = bi_tuple[1];
+obj_cite_digit = bi_tuple[1];
debug(bookindex) {
foreach (bi_entry; the_bookindex_section["seg"]) {
writeln(bi_entry);
@@ -1997,6 +1999,9 @@ if (the_glossary_section.length > 1) {
debug(dom) {
writeln(obj.text);
}
+ obj_cite_digit = ocn_emit(OCNstatus.inc);
+ obj.ocn = obj_cite_digit;
+ obj.obj_cite_number = obj_cite_digit.to!string;
if (obj.heading_lev_markup <= 4) {
segnames_0_4 ~= obj.segment_anchor_tag;
if (obj.heading_lev_markup == 4) {
@@ -2018,6 +2023,10 @@ if (the_glossary_section.length > 1) {
obj = obj_dom_set_collapsed_tags(obj, dom_collapsed, obj.heading_lev_collapsed);
}
obj = obj_heading_ancestors(obj, lv_ancestors_txt);
+ } else if (obj.is_a == "glossary") {
+ obj_cite_digit = ocn_emit(OCNstatus.inc);
+ obj.ocn = obj_cite_digit;
+ obj.obj_cite_number = obj_cite_digit.to!string;
}
}
}
@@ -2034,6 +2043,9 @@ if (the_bibliography_section.length > 1) {
debug(dom) {
writeln(obj.text);
}
+ obj_cite_digit = ocn_emit(OCNstatus.inc);
+ obj.ocn = obj_cite_digit;
+ obj.obj_cite_number = obj_cite_digit.to!string;
if (obj.heading_lev_markup <= 4) {
segnames_0_4 ~= obj.segment_anchor_tag;
if (obj.heading_lev_markup == 4) {
@@ -2055,6 +2067,10 @@ if (the_bibliography_section.length > 1) {
obj = obj_dom_set_collapsed_tags(obj, dom_collapsed, obj.heading_lev_collapsed);
}
obj = obj_heading_ancestors(obj, lv_ancestors_txt);
+ } else if (obj.is_a == "bibliography") {
+ obj_cite_digit = ocn_emit(OCNstatus.inc);
+ obj.ocn = obj_cite_digit;
+ obj.obj_cite_number = obj_cite_digit.to!string;
}
}
}
@@ -2065,6 +2081,9 @@ if (the_bibliography_section.length > 1) {
#+name: abs_post
#+BEGIN_SRC d
/+ optional only one 1~ level +/
+int ocn_ = obj_cite_digit;
+int ocn_bkidx_ = 0;
+int ocn_bidx_;
if (the_bookindex_section["scroll"].length > 1) {
/+ scroll +/
dom_markedup_buffer = dom_markedup.dup;
@@ -2073,6 +2092,9 @@ if (the_bookindex_section["scroll"].length > 1) {
if (obj.is_a == "heading") {
debug(dom) {
}
+ obj_cite_digit = ocn_emit(OCNstatus.inc);
+ obj.ocn = obj_cite_digit;
+ obj.obj_cite_number = obj_cite_digit.to!string;
if (obj.heading_lev_markup <= 4) {
segnames_0_4 ~= obj.segment_anchor_tag;
if (obj.heading_lev_markup == 4) {
@@ -2094,6 +2116,10 @@ if (the_bookindex_section["scroll"].length > 1) {
obj = obj_dom_set_collapsed_tags(obj, dom_collapsed, obj.heading_lev_collapsed);
}
obj = obj_heading_ancestors(obj, lv_ancestors_txt);
+ } else if (obj.is_a == "bookindex") {
+ obj_cite_digit_bkidx = ocn_emit(OCNstatus.bkidx);
+ obj.obj_cite_number_bkidx = obj_cite_digit_bkidx.to!string; // FIX need to distinguish from regular ocn
+ obj.obj_cite_number_type = OCNtype.bkidx;
}
}
/+ seg +/
@@ -2104,6 +2130,8 @@ if (the_bookindex_section["scroll"].length > 1) {
debug(dom) {
writeln(obj.text);
}
+ obj.ocn = ++ocn_;
+ obj.obj_cite_number = obj.ocn.to!string;
if (obj.heading_lev_markup <= 4) {
segnames_0_4 ~= obj.segment_anchor_tag;
if (obj.heading_lev_markup == 4) {
@@ -2125,8 +2153,14 @@ if (the_bookindex_section["scroll"].length > 1) {
obj = obj_dom_set_collapsed_tags(obj, dom_collapsed, obj.heading_lev_collapsed);
}
obj = obj_heading_ancestors(obj, lv_ancestors_txt);
+ } else if (obj.is_a == "bookindex") {
+ ocn_bidx_ = ++ocn_bkidx_;
+ obj.obj_cite_number_bkidx = ocn_bidx_.to!string; // FIX need to distinguish from regular ocn
+ obj.obj_cite_number_type = OCNtype.bkidx;
}
}
+ assert(obj_cite_digit == ocn_);
+ assert(obj_cite_digit_bkidx == ocn_bidx_);
}
#+END_SRC
@@ -2141,6 +2175,9 @@ if (the_blurb_section.length > 1) {
debug(dom) {
writeln(obj.text);
}
+ obj_cite_digit = ocn_emit(OCNstatus.inc);
+ obj.ocn = obj_cite_digit;
+ obj.obj_cite_number = obj_cite_digit.to!string;
if (obj.heading_lev_markup <= 4) {
segnames_0_4 ~= obj.segment_anchor_tag;
if (obj.heading_lev_markup == 4) {
@@ -2162,6 +2199,10 @@ if (the_blurb_section.length > 1) {
obj = obj_dom_set_collapsed_tags(obj, dom_collapsed, obj.heading_lev_collapsed);
}
obj = obj_heading_ancestors(obj, lv_ancestors_txt);
+ } else if (obj.is_a == "blurb") {
+ obj_cite_digit = ocn_emit(OCNstatus.exc);
+ obj.obj_cite_number_non = obj_cite_digit.to!string;
+ obj.obj_cite_number_type = OCNtype.non;
}
}
}
@@ -2288,8 +2329,8 @@ destroy(html_segnames);
destroy(bookindex_unordered_hashes);
destroy(an_object);
biblio_arr_json = [];
-obj_cite_number=0;
-obj_cite_number_=0;
+obj_cite_digit=0;
+obj_cite_digit_=0;
html_segnames_ptr=0;
html_segnames_ptr_cntr=0;
content_non_header = "8";
@@ -2389,11 +2430,11 @@ static auto _check_ocn_status_(L,T)(
} else {
if (obj_type_status["ocn_status_off_for_multiple_objects"] == TriState.off) {
if (line.matchFirst(rgx.obj_cite_number_off)) {
- obj_type_status["ocn_status"] = TriState.on;
+ obj_type_status["ocn_status"] = OCNstatus.exc;
} else if (line.matchFirst(rgx.obj_cite_number_off_dh)) {
- obj_type_status["ocn_status"] = TriState.closing;
+ obj_type_status["ocn_status"] = OCNstatus.closing;
} else {
- obj_type_status["ocn_status"] = TriState.off;
+ obj_type_status["ocn_status"] = OCNstatus.inc;
}
} else {
obj_type_status["ocn_status"] =
@@ -2403,7 +2444,7 @@ static auto _check_ocn_status_(L,T)(
} else if ((!line.empty) && (obj_type_status["ocn_status_off_for_multiple_objects"] > TriState.off)) {
if (line.matchFirst(rgx.obj_cite_number_off_block_close)) {
obj_type_status["ocn_status_off_for_multiple_objects"] = TriState.off;
- obj_type_status["ocn_status"] = TriState.off;
+ obj_type_status["ocn_status"] = OCNstatus.inc;
debug(ocnoff) {
writeln(line);
}
@@ -2460,7 +2501,7 @@ void _start_block_(L,T,N)(
);
}
obj_cite_number_poem["start"] =
- obj_cite_number.to!string;
+ obj_cite_digit.to!string;
obj_type_status["blocks"] = TriState.on;
obj_type_status["verse_new"] = State.on;
obj_type_status["poem"] = TriState.on;
@@ -2545,7 +2586,7 @@ void _start_block_(L,T,N)(
line
);
}
- obj_cite_number_poem["start"] = obj_cite_number.to!string;
+ obj_cite_number_poem["start"] = obj_cite_digit.to!string;
obj_type_status["blocks"] = TriState.on;
obj_type_status["verse_new"] = State.on;
obj_type_status["poem"] = TriState.on;
@@ -3072,14 +3113,14 @@ void _poem_block_(L,O,T,C,N,Ma)(
writeln(__LINE__);
writefln(
"* %s %s",
- obj_cite_number,
+ obj_cite_digit,
line
);
}
if (an_object.length > 0) {
debug(poem) { // poem (curly) close
writeln(
- obj_cite_number,
+ obj_cite_digit,
an_object[an_object_key]
);
}
@@ -3093,8 +3134,8 @@ void _poem_block_(L,O,T,C,N,Ma)(
comp_obj_block.of_section = "body";
comp_obj_block.is_of = "block";
comp_obj_block.is_a = "verse";
- comp_obj_block.ocn = obj_cite_number;
- comp_obj_block.obj_cite_number = (obj_cite_number==0) ? "" : obj_cite_number.to!string;
+ comp_obj_block.ocn = obj_cite_digit;
+ comp_obj_block.obj_cite_number = (obj_cite_digit==0) ? "" : obj_cite_digit.to!string;
comp_obj_block.text = an_object["substantive"];
comp_obj_block.inline_notes_reg = substantive_obj_misc_tuple[sObj.notes_reg];
comp_obj_block.inline_notes_star = substantive_obj_misc_tuple[sObj.notes_star];
@@ -3106,14 +3147,14 @@ void _poem_block_(L,O,T,C,N,Ma)(
++cntr;
}
obj_cite_number_poem["end"] =
- obj_cite_number.to!string;
+ obj_cite_digit.to!string;
obj_type_status["blocks"] = TriState.closing;
obj_type_status["poem"] = TriState.closing;
obj_type_status["curly_poem"] = TriState.off;
} else {
processing["verse"] ~= line ~= "\n";
if (obj_type_status["verse_new"] == State.on) {
- obj_cite_number =
+ obj_cite_digit =
ocn_emit(obj_type_status["ocn_status"]);
obj_type_status["verse_new"] = State.off;
} else if (line.matchFirst(rgx.newline_eol_delimiter_only)) {
@@ -3127,7 +3168,7 @@ void _poem_block_(L,O,T,C,N,Ma)(
debug(poem) { // poem verse
writefln(
"* %s curly\n%s",
- obj_cite_number,
+ obj_cite_digit,
an_object[an_object_key]
);
}
@@ -3136,7 +3177,7 @@ void _poem_block_(L,O,T,C,N,Ma)(
auto comp_obj_location = node_construct.node_location_emitter(
content_non_header,
segment_anchor_tag_that_object_belongs_to,
- obj_cite_number,
+ obj_cite_digit,
cntr,
heading_ptr-1,
an_object["is"]
@@ -3150,8 +3191,8 @@ void _poem_block_(L,O,T,C,N,Ma)(
comp_obj_block.of_section = "body";
comp_obj_block.is_of = "block";
comp_obj_block.is_a = "verse";
- comp_obj_block.ocn = obj_cite_number;
- comp_obj_block.obj_cite_number = (obj_cite_number==0) ? "" : obj_cite_number.to!string;
+ comp_obj_block.ocn = obj_cite_digit;
+ comp_obj_block.obj_cite_number = (obj_cite_digit==0) ? "" : obj_cite_digit.to!string;
comp_obj_block.text = an_object["substantive"];
comp_obj_block.inline_notes_reg = substantive_obj_misc_tuple[sObj.notes_reg];
comp_obj_block.inline_notes_star = substantive_obj_misc_tuple[sObj.notes_star];
@@ -3177,7 +3218,7 @@ void _poem_block_(L,O,T,C,N,Ma)(
if (an_object.length > 0) {
debug(poem) { // poem (tic) close
writeln(__LINE__);
- writeln(obj_cite_number, line);
+ writeln(obj_cite_digit, line);
}
processing.remove("verse");
an_object["is"] = "verse";
@@ -3190,14 +3231,14 @@ void _poem_block_(L,O,T,C,N,Ma)(
comp_obj_block.of_section = "body";
comp_obj_block.is_of = "block";
comp_obj_block.is_a = "verse";
- comp_obj_block.ocn = obj_cite_number;
- comp_obj_block.obj_cite_number = (obj_cite_number==0) ? "" : obj_cite_number.to!string;
+ comp_obj_block.ocn = obj_cite_digit;
+ comp_obj_block.obj_cite_number = (obj_cite_digit==0) ? "" : obj_cite_digit.to!string;
comp_obj_block.text = an_object["substantive"];
comp_obj_block.inline_notes_reg = substantive_obj_misc_tuple[sObj.notes_reg];
comp_obj_block.inline_notes_star = substantive_obj_misc_tuple[sObj.notes_star];
comp_obj_block.inline_links = substantive_obj_misc_tuple[sObj.links];
the_document_body_section ~= comp_obj_block;
- obj_cite_number_poem["end"] = obj_cite_number.to!string;
+ obj_cite_number_poem["end"] = obj_cite_digit.to!string;
object_reset(an_object);
processing.remove("verse");
++cntr;
@@ -3208,7 +3249,7 @@ void _poem_block_(L,O,T,C,N,Ma)(
} else {
processing["verse"] ~= line ~= "\n";
if (obj_type_status["verse_new"] == State.on) {
- obj_cite_number =
+ obj_cite_digit =
ocn_emit(obj_type_status["ocn_status"]);
obj_type_status["verse_new"] = State.off;
} else if (line.matchFirst(rgx.newline_eol_delimiter_only)) {
@@ -3222,7 +3263,7 @@ void _poem_block_(L,O,T,C,N,Ma)(
debug(poem) { // poem (tic) close
writefln(
"* %s tic\n%s",
- obj_cite_number,
+ obj_cite_digit,
an_object[an_object_key]
);
}
@@ -3232,7 +3273,7 @@ void _poem_block_(L,O,T,C,N,Ma)(
node_construct.node_location_emitter(
content_non_header,
segment_anchor_tag_that_object_belongs_to,
- obj_cite_number,
+ obj_cite_digit,
cntr,
heading_ptr-1,
an_object["is"]
@@ -3246,8 +3287,8 @@ void _poem_block_(L,O,T,C,N,Ma)(
comp_obj_block.of_section = "body";
comp_obj_block.is_of = "block";
comp_obj_block.is_a = "verse";
- comp_obj_block.ocn = obj_cite_number;
- comp_obj_block.obj_cite_number = (obj_cite_number==0) ? "" : obj_cite_number.to!string;
+ comp_obj_block.ocn = obj_cite_digit;
+ comp_obj_block.obj_cite_number = (obj_cite_digit==0) ? "" : obj_cite_digit.to!string;
comp_obj_block.text = an_object["substantive"];
comp_obj_block.inline_notes_reg = substantive_obj_misc_tuple[sObj.notes_reg];
comp_obj_block.inline_notes_star = substantive_obj_misc_tuple[sObj.notes_star];
@@ -3317,7 +3358,7 @@ void _table_block_(L,O,T,Ma)(
line,
an_object,
the_document_body_section,
- obj_cite_number,
+ obj_cite_digit,
comp_obj_heading,
cntr,
obj_type_status,
@@ -3361,20 +3402,20 @@ void _table_closed_make_special_notation_table_(
char[] line,
return ref string[string] an_object,
return ref ObjGenericComposite[] the_document_body_section,
- return ref int obj_cite_number,
+ return ref int obj_cite_digit,
return ref ObjGenericComposite _comp_obj_heading,
return ref int cntr,
return ref int[string] obj_type_status,
string[string][string] dochead_make_aa,
) {
comp_obj_block = comp_obj_block.init;
- obj_cite_number =
+ obj_cite_digit =
ocn_emit(obj_type_status["ocn_status"]);
auto comp_obj_location =
node_construct.node_location_emitter(
content_non_header,
segment_anchor_tag_that_object_belongs_to,
- obj_cite_number,
+ obj_cite_digit,
cntr,
heading_ptr-1,
"table"
@@ -3383,8 +3424,8 @@ void _table_closed_make_special_notation_table_(
auto substantive_obj_misc_tuple =
obj_im.obj_inline_markup_and_anchor_tags_and_misc(an_object, "body_nugget", dochead_make_aa);
an_object["substantive"] = substantive_obj_misc_tuple[sObj.content];
- comp_obj_block.ocn = obj_cite_number;
- comp_obj_block.obj_cite_number = (obj_cite_number==0) ? "" : obj_cite_number.to!string;
+ comp_obj_block.ocn = obj_cite_digit;
+ comp_obj_block.obj_cite_number = (obj_cite_digit==0) ? "" : obj_cite_digit.to!string;
comp_obj_block = table_instructions(comp_obj_block, an_object["table_head"]);
comp_obj_block = table_substantive_munge_special(comp_obj_block, an_object["substantive"]);
the_document_body_section ~= comp_obj_block;
@@ -3406,7 +3447,7 @@ void _block_flag_line_empty_(B)(
return ref string[string] an_object,
return ref ObjGenericComposite[] the_document_body_section,
return ref string[][string][string] bookindex_unordered_hashes,
- return ref int obj_cite_number,
+ return ref int obj_cite_digit,
return ref ObjGenericComposite _comp_obj_heading,
return ref int cntr,
return ref int[string] obj_type_status,
@@ -3430,14 +3471,14 @@ void _block_flag_line_empty_(B)(
#+name: abs_functions_block_line_status_empty
#+BEGIN_SRC d
if (obj_type_status["quote"] == TriState.closing) {
- obj_cite_number =
+ obj_cite_digit =
ocn_emit(obj_type_status["ocn_status"]);
an_object["bookindex_nugget"] =
("bookindex_nugget" in an_object) ? an_object["bookindex_nugget"] : "";
bookindex_unordered_hashes =
bookindex_extract_hash.bookindex_nugget_hash(
an_object["bookindex_nugget"],
- obj_cite_number,
+ obj_cite_digit,
segment_anchor_tag_that_object_belongs_to
);
an_object["is"] = "quote";
@@ -3445,7 +3486,7 @@ void _block_flag_line_empty_(B)(
node_construct.node_location_emitter(
content_non_header,
segment_anchor_tag_that_object_belongs_to,
- obj_cite_number,
+ obj_cite_digit,
cntr,
heading_ptr-1,
an_object["is"]
@@ -3459,8 +3500,8 @@ void _block_flag_line_empty_(B)(
comp_obj_block.of_section = "body";
comp_obj_block.is_of = "block";
comp_obj_block.is_a = "quote";
- comp_obj_block.ocn = obj_cite_number;
- comp_obj_block.obj_cite_number = (obj_cite_number==0) ? "" : obj_cite_number.to!string;
+ comp_obj_block.ocn = obj_cite_digit;
+ comp_obj_block.obj_cite_number = (obj_cite_digit==0) ? "" : obj_cite_digit.to!string;
comp_obj_block.text = an_object["substantive"];
comp_obj_block.inline_notes_reg = substantive_obj_misc_tuple[sObj.notes_reg];
comp_obj_block.inline_notes_star = substantive_obj_misc_tuple[sObj.notes_star];
@@ -3478,14 +3519,14 @@ void _block_flag_line_empty_(B)(
#+name: abs_functions_block_line_status_empty
#+BEGIN_SRC d
} else if (obj_type_status["group"] == TriState.closing) {
- obj_cite_number =
+ obj_cite_digit =
ocn_emit(obj_type_status["ocn_status"]);
an_object["bookindex_nugget"] =
("bookindex_nugget" in an_object) ? an_object["bookindex_nugget"] : "";
bookindex_unordered_hashes =
bookindex_extract_hash.bookindex_nugget_hash(
an_object["bookindex_nugget"],
- obj_cite_number,
+ obj_cite_digit,
segment_anchor_tag_that_object_belongs_to
);
an_object["is"] = "group";
@@ -3493,7 +3534,7 @@ void _block_flag_line_empty_(B)(
node_construct.node_location_emitter(
content_non_header,
segment_anchor_tag_that_object_belongs_to,
- obj_cite_number,
+ obj_cite_digit,
cntr,
heading_ptr-1,
an_object["is"]
@@ -3507,8 +3548,8 @@ void _block_flag_line_empty_(B)(
comp_obj_block.of_section = "body";
comp_obj_block.is_of = "block";
comp_obj_block.is_a = "group";
- comp_obj_block.ocn = obj_cite_number;
- comp_obj_block.obj_cite_number = (obj_cite_number==0) ? "" : obj_cite_number.to!string;
+ comp_obj_block.ocn = obj_cite_digit;
+ comp_obj_block.obj_cite_number = (obj_cite_digit==0) ? "" : obj_cite_digit.to!string;
comp_obj_block.text = an_object["substantive"];
comp_obj_block.inline_notes_reg = substantive_obj_misc_tuple[sObj.notes_reg];
comp_obj_block.inline_notes_star = substantive_obj_misc_tuple[sObj.notes_star];
@@ -3526,13 +3567,13 @@ void _block_flag_line_empty_(B)(
#+name: abs_functions_block_line_status_empty
#+BEGIN_SRC d
} else if (obj_type_status["block"] == TriState.closing) {
- obj_cite_number = ocn_emit(obj_type_status["ocn_status"]);
+ obj_cite_digit = ocn_emit(obj_type_status["ocn_status"]);
an_object["bookindex_nugget"] =
("bookindex_nugget" in an_object) ? an_object["bookindex_nugget"] : "";
bookindex_unordered_hashes =
bookindex_extract_hash.bookindex_nugget_hash(
an_object["bookindex_nugget"],
- obj_cite_number,
+ obj_cite_digit,
segment_anchor_tag_that_object_belongs_to
);
an_object["is"] = "block";
@@ -3540,7 +3581,7 @@ void _block_flag_line_empty_(B)(
node_construct.node_location_emitter(
content_non_header,
segment_anchor_tag_that_object_belongs_to,
- obj_cite_number,
+ obj_cite_digit,
cntr,
heading_ptr-1,
an_object["is"]
@@ -3553,8 +3594,8 @@ void _block_flag_line_empty_(B)(
comp_obj_block.of_section = "body";
comp_obj_block.is_of = "block";
comp_obj_block.is_a = "block";
- comp_obj_block.ocn = obj_cite_number;
- comp_obj_block.obj_cite_number = (obj_cite_number==0) ? "" : obj_cite_number.to!string;
+ comp_obj_block.ocn = obj_cite_digit;
+ comp_obj_block.obj_cite_number = (obj_cite_digit==0) ? "" : obj_cite_digit.to!string;
comp_obj_block.text = an_object["substantive"];
comp_obj_block.inline_notes_reg = substantive_obj_misc_tuple[sObj.notes_reg];
comp_obj_block.inline_notes_star = substantive_obj_misc_tuple[sObj.notes_star];
@@ -3577,7 +3618,7 @@ void _block_flag_line_empty_(B)(
bookindex_unordered_hashes =
bookindex_extract_hash.bookindex_nugget_hash(
an_object["bookindex_nugget"],
- obj_cite_number,
+ obj_cite_digit,
segment_anchor_tag_that_object_belongs_to
);
an_object["is"] = "verse";
@@ -3585,7 +3626,7 @@ void _block_flag_line_empty_(B)(
node_construct.node_location_emitter(
content_non_header,
segment_anchor_tag_that_object_belongs_to,
- obj_cite_number,
+ obj_cite_digit,
cntr,
heading_ptr-1,
an_object["is"]
@@ -3595,7 +3636,7 @@ void _block_flag_line_empty_(B)(
comp_obj_poem_ocn.of_section = "body";
comp_obj_poem_ocn.is_of = "block";
comp_obj_poem_ocn.is_a = "poem";
- comp_obj_poem_ocn.ocn = obj_cite_number;
+ comp_obj_poem_ocn.ocn = obj_cite_digit;
comp_obj_poem_ocn.obj_cite_number = (obj_cite_number_poem["start"], obj_cite_number_poem["end"]);
comp_obj_poem_ocn.text = "";
the_document_body_section ~= comp_obj_poem_ocn;
@@ -3610,14 +3651,14 @@ void _block_flag_line_empty_(B)(
#+name: abs_functions_block_line_status_empty
#+BEGIN_SRC d
} else if (obj_type_status["code"] == TriState.closing) {
- obj_cite_number =
+ obj_cite_digit =
ocn_emit(obj_type_status["ocn_status"]);
an_object["bookindex_nugget"] =
("bookindex_nugget" in an_object) ? an_object["bookindex_nugget"] : "";
bookindex_unordered_hashes =
bookindex_extract_hash.bookindex_nugget_hash(
an_object["bookindex_nugget"],
- obj_cite_number,
+ obj_cite_digit,
segment_anchor_tag_that_object_belongs_to
);
an_object["is"] = "code";
@@ -3625,7 +3666,7 @@ void _block_flag_line_empty_(B)(
node_construct.node_location_emitter(
content_non_header,
segment_anchor_tag_that_object_belongs_to,
- obj_cite_number,
+ obj_cite_digit,
cntr,
heading_ptr-1,
an_object["is"]
@@ -3639,8 +3680,8 @@ void _block_flag_line_empty_(B)(
comp_obj_code.of_section = "body";
comp_obj_code.is_of = "block";
comp_obj_code.is_a = "code";
- comp_obj_code.ocn = obj_cite_number;
- comp_obj_code.obj_cite_number = (obj_cite_number==0) ? "" : obj_cite_number.to!string;
+ comp_obj_code.ocn = obj_cite_digit;
+ comp_obj_code.obj_cite_number = (obj_cite_digit==0) ? "" : obj_cite_digit.to!string;
comp_obj_code.text = an_object["substantive"];
comp_obj_code.inline_notes_reg = substantive_obj_misc_tuple[sObj.notes_reg];
comp_obj_code.inline_notes_star = substantive_obj_misc_tuple[sObj.notes_star];
@@ -3659,14 +3700,14 @@ void _block_flag_line_empty_(B)(
#+BEGIN_SRC d
} else if (obj_type_status["table"] == TriState.closing) {
comp_obj_block = comp_obj_block.init;
- obj_cite_number =
+ obj_cite_digit =
ocn_emit(obj_type_status["ocn_status"]);
an_object["bookindex_nugget"] =
("bookindex_nugget" in an_object) ? an_object["bookindex_nugget"] : "";
bookindex_unordered_hashes =
bookindex_extract_hash.bookindex_nugget_hash(
an_object["bookindex_nugget"],
- obj_cite_number,
+ obj_cite_digit,
segment_anchor_tag_that_object_belongs_to
);
an_object["is"] = "table";
@@ -3674,7 +3715,7 @@ void _block_flag_line_empty_(B)(
node_construct.node_location_emitter(
content_non_header,
segment_anchor_tag_that_object_belongs_to,
- obj_cite_number,
+ obj_cite_digit,
cntr,
heading_ptr-1,
an_object["is"]
@@ -3683,8 +3724,8 @@ void _block_flag_line_empty_(B)(
obj_im.obj_inline_markup_and_anchor_tags_and_misc(an_object, an_object_key, dochead_make_aa);
an_object["substantive"] = substantive_obj_misc_tuple[sObj.content];
comp_obj_block = comp_obj_block.init;
- comp_obj_block.ocn = obj_cite_number;
- comp_obj_block.obj_cite_number = (obj_cite_number==0) ? "" : obj_cite_number.to!string;
+ comp_obj_block.ocn = obj_cite_digit;
+ comp_obj_block.obj_cite_number = (obj_cite_digit==0) ? "" : obj_cite_digit.to!string;
comp_obj_block = table_instructions(comp_obj_block, an_object["table_head"]);
comp_obj_block = table_substantive_munge(comp_obj_block, an_object["substantive"]);
the_document_body_section ~= comp_obj_block;
@@ -4426,19 +4467,31 @@ auto table_substantive_munge_special(O,T)(
#+name: meta_emitters_ocn
#+BEGIN_SRC d
pure struct OCNemitter {
- int obj_cite_number, obj_cite_number_;
+ int ocn_, ocn_in, ocn_in_, ocn_out_, ocn_bkidx_;
int ocn_emitter(int ocn_status_flag)
- in { assert(ocn_status_flag <= 3); }
+ in { assert(ocn_status_flag <= OCNstatus.reset); }
body {
- if (ocn_status_flag == 3) {
- obj_cite_number = obj_cite_number_ = 1;
- } else {
- obj_cite_number=(ocn_status_flag == 0)
- ? ++obj_cite_number_
- : 0;
+ switch(ocn_status_flag) {
+ case OCNstatus.reset:
+ ocn_ = ocn_in_ = ocn_out_ = 1;
+ ocn_bkidx_ = 0;
+ break;
+ case OCNstatus.inc:
+ ocn_ = ++ocn_in_;
+ break;
+ case OCNstatus.exc:
+ ocn_ = ++ocn_out_;
+ break;
+ case OCNstatus.bkidx:
+ ocn_ = ++ocn_bkidx_;
+ break;
+ case OCNstatus.closing:
+ break;
+ default:
+ ocn_ = 0;
}
- assert(obj_cite_number >= 0);
- return obj_cite_number;
+ assert(ocn_ >= 0);
+ return ocn_;
}
invariant() {
}
@@ -5760,19 +5813,19 @@ struct BookIndexNuggetHash {
string[] bi_main_terms_split_arr;
string[][string][string] bookindex_nugget_hash(BI,N,S)(
BI bookindex_section,
- N obj_cite_number,
+ N obj_cite_digit,
S segment_anchor_tag,
)
in {
debug(asserts) {
static assert(is(typeof(bookindex_section) == string));
- static assert(is(typeof(obj_cite_number) == int));
+ static assert(is(typeof(obj_cite_digit) == int));
}
debug(bookindexraw) {
if (!bookindex_section.empty) {
writeln(
"* [bookindex] ",
- "[", obj_cite_number.to!string, ": ", segment_anchor_tag, "] ", bookindex_section
+ "[", obj_cite_digit.to!string, ": ", segment_anchor_tag, "] ", bookindex_section
);
}
}
@@ -5790,12 +5843,12 @@ struct BookIndexNuggetHash {
) {
main_term = m.captures[1].strip;
obj_cite_number_offset = m.captures[2].to!int;
- obj_cite_number_endpoint=(obj_cite_number + obj_cite_number_offset);
- obj_cite_numbers ~= (obj_cite_number.to!string ~ "-" ~ to!string(obj_cite_number_endpoint)
+ obj_cite_number_endpoint=(obj_cite_digit + obj_cite_number_offset);
+ obj_cite_numbers ~= (obj_cite_digit.to!string ~ "-" ~ to!string(obj_cite_number_endpoint)
~ ":" ~ segment_anchor_tag);
} else {
main_term = bi_main_term_and_rest[0].strip;
- obj_cite_numbers ~= obj_cite_number.to!string
+ obj_cite_numbers ~= obj_cite_digit.to!string
~ ":" ~ segment_anchor_tag;
}
bi[main_term]["_a"] ~= obj_cite_numbers;
@@ -5809,12 +5862,12 @@ struct BookIndexNuggetHash {
if (auto m = sub_terms_bits.match(rgx.bi_term_and_obj_cite_numbers_match)) {
sub_term = m.captures[1].strip;
obj_cite_number_offset = m.captures[2].to!int;
- obj_cite_number_endpoint=(obj_cite_number + obj_cite_number_offset);
- obj_cite_numbers ~= (obj_cite_number.to!string ~ " - " ~ to!string(obj_cite_number_endpoint)
+ obj_cite_number_endpoint=(obj_cite_digit + obj_cite_number_offset);
+ obj_cite_numbers ~= (obj_cite_digit.to!string ~ " - " ~ to!string(obj_cite_number_endpoint)
~ ":" ~ segment_anchor_tag);
} else {
sub_term = sub_terms_bits.strip;
- obj_cite_numbers ~= to!string(obj_cite_number)
+ obj_cite_numbers ~= to!string(obj_cite_digit)
~ ":" ~ segment_anchor_tag;
}
if (!empty(sub_term)) {
@@ -5920,12 +5973,12 @@ struct BookIndexReportSection {
#+BEGIN_SRC d
auto bookindex_build_abstraction_section(BI,N,B)(
BI bookindex_unordered_hashes,
- N obj_cite_number,
+ N obj_cite_digit,
B opt_action,
) {
debug(asserts) {
static assert(is(typeof(bookindex_unordered_hashes) == string[][string][string]));
- static assert(is(typeof(obj_cite_number) == int));
+ static assert(is(typeof(obj_cite_digit) == int));
static assert(is(typeof(opt_action) == bool[string]));
}
mixin SiSUnode;
@@ -5964,7 +6017,6 @@ struct BookIndexReportSection {
comp_obj_heading.inline_links = true;
bookindex_section["scroll"] ~= comp_obj_heading_;
bookindex_section["seg"] ~= comp_obj_heading_;
- ++obj_cite_number;
++mkn;
comp_obj_heading_ = comp_obj_heading_.init;
comp_obj_heading_.of_part = "backmatter";
@@ -5984,7 +6036,6 @@ struct BookIndexReportSection {
comp_obj_heading_.anchor_tags = ["bookindex"];
bookindex_section["scroll"] ~= comp_obj_heading_;
bookindex_section["seg"] ~= comp_obj_heading_;
- ++obj_cite_number;
++mkn;
import std.array : appender;
auto buffer = appender!(char[])();
@@ -6049,8 +6100,8 @@ struct BookIndexReportSection {
comp_obj_para.is_of = "para";
comp_obj_para.is_a = "bookindex";
comp_obj_para.text = bi_tmp_scroll.to!string.strip;
- comp_obj_para.ocn = obj_cite_number;
- comp_obj_para.obj_cite_number = (obj_cite_number==0) ? "" : to!string(obj_cite_number);
+ comp_obj_para.ocn = 0;
+ comp_obj_para.obj_cite_number = "";
comp_obj_para.anchor_tags = bi_tmp_tags;
comp_obj_para.indent_hang = 0;
comp_obj_para.indent_base = 1;
@@ -6059,7 +6110,6 @@ struct BookIndexReportSection {
bookindex_section["scroll"] ~= comp_obj_para;
comp_obj_para.text = bi_tmp_seg.to!string.strip;
bookindex_section["seg"] ~= comp_obj_para;
- ++obj_cite_number;
++mkn;
}
} else { // no book index, (figure out what to do here)
@@ -6075,7 +6125,7 @@ struct BookIndexReportSection {
bookindex_section["scroll"] ~= comp_obj_heading_;
bookindex_section["seg"] ~= comp_obj_heading_;
}
- auto t = tuple(bookindex_section, obj_cite_number);
+ auto t = tuple(bookindex_section, obj_cite_digit);
return t;
}
#+END_SRC
@@ -6185,7 +6235,7 @@ struct NotesSection {
#+name: meta_emitters_endnotes
#+BEGIN_SRC d
private auto endnote_objects(
- int obj_cite_number,
+ int obj_cite_digit,
bool[string] opt_action,
)
in {
@@ -6216,7 +6266,7 @@ struct NotesSection {
comp_obj_heading_.parent_ocn = 1;
comp_obj_heading_.parent_lev_markup = 0;
the_endnotes_section ~= comp_obj_heading_;
- ++obj_cite_number;
+ ++obj_cite_digit;
++mkn;
comp_obj_heading_ = comp_obj_heading_.init;
comp_obj_heading_.of_part = "backmatter";
@@ -6234,7 +6284,7 @@ struct NotesSection {
comp_obj_heading_.parent_lev_markup = 0;
comp_obj_heading_.anchor_tags = ["endnotes"];
the_endnotes_section ~= comp_obj_heading_;
- ++obj_cite_number;
+ ++obj_cite_digit;
++mkn;
} else {
comp_obj_heading_ = comp_obj_heading_.init;
@@ -6274,7 +6324,7 @@ struct NotesSection {
the_endnotes_section ~= comp_obj_endnote_;
}
}
- auto t = tuple(the_endnotes_section, obj_cite_number);
+ auto t = tuple(the_endnotes_section, obj_cite_digit);
return t;
}
#+END_SRC
@@ -6429,7 +6479,7 @@ struct Bibliography {
#+BEGIN_SRC d
struct NodeStructureMetadata {
int lv, lv0, lv1, lv2, lv3, lv4, lv5, lv6, lv7;
- int obj_cite_number;
+ int obj_cite_digit;
int[string] p_; // p_ parent_
static auto rgx = Rgx();
#+END_SRC
@@ -6441,7 +6491,7 @@ struct NodeStructureMetadata {
ObjGenericComposite node_location_emitter(Lv,Ta,N,C,P,I)(
Lv lev_markup_number,
Ta segment_anchor_tag,
- N obj_cite_number_,
+ N obj_cite_digit_,
C cntr_,
P ptr_,
I is_
@@ -6450,18 +6500,18 @@ struct NodeStructureMetadata {
debug(asserts) {
static assert(is(typeof(lev_markup_number) == string));
static assert(is(typeof(segment_anchor_tag) == string));
- static assert(is(typeof(obj_cite_number_) == int));
+ static assert(is(typeof(obj_cite_digit_) == int));
static assert(is(typeof(cntr_) == int));
static assert(is(typeof(ptr_) == int));
static assert(is(typeof(is_) == string));
}
assert(is_ != "heading");
- assert(obj_cite_number_.to!int >= 0);
+ assert(obj_cite_digit_.to!int >= 0);
}
body {
assert(is_ != "heading"); // should not be necessary
- assert(obj_cite_number_.to!int >= 0); // should not be necessary
- int obj_cite_number = obj_cite_number_.to!int;
+ assert(obj_cite_digit_.to!int >= 0); // should not be necessary
+ int obj_cite_digit = obj_cite_digit_.to!int;
if (lv7 > State.off) {
p_["lev_markup_number"] = DocStructMarkupHeading.h_text_4;
p_["obj_cite_number"] = lv7;
@@ -6478,7 +6528,7 @@ struct NodeStructureMetadata {
ObjGenericComposite comp_obj_location;
comp_obj_location = comp_obj_location.init;
comp_obj_location.is_a = is_;
- comp_obj_location.ocn = obj_cite_number_;
+ comp_obj_location.ocn = obj_cite_digit_;
comp_obj_location.segment_anchor_tag = segment_anchor_tag.to!string;
comp_obj_location.parent_ocn = p_["obj_cite_number"];
comp_obj_location.parent_lev_markup = p_["lev_markup_number"];
@@ -6508,7 +6558,7 @@ struct NodeStructureMetadata {
Lm lev_markup_number,
Lc lev_collapsed_number,
Ta segment_anchor_tag,
- N obj_cite_number_,
+ N obj_cite_digit_,
C cntr_,
P ptr_,
LA lv_ancestors_txt,
@@ -6525,7 +6575,7 @@ struct NodeStructureMetadata {
static assert(is(typeof(lev_markup_number) == string));
static assert(is(typeof(lev_collapsed_number) == string));
static assert(is(typeof(segment_anchor_tag) == string));
- static assert(is(typeof(obj_cite_number_) == int));
+ static assert(is(typeof(obj_cite_digit_) == int));
static assert(is(typeof(cntr_) == int));
static assert(is(typeof(ptr_) == int));
static assert(is(typeof(lv_ancestors_txt) == string[]));
@@ -6533,30 +6583,30 @@ struct NodeStructureMetadata {
static assert(is(typeof(html_segnames_ptr) == int));
}
assert(is_ == "heading");
- assert(to!int(obj_cite_number_) >= 0);
+ assert((obj_cite_digit_).to!int >= 0);
assert(
lev_markup_number.match(rgx.levels_numbered),
- ("not a valid heading level: " ~ lev_markup_number ~ " at " ~ obj_cite_number_.to!string)
+ ("not a valid heading level: " ~ lev_markup_number ~ " at " ~ obj_cite_digit_.to!string)
);
if (lev_markup_number.match(rgx.levels_numbered)) {
if (lev_markup_number.to!int == 0) {
- assert(obj_cite_number_.to!int == 1);
+ assert(obj_cite_digit_.to!int == 1);
}
}
}
body {
- int obj_cite_number = obj_cite_number_.to!int;
+ int obj_cite_digit = obj_cite_digit_.to!int;
switch (lev_markup_number.to!int) {
case 0:
lv = DocStructMarkupHeading.h_sect_A;
- lv0 = obj_cite_number;
+ lv0 = obj_cite_digit;
lv1=0; lv2=0; lv3=0; lv4=0; lv5=0; lv6=0; lv7=0;
p_["lev_markup_number"] = 0;
p_["obj_cite_number"] = 0;
break;
case 1:
lv = DocStructMarkupHeading.h_sect_B;
- lv1 = obj_cite_number;
+ lv1 = obj_cite_digit;
lv2=0; lv3=0; lv4=0; lv5=0; lv6=0; lv7=0;
p_["lev_markup_number"] =
DocStructMarkupHeading.h_sect_A;
@@ -6564,7 +6614,7 @@ struct NodeStructureMetadata {
break;
case 2:
lv = DocStructMarkupHeading.h_sect_C;
- lv2 = obj_cite_number;
+ lv2 = obj_cite_digit;
lv3=0; lv4=0; lv5=0; lv6=0; lv7=0;
p_["lev_markup_number"] =
DocStructMarkupHeading.h_sect_B;
@@ -6572,7 +6622,7 @@ struct NodeStructureMetadata {
break;
case 3:
lv = DocStructMarkupHeading.h_sect_D;
- lv3=obj_cite_number;
+ lv3=obj_cite_digit;
lv4=0; lv5=0; lv6=0; lv7=0;
p_["lev_markup_number"] =
DocStructMarkupHeading.h_sect_C;
@@ -6580,7 +6630,7 @@ struct NodeStructureMetadata {
break;
case 4:
lv = DocStructMarkupHeading.h_text_1;
- lv4 = obj_cite_number;
+ lv4 = obj_cite_digit;
lv5=0; lv6=0; lv7=0;
if (lv3 > State.off) {
p_["lev_markup_number"] =
@@ -6602,7 +6652,7 @@ struct NodeStructureMetadata {
break;
case 5:
lv = DocStructMarkupHeading.h_text_2;
- lv5 = obj_cite_number;
+ lv5 = obj_cite_digit;
lv6=0; lv7=0;
p_["lev_markup_number"] =
DocStructMarkupHeading.h_text_1;
@@ -6610,7 +6660,7 @@ struct NodeStructureMetadata {
break;
case 6:
lv = DocStructMarkupHeading.h_text_3;
- lv6 = obj_cite_number;
+ lv6 = obj_cite_digit;
lv7=0;
p_["lev_markup_number"] =
DocStructMarkupHeading.h_text_2;
@@ -6618,7 +6668,7 @@ struct NodeStructureMetadata {
break;
case 7:
lv = DocStructMarkupHeading.h_text_4;
- lv7 = obj_cite_number;
+ lv7 = obj_cite_digit;
p_["lev_markup_number"] =
DocStructMarkupHeading.h_text_3;
p_["obj_cite_number"] = lv6;
@@ -6633,8 +6683,8 @@ struct NodeStructureMetadata {
_comp_obj_heading_.is_of = "para";
_comp_obj_heading_.is_a = "heading";
_comp_obj_heading_.text = _text.to!string.strip;
- _comp_obj_heading_.ocn = obj_cite_number_;
- _comp_obj_heading_.obj_cite_number = (obj_cite_number==0) ? "" : obj_cite_number.to!string;
+ _comp_obj_heading_.ocn = obj_cite_digit_;
+ _comp_obj_heading_.obj_cite_number = (obj_cite_digit==0) ? "" : obj_cite_digit.to!string;
_comp_obj_heading_.segment_anchor_tag = segment_anchor_tag.to!string;
_comp_obj_heading_.marked_up_level = lev;
_comp_obj_heading_.heading_lev_markup = (!(lev_markup_number.empty) ? lev_markup_number.to!int : 0);
@@ -6987,6 +7037,9 @@ struct ObjGenericComposite {
string is_a = "";
string text = "";
string obj_cite_number = "";
+ string obj_cite_number_non = "";
+ string obj_cite_number_bkidx = "";
+ int obj_cite_number_type = 0;
string[] anchor_tags = [];
int indent_base = 0;
int indent_hang = 0;
diff --git a/org/sdp.org b/org/sdp.org
index e06135f..cc9eee2 100644
--- a/org/sdp.org
+++ b/org/sdp.org
@@ -137,13 +137,13 @@ import
├── src
│   ├── sdp.d
│   └── sdp
-│    ├── meta_metadoc_from_src.d
+│    ├── metadoc_from_src.d
│    ├── ...
│    └── compile_time_info.d
└── views
   └── version.txt
-[[./meta_metadoc_from_src.org][meta_metadoc_from_src]]
+[[./meta_abstraction.org][meta_abstraction]]
[[./meta_conf_make_meta.org][meta_conf_make_meta]]
[[./meta_defaults.org][meta_defaults]]
[[./meta_output_debugs.org][meta_output_debugs]]
@@ -925,37 +925,37 @@ consider
**** ocn
-|-------------+----------------------+-----------------------+--------------+---|
-| *objects | section / part | ocn described | how used* | |
-|-------------+----------------------+-----------------------+--------------+---|
-| regular ocn | | | | |
-|-------------+----------------------+-----------------------+--------------+---|
-| | body objects | seq. digit | anchor | |
-| | | | visible | |
-|-------------+----------------------+-----------------------+--------------+---|
-| | glossary objects | seq. digit | anchor | |
-| | | | not-visible | |
-| | | | (for search) | |
-|-------------+----------------------+-----------------------+--------------+---|
-| | bibliography objects | seq. digit | anchor | |
-| | | | not-visible | |
-| | | | (for search) | |
-|-------------+----------------------+-----------------------+--------------+---|
-| special ocn | | | | |
-|-------------+----------------------+-----------------------+--------------+---|
-| | non-substantive text | x char + seq. digit | anchor | |
-| | | | not-visible | |
-| | | | (for search) | |
-|-------------+----------------------+-----------------------+--------------+---|
-| | book index | i char + seq. digit | anchor | |
-| | | | not-visible | |
-| | | | (for search) | |
-|-------------+----------------------+-----------------------+--------------+---|
-| exceptions | | | | |
-|-------------+----------------------+-----------------------+--------------+---|
-| | endnotes | ocn of parent object | anchor | |
-| | | + footnote seq. digit | visible | |
-|-------------+----------------------+-----------------------+--------------+---|
+|-------------+-----------------------+-----------------------+----------------+------|
+| *objects | section / part | ocn described | how used* | type |
+|-------------+-----------------------+-----------------------+----------------+------|
+| regular ocn | | | | |
+|-------------+-----------------------+-----------------------+----------------+------|
+| | body objects | seq. digit | anchor | ocn |
+| | | [0-9]+ | visible | |
+|-------------+-----------------------+-----------------------+----------------+------|
+| | glossary objects | seq. digit | anchor | ocn |
+| | | [0-9]+ | not-visible | |
+| | | | (for search) | |
+|-------------+-----------------------+-----------------------+----------------+------|
+| | bibliography objects | seq. digit | anchor | ocn |
+| | | [0-9]+ | not-visible | |
+| | | | (for search) | |
+|-------------+-----------------------+-----------------------+----------------+------|
+| special ocn | | | | |
+|-------------+-----------------------+-----------------------+----------------+------|
+| | non-substantive text | x char + seq. digit | anchor | non |
+| | (within body & blurb) | x[0-9]+ | not-visible | |
+| | | | (for search) | |
+|-------------+-----------------------+-----------------------+----------------+------|
+| | book index | i char + seq. digit | anchor | idx |
+| | | i[0-9]+ | not-visible | |
+| | | | (for search) | |
+|-------------+-----------------------+-----------------------+----------------+------|
+| without ocn | | | | |
+|-------------+-----------------------+-----------------------+----------------+------|
+| | endnotes | ocn of parent object | no ocn | fn |
+| | | + footnote seq. digit | anchor visible | |
+|-------------+-----------------------+-----------------------+----------------+------|
** make config - _composite make_