From c7c6c121884feb55ae3964e6055ac8ca983458cd Mon Sep 17 00:00:00 2001
From: Ralph Amissah <ralph@amissah.com>
Date: Sat, 20 Aug 2016 08:57:12 -0400
Subject: step 0.6.3 includes fixes

---
 org/ao_output_debugs.org | 39 +++++++++++++++++++++++++++++++++++++--
 1 file changed, 37 insertions(+), 2 deletions(-)

(limited to 'org/ao_output_debugs.org')

diff --git a/org/ao_output_debugs.org b/org/ao_output_debugs.org
index 0f001e1..d5d8177 100644
--- a/org/ao_output_debugs.org
+++ b/org/ao_output_debugs.org
@@ -14,6 +14,40 @@
 
 * output debugs                                                :debug:output:
 [[./sdp.org][sdp]]  [[./][org/]]
+
+** book index (sort &) report                                      :report:
+
+#+name: book_index_sorted_report
+#+BEGIN_SRC d
+struct BookIndexReport {
+// class BookIndexReport : AssertBookIndexReport {
+  int mkn, skn;
+  auto bookindex_report_sorted(
+    string[][string][string] bookindex_unordered_hashes
+  ) {
+    auto mainkeys=bookindex_unordered_hashes.byKey.array.
+      sort!("toLower(a) < toLower(b)", SwapStrategy.stable).release;
+    foreach (mainkey; mainkeys) {
+      auto subkeys=bookindex_unordered_hashes[mainkey].byKey.array.
+        sort!("toLower(a) < toLower(b)", SwapStrategy.stable).release;
+      foreach (subkey; subkeys) {
+        debug(bookindex) {
+          writeln(
+            mainkey, ": ",
+            subkey, ": ",
+            to!string(bookindex_unordered_hashes[mainkey][subkey])
+          );
+        }
+        // bookindex_the[mkn][mainkey][skn][subkey] ~= (bookindex_unordered_hashes[mainkey][subkey]);
+        ++skn;
+      }
+      ++mkn;
+    }
+    // return bookindex_the;
+  }
+}
+#+END_SRC
+
 ** (parent)                                                          :parent:
 
 #+name: ao_output_debugs
@@ -477,13 +511,14 @@ debug(checkdoc) {
   ao_output_debugs.d
 +/
 template SiSUoutputDebugs() {
+  <<book_index_sorted_report>>
   struct SDPoutputDebugs {
     auto abstract_doc_source_debugs(S)(
       auto ref const S         contents,
       string[][string][string] bookindex_unordered_hashes,
       JSONValue[]              biblio,
-      JSONValue[string]        dochead_make,
-      JSONValue[string]        dochead_meta,
+      string[string][string]   dochead_make,
+      string[string][string]   dochead_meta,
       string                   fn_src,
       bool[string]             opt_action_bool
     ) {
-- 
cgit v1.2.3