From a012afaa46a7983fdcf07590f5385403fea044fc Mon Sep 17 00:00:00 2001 From: Ralph Amissah Date: Tue, 10 Nov 2015 19:10:31 -0500 Subject: org babel block delimiters --- org/ao_abstract_doc_source.org | 110 ++++++++++++++++++++--------------------- 1 file changed, 55 insertions(+), 55 deletions(-) (limited to 'org/ao_abstract_doc_source.org') diff --git a/org/ao_abstract_doc_source.org b/org/ao_abstract_doc_source.org index 257213c..bfda427 100644 --- a/org/ao_abstract_doc_source.org +++ b/org/ao_abstract_doc_source.org @@ -146,7 +146,7 @@ scope(exit) { } auto dochead_make = parseJSON(header_make_jsonstr).object; auto dochead_metadata = parseJSON(header_metadata_jsonstr).object; -#+end_src +#+END_SRC ** loop: process document body [+7] *** scope @@ -173,7 +173,7 @@ debug(srclines) { writeln(scr_txt_marker["green"], line); } } -#+end_src +#+END_SRC *** check whether ocn is on or turned off #+name: abs_loop_body_00 #+BEGIN_SRC d :exports none @@ -216,7 +216,7 @@ if ((!line.empty) && (ft["ocn_status_multi_obj"] == 0)) { } } } -#+end_src +#+END_SRC *** separate regular markup text from code blocks [+6] **** code blocks #+name: abs_loop_body_00 @@ -252,13 +252,13 @@ if (ft["code"] == 1) { object["obj"] ~= line ~= "\n"; // code (tic) line } } -#+end_src +#+END_SRC **** non code objects (other blocks or regular text) [+5] #+name: abs_loop_body_00 #+BEGIN_SRC d :exports none } else if (!match(line, rgx.regular_parse_skip)) { /* object other than code block object (includes regular text paragraph) */ -#+end_src +#+END_SRC ***** within block group [+1] ****** within block group: biblio #+name: abs_loop_body_non_code_obj @@ -347,7 +347,7 @@ if (((match(line, rgx.heading_biblio) biblio_arr_json[count_biblio_entry] = s; biblio_tag_entry=""; } -#+end_src +#+END_SRC ****** within block group: poem #+name: abs_loop_body_non_code_obj #+BEGIN_SRC d :exports none @@ -548,7 +548,7 @@ if (((match(line, rgx.heading_biblio) } } } -#+end_src +#+END_SRC ****** within block group: group #+name: abs_loop_body_non_code_obj #+BEGIN_SRC d :exports none @@ -583,7 +583,7 @@ if (((match(line, rgx.heading_biblio) object["obj"] ~= line ~= "\n"; // build group array (or string) } } -#+end_src +#+END_SRC ****** within block group: block #+name: abs_loop_body_non_code_obj #+BEGIN_SRC d :exports none @@ -618,7 +618,7 @@ if (((match(line, rgx.heading_biblio) object["obj"] ~= line ~= "\n"; // build block array (or string) } } -#+end_src +#+END_SRC ****** within block group: quote #+name: abs_loop_body_non_code_obj #+BEGIN_SRC d :exports none @@ -653,7 +653,7 @@ if (((match(line, rgx.heading_biblio) object["obj"] ~= line ~= "\n"; // build quote array (or string) } } -#+end_src +#+END_SRC ****** within block group: table #+name: abs_loop_body_non_code_obj #+BEGIN_SRC d :exports none @@ -688,13 +688,13 @@ if (((match(line, rgx.heading_biblio) object["obj"] ~= line ~= "\n"; // build table array (or string) } } -#+end_src +#+END_SRC ***** not within block group [+4] #+name: abs_loop_body_non_code_obj #+BEGIN_SRC d :exports none } else { /* not within a block group */ -#+end_src +#+END_SRC ****** assert #+name: abs_loop_body_open_block_obj #+BEGIN_SRC d :exports none @@ -704,7 +704,7 @@ assert( "block status: none or closed" ); assertions_flag_types_block_status_none_or_closed(ft); -#+end_src +#+END_SRC ****** open curly block group [+1] ******* open block group: code #+name: abs_loop_body_open_block_obj @@ -722,7 +722,7 @@ if (auto m = match(line, rgx.block_curly_code_open)) { ft["blocks"] = 1; ft["code"] = 1; ft["curly_code"] = 1; -#+end_src +#+END_SRC ******* open block group: poem #+name: abs_loop_body_open_block_obj #+BEGIN_SRC d :exports none @@ -747,7 +747,7 @@ if (auto m = match(line, rgx.block_curly_code_open)) { ft["verse_new"] = 1; ft["poem"] = 1; ft["curly_poem"] = 1; -#+end_src +#+END_SRC ******* open block group: group #+name: abs_loop_body_open_block_obj #+BEGIN_SRC d :exports none @@ -764,7 +764,7 @@ if (auto m = match(line, rgx.block_curly_code_open)) { ft["blocks"] = 1; ft["group"] = 1; ft["curly_group"] = 1; -#+end_src +#+END_SRC ******* open block group: block #+name: abs_loop_body_open_block_obj #+BEGIN_SRC d :exports none @@ -781,7 +781,7 @@ if (auto m = match(line, rgx.block_curly_code_open)) { ft["blocks"] = 1; ft["block"] = 1; ft["curly_block"] = 1; -#+end_src +#+END_SRC ******* open block group: quote #+name: abs_loop_body_open_block_obj #+BEGIN_SRC d :exports none @@ -798,7 +798,7 @@ if (auto m = match(line, rgx.block_curly_code_open)) { ft["blocks"] = 1; ft["quote"] = 1; ft["curly_quote"] = 1; -#+end_src +#+END_SRC ******* open block group: table #+name: abs_loop_body_open_block_obj #+BEGIN_SRC d :exports none @@ -815,7 +815,7 @@ if (auto m = match(line, rgx.block_curly_code_open)) { ft["blocks"] = 1; ft["table"] = 1; ft["curly_table"] = 1; -#+end_src +#+END_SRC ****** open tic block group [+1] ******* open block group: code #+name: abs_loop_body_open_block_obj @@ -833,7 +833,7 @@ if (auto m = match(line, rgx.block_curly_code_open)) { ft["blocks"] = 1; ft["code"] = 1; ft["tic_code"] = 1; -#+end_src +#+END_SRC ******* open block group: poem #+name: abs_loop_body_open_block_obj #+BEGIN_SRC d :exports none @@ -858,7 +858,7 @@ if (auto m = match(line, rgx.block_curly_code_open)) { ft["verse_new"] = 1; ft["poem"] = 1; ft["tic_poem"] = 1; -#+end_src +#+END_SRC ******* open block group: group #+name: abs_loop_body_open_block_obj #+BEGIN_SRC d :exports none @@ -875,7 +875,7 @@ if (auto m = match(line, rgx.block_curly_code_open)) { ft["blocks"] = 1; ft["group"] = 1; ft["tic_group"] = 1; -#+end_src +#+END_SRC ******* open block group: block #+name: abs_loop_body_open_block_obj #+BEGIN_SRC d :exports none @@ -892,7 +892,7 @@ if (auto m = match(line, rgx.block_curly_code_open)) { ft["blocks"] = 1; ft["block"] = 1; ft["tic_block"] = 1; -#+end_src +#+END_SRC ******* open block group: quote #+name: abs_loop_body_open_block_obj #+BEGIN_SRC d :exports none @@ -909,7 +909,7 @@ if (auto m = match(line, rgx.block_curly_code_open)) { ft["blocks"] = 1; ft["quote"] = 1; ft["tic_quote"] = 1; -#+end_src +#+END_SRC ******* open block group: table #+name: abs_loop_body_open_block_obj #+BEGIN_SRC d :exports none @@ -926,14 +926,14 @@ if (auto m = match(line, rgx.block_curly_code_open)) { ft["blocks"] = 1; ft["table"] = 1; ft["tic_table"] = 1; -#+end_src +#+END_SRC ****** line not empty [+3] #+name: abs_loop_body_not_block_obj #+BEGIN_SRC d :exports none } else if (!line.empty) { /* line not empty */ /* non blocks (headers, paragraphs) & closed blocks */ -#+end_src +#+END_SRC ******* asserts #+name: abs_loop_body_not_block_obj #+BEGIN_SRC d :exports none @@ -958,7 +958,7 @@ if (auto m = match(line, rgx.block_curly_code_open)) { || ft["book_index"] == 1 ); } -#+end_src +#+END_SRC ******* book index #+name: abs_loop_body_not_block_obj #+BEGIN_SRC d :exports none @@ -1001,13 +1001,13 @@ if (auto m = match(line, rgx.block_curly_code_open)) { } else { book_idx_tmp ~= line; } -#+end_src +#+END_SRC ******* not book index [+2] #+name: abs_loop_body_not_block_obj #+BEGIN_SRC d :exports none } else { /* not book_index */ -#+end_src +#+END_SRC ******** matched: comment #+name: abs_loop_body_not_block_obj #+BEGIN_SRC d :exports none @@ -1035,7 +1035,7 @@ if (auto m = match(line, rgx.block_curly_code_open)) { ft["heading"] = 0; ft["para"] = 0; counter++; -#+end_src +#+END_SRC ******** matched: header make #+name: abs_loop_body_not_block_obj #+BEGIN_SRC d :exports none @@ -1051,7 +1051,7 @@ if (auto m = match(line, rgx.block_curly_code_open)) { ft["para"] = 0; line_occur["header_make"]++; object["obj"] ~= line ~= "\n"; -#+end_src +#+END_SRC ******** matched: header metadata #+name: abs_loop_body_not_block_obj #+BEGIN_SRC d :exports none @@ -1067,7 +1067,7 @@ if (auto m = match(line, rgx.block_curly_code_open)) { ft["para"] = 0; line_occur["header_metadata"]++; object["obj"] ~= line ~= "\n"; -#+end_src +#+END_SRC ******** flag set: header make #+name: abs_loop_body_not_block_obj #+BEGIN_SRC d :exports none @@ -1082,7 +1082,7 @@ if (auto m = match(line, rgx.block_curly_code_open)) { line_occur["header_make"]++; object["obj"] ~= line ~= "\n"; } -#+end_src +#+END_SRC ******** flag set: header metadata #+name: abs_loop_body_not_block_obj #+BEGIN_SRC d :exports none @@ -1097,7 +1097,7 @@ if (auto m = match(line, rgx.block_curly_code_open)) { line_occur["header_metadata"]++; object["obj"] ~= line ~= "\n"; } -#+end_src +#+END_SRC ******** flag not set & line not exist: heading or para [+1] #+name: abs_loop_body_not_block_obj #+BEGIN_SRC d :exports none @@ -1106,7 +1106,7 @@ if (auto m = match(line, rgx.block_curly_code_open)) { && ((ft["para"] == 0) && (ft["heading"] == 0))) { /* heading or para but neither flag nor line exists */ -#+end_src +#+END_SRC ********* headings found #+name: abs_loop_body_not_block_obj #+BEGIN_SRC d :exports none @@ -1176,7 +1176,7 @@ if (auto m = match(line, rgx.block_curly_code_open)) { } ft["make_headings"] = 1; } -#+end_src +#+END_SRC ********* headings make set #+name: abs_loop_body_not_block_obj #+BEGIN_SRC d :exports none @@ -1229,7 +1229,7 @@ if (auto m = match(line, rgx.block_curly_code_open)) { } } } -#+end_src +#+END_SRC ********* headings match #+name: abs_loop_body_not_block_obj #+BEGIN_SRC d :exports none @@ -1356,7 +1356,7 @@ if (auto m = match(line, rgx.block_curly_code_open)) { debug(heading) { // heading tell_l("yellow", strip(line)); } -#+end_src +#+END_SRC ********* para matches #+name: abs_loop_body_not_block_obj #+BEGIN_SRC d :exports none @@ -1407,7 +1407,7 @@ if (auto m = match(line, rgx.block_curly_code_open)) { } line_occur["para"]++; } -#+end_src +#+END_SRC ******** line exist: header make #+name: abs_loop_body_not_block_obj #+BEGIN_SRC d :exports none @@ -1419,7 +1419,7 @@ if (auto m = match(line, rgx.block_curly_code_open)) { } object["obj"] ~= line ~= "\n"; line_occur["header_make"]++; -#+end_src +#+END_SRC ******** line exist: header metadata #+name: abs_loop_body_not_block_obj #+BEGIN_SRC d :exports none @@ -1431,7 +1431,7 @@ if (auto m = match(line, rgx.block_curly_code_open)) { } object["obj"] ~= line ~= "\n"; line_occur["header_metadata"]++; -#+end_src +#+END_SRC ******** line exist: heading #+name: abs_loop_body_not_block_obj #+BEGIN_SRC d :exports none @@ -1442,7 +1442,7 @@ if (auto m = match(line, rgx.block_curly_code_open)) { } object["obj"] ~= line ~= "\n"; line_occur["heading"]++; -#+end_src +#+END_SRC ******** line exist: para #+name: abs_loop_body_not_block_obj #+BEGIN_SRC d :exports none @@ -1455,7 +1455,7 @@ if (auto m = match(line, rgx.block_curly_code_open)) { line_occur["para"]++; } } -#+end_src +#+END_SRC ****** line empty, with block flag #+name: abs_loop_body_not_block_obj #+BEGIN_SRC d :exports none @@ -1670,13 +1670,13 @@ if (auto m = match(line, rgx.block_curly_code_open)) { ft["blocks"] = 0; ft["quote"] = 0; } -#+end_src +#+END_SRC ****** line empty [+1] #+name: abs_loop_body_not_block_obj #+BEGIN_SRC d :exports none } else { /* line empty */ -#+end_src +#+END_SRC ******* assert line empty #+name: abs_loop_body_not_block_obj_line_empty #+BEGIN_SRC d :exports none @@ -1689,7 +1689,7 @@ assert( (ft["blocks"] == 0), "code block status: none" ); -#+end_src +#+END_SRC ******* header_make instructions #+name: abs_loop_body_not_block_obj_line_empty #+BEGIN_SRC d :exports none @@ -1714,7 +1714,7 @@ if ((ft["header_make"] == 1) object.remove("attrib"); object.remove("bookindex"); processing.remove("verse"); -#+end_src +#+END_SRC ******* header_metadata #+name: abs_loop_body_not_block_obj_line_empty #+BEGIN_SRC d :exports none @@ -1741,7 +1741,7 @@ if ((ft["header_make"] == 1) object.remove("attrib"); object.remove("bookindex"); processing.remove("verse"); -#+end_src +#+END_SRC ******* heading object #+name: abs_loop_body_not_block_obj_line_empty #+BEGIN_SRC d :exports none @@ -1799,7 +1799,7 @@ if ((ft["header_make"] == 1) object.remove("bookindex"); processing.remove("verse"); counter++; -#+end_src +#+END_SRC ******* paragraph object #+name: abs_loop_body_not_block_obj_line_empty #+BEGIN_SRC d :exports none @@ -1859,14 +1859,14 @@ if ((ft["header_make"] == 1) ); // check what happens when paragraph separated by 2 newlines } -#+end_src +#+END_SRC *** close non code objects (regular text) #+name: abs_loop_body_00_closed #+BEGIN_SRC d :exports none } // close else for line empty } // close else for not the above } // close after non code, other blocks or regular text -#+end_src +#+END_SRC *** regular text objects #+name: abs_loop_body_01 #+BEGIN_SRC d :exports none @@ -1882,7 +1882,7 @@ if (((contents_arbitrary_max_length_set[counter-1]["is"] == "para") notesection.gather_notes_for_endnote_section(contents_arbitrary_max_length_set, counter-1); } } -#+end_src +#+END_SRC ** post loop processing #+name: abs_post @@ -1983,12 +1983,12 @@ auto t = biblio_ordered ); return t; -#+end_src +#+END_SRC * tangles ** code structure: :ao_abstract_doc_source.d: #+name: tangle_ao_abstract_doc_source -#+BEGIN_SRC d :tangle ../lib/sdp/ao_abstract_doc_source.d :exports none :noweb yes +#+BEGIN_SRC d :tangle ../lib/sdp/ao_abstract_doc_source.d :padline no :exports none :noweb yes /* document abstraction ao_abstract_doc_source.d @@ -2013,4 +2013,4 @@ mixin template SiSUdocAbstraction() { } } } -#+end_src +#+END_SRC -- cgit v1.2.3