From 0c693b23c4ff8f98a151884a24f150a5ff746dd4 Mon Sep 17 00:00:00 2001 From: Ralph Amissah Date: Fri, 16 Oct 2020 19:16:18 -0400 Subject: org mode, unique code-block names & adjust headers - avoid org-mode undefined behavior, provide unique code-block names --- org/spine.org | 83 +++++++++++++++++++++++++++++++++++++++-------------------- 1 file changed, 55 insertions(+), 28 deletions(-) (limited to 'org/spine.org') diff --git a/org/spine.org b/org/spine.org index 82cdeb7..5f39984 100644 --- a/org/spine.org +++ b/org/spine.org @@ -7,6 +7,7 @@ #+COPYRIGHT: Copyright (C) 2015 - 2020 Ralph Amissah #+LANGUAGE: en #+STARTUP: content hideblocks hidestars noindent entitiespretty +#+OPTIONS: H:3 num:nil toc:t \n:nil @:t ::t |:t ^:nil _:nil -:t f:t *:t <:t #+PROPERTY: header-args :exports code #+PROPERTY: header-args+ :noweb yes #+PROPERTY: header-args+ :eval no @@ -96,8 +97,16 @@ string project_name = "spine"; string program_name = "spine"; @system void main(string[] args) { <> - <> - <> + <> + <> + <> + <> + <> + <> + <> + <> + <> + <> if (_manifests.length > 1 // _manifests[0] initialized dummy element && _opt_action.abstraction) { if (_opt_action.parallelise) { // see else @@ -106,7 +115,12 @@ string program_name = "spine"; if (!empty(manifest.src.filename)) { <> <> - <> + <> + <> + <> + <> + <> + <> <> <> } else { @@ -121,7 +135,12 @@ string program_name = "spine"; if (!empty(manifest.src.filename)) { <> <> - <> + <> + <> + <> + <> + <> + <> <> <> } else { @@ -307,14 +326,14 @@ mixin outputHub; **** init :init: -#+NAME: spine_init +#+NAME: spine_init_0 #+BEGIN_SRC d auto hvst = spineHarvest!(); #+END_SRC **** args :args: -#+NAME: spine_init +#+NAME: spine_init_1 #+BEGIN_SRC d string flag_action; string arg_unrecognized; @@ -324,7 +343,7 @@ static auto rgx = RgxI(); *** scope (run complete) :scope: -#+NAME: spine_init +#+NAME: spine_init_2 #+BEGIN_SRC d scope(success) { writefln( @@ -349,7 +368,7 @@ scope(failure) { - set getopt options ***** initialize -#+NAME: spine_args +#+NAME: spine_args_0 #+BEGIN_SRC d bool[string] opts = [ "abstraction" : false, @@ -427,7 +446,7 @@ string[string] settings = [ ***** set & describe -#+NAME: spine_args +#+NAME: spine_args_1 #+BEGIN_SRC d auto helpInfo = getopt(args, std.getopt.config.passThrough, @@ -509,7 +528,7 @@ if (helpInfo.helpWanted) { **** getopt hash to struct - move getopt options to struct -#+NAME: spine_args +#+NAME: spine_args_2 #+BEGIN_SRC d enum outTask { source_or_pod, sqlite, sqlite_multi, latex, odt, epub, html_scroll, html_seg, html_stuff } struct OptActions { @@ -830,7 +849,7 @@ OptActions _opt_action = OptActions(); **** env - environmental info -#+NAME: spine_args +#+NAME: spine_args_3 #+BEGIN_SRC d @safe auto program_info() { struct ProgramInfo { @@ -862,7 +881,7 @@ auto _env = [ *** get/read site config -#+NAME: spine_args +#+NAME: spine_args_4 #+BEGIN_SRC d auto _manifested = PathMatters!()(_opt_action, _env, ""); auto _manifests = [ _manifested ]; @@ -897,7 +916,7 @@ if (_opt_action.show_config) { *** use config for operations that do not require file processing -#+NAME: spine_args +#+NAME: spine_args_5 #+BEGIN_SRC d if (!(_opt_action.skip_output)) { if ((_opt_action.debug_do) @@ -916,7 +935,7 @@ if (!(_opt_action.skip_output)) { *** opt action on processing files (loop args) -#+NAME: spine_args +#+NAME: spine_args_6 #+BEGIN_SRC d ConfComposite _make_and_meta_struct = _config; destroy(_config); @@ -1153,7 +1172,7 @@ if ((doc_matters.opt.action.debug_do) ***** show document summary - abstraction _print summary_ (to screen) :abstraction:summary: --show-summary (abstraction summary) -#+NAME: spine_each_file_do_debugs_checkdoc +#+NAME: spine_each_file_do_debugs_checkdoc_0 #+BEGIN_SRC d /+ ↓ debugs +/ if (doc_matters.opt.action.verbose @@ -1167,7 +1186,7 @@ if (doc_matters.opt.action.verbose ***** show metadata (doc headers metadata) --show-metadata -#+NAME: spine_each_file_do_debugs_checkdoc +#+NAME: spine_each_file_do_debugs_checkdoc_1 #+BEGIN_SRC d /+ ↓ debugs +/ if (doc_matters.opt.action.show_metadata) { @@ -1179,7 +1198,7 @@ if (doc_matters.opt.action.show_metadata) { ***** show make (make files & doc headers) --show-make -#+NAME: spine_each_file_do_debugs_checkdoc +#+NAME: spine_each_file_do_debugs_checkdoc_2 #+BEGIN_SRC d /+ ↓ debugs +/ if (doc_matters.opt.action.show_make) { @@ -1191,7 +1210,7 @@ if (doc_matters.opt.action.show_make) { ***** show config (config files & doc headers) --show-config -#+NAME: spine_each_file_do_debugs_checkdoc +#+NAME: spine_each_file_do_debugs_checkdoc_3 #+BEGIN_SRC d /+ ↓ debugs +/ if (doc_matters.opt.action.show_config) { @@ -1203,7 +1222,7 @@ if (doc_matters.opt.action.show_config) { ***** abstraction harvest :abstraction:harvest: - abstraction harvest -#+NAME: spine_each_file_do_debugs_checkdoc +#+NAME: spine_each_file_do_debugs_checkdoc_4 #+BEGIN_SRC d if (doc_matters.opt.action.harvest) { auto _hvst = spineMetaDocHarvest!()(doc_matters, hvst); @@ -1225,7 +1244,7 @@ if (doc_matters.opt.action.harvest) { **** 1. _debug_ (document parts, checkdoc) :debug:checkdoc: - [[./meta_output_debugs.org][meta_output_debugs]] -#+NAME: spine_each_file_do_debugs_checkdoc +#+NAME: spine_each_file_do_debugs_checkdoc_5 #+BEGIN_SRC d /+ ↓ debugs +/ if (doc_matters.opt.action.debug_do) { @@ -1304,6 +1323,14 @@ template spineAbstraction() { <> <> <> + <> + <> + <> + <> + <> + <> + <> + <> auto t = tuple(doc_abstraction, doc_matters); return t; } @@ -1454,14 +1481,14 @@ if ((_opt_action.debug_do) **** DocumentMatters struct { -#+NAME: spine_each_file_do_document_matters +#+NAME: spine_each_file_do_document_matters_0 #+BEGIN_SRC d struct DocumentMatters { #+END_SRC **** generator related -#+NAME: spine_each_file_do_document_matters +#+NAME: spine_each_file_do_document_matters_1 #+BEGIN_SRC d @safe auto generator_program() { struct Prog_ { @@ -1510,7 +1537,7 @@ struct DocumentMatters { **** config make & meta -#+NAME: spine_each_file_do_document_matters +#+NAME: spine_each_file_do_document_matters_2 #+BEGIN_SRC d @safe auto conf_make_meta() { return _make_and_meta_struct; @@ -1522,7 +1549,7 @@ struct DocumentMatters { **** env related -#+NAME: spine_each_file_do_document_matters +#+NAME: spine_each_file_do_document_matters_3 #+BEGIN_SRC d @safe auto env() { struct Env_ { @@ -1539,7 +1566,7 @@ struct DocumentMatters { **** opt -#+NAME: spine_each_file_do_document_matters +#+NAME: spine_each_file_do_document_matters_4 #+BEGIN_SRC d @safe auto opt() { struct Opt_ { @@ -1557,7 +1584,7 @@ struct DocumentMatters { **** output related -#+NAME: spine_each_file_do_document_matters +#+NAME: spine_each_file_do_document_matters_5 #+BEGIN_SRC d @safe auto src() { return _manifest.src; @@ -1618,7 +1645,7 @@ struct DocumentMatters { **** } close -#+NAME: spine_each_file_do_document_matters +#+NAME: spine_each_file_do_document_matters_6 #+BEGIN_SRC d } auto doc_matters = DocumentMatters(); @@ -1626,7 +1653,7 @@ auto doc_matters = DocumentMatters(); **** step complete message -#+NAME: spine_each_file_do_document_matters +#+NAME: spine_each_file_do_document_matters_7 #+BEGIN_SRC d if ((_opt_action.debug_do) || (_opt_action.very_verbose) -- cgit v1.2.3