From c674fca7124ce4b8f9bd8b63ca590ae2a2526d76 Mon Sep 17 00:00:00 2001
From: Ralph Amissah <ralph@amissah.com>
Date: Mon, 31 Jul 2017 08:14:57 -0400
Subject: meta_abstraction, reduce side effect

---
 org/meta_abstraction.org | 32 ++++++++++++++++----------------
 1 file changed, 16 insertions(+), 16 deletions(-)

(limited to 'org/meta_abstraction.org')

diff --git a/org/meta_abstraction.org b/org/meta_abstraction.org
index afc5eb1..1050db7 100644
--- a/org/meta_abstraction.org
+++ b/org/meta_abstraction.org
@@ -2403,9 +2403,9 @@ void _check_ocn_status_(L,T)(
 #+name: abs_functions_block
 #+BEGIN_SRC d
 void _start_block_(L,T,N)(
-  L            line,
+             L line,
   return ref T type,
-  N            obj_cite_number_poem
+  return ref N obj_cite_number_poem
 ) {
   debug(asserts) {
     static assert(is(typeof(line)                 == char[]));
@@ -2595,7 +2595,7 @@ void _start_block_(L,T,N)(
 #+name: abs_functions_block_code
 #+BEGIN_SRC d
 void _code_block_(L,O,T)(
-  return ref L line,
+             L line,
   return ref O an_object,
   return ref T type
 ) {
@@ -2865,7 +2865,7 @@ void _biblio_block_(
 #+name: abs_functions_block_quote
 #+BEGIN_SRC d
 void _quote_block_(L,O,T)(
-  return ref L line,
+             L line,
   return ref O an_object,
   return ref T type
 ) {
@@ -2917,7 +2917,7 @@ void _quote_block_(L,O,T)(
 #+name: abs_functions_block_group
 #+BEGIN_SRC d
 void _group_block_(L,O,T)(
-  return ref L line,
+             L line,
   return ref O an_object,
   return ref T type
 ) {
@@ -2970,7 +2970,7 @@ void _group_block_(L,O,T)(
 #+name: abs_functions_block_block
 #+BEGIN_SRC d
 void _block_block_(L,O,T)(
-  return ref L line,
+             L line,
   return ref O an_object,
   return ref T type
 ) {
@@ -3021,12 +3021,12 @@ why extra object stuff only in poem/verse?
 #+name: abs_functions_block_poem
 #+BEGIN_SRC d
 void _poem_block_(L,O,T,C,N,Ma)(
-  L     line,
-  return ref O an_object,
+             L  line,
+  return ref O  an_object,
   return ref T type,
-  return ref C cntr,
-  N            obj_cite_number_poem,
-  Ma           dochead_make_aa,
+  return ref C  cntr,
+             N  obj_cite_number_poem,
+             Ma dochead_make_aa,
 ) {
   debug(asserts) {
     static assert(is(typeof(line)                 == char[]));
@@ -3262,7 +3262,7 @@ you need:
 #+name: abs_functions_block_table
 #+BEGIN_SRC d
 void _table_block_(L,O,T,Ma)(
-  return ref L line,
+             L line,
   return ref O an_object,
   return ref T type,
   return ref Ma dochead_make_aa
@@ -3845,8 +3845,8 @@ auto _heading_found_(L,X,H,R,T)(
 #+name: abs_functions_heading
 #+BEGIN_SRC d
 auto _heading_make_set_(L,C,R,T)(
-  L     line,
-  C     line_occur,
+             L line,
+             C line_occur,
   return ref R heading_match_rgx,
   return ref T type
 ) {
@@ -3914,7 +3914,7 @@ auto _heading_make_set_(L,C,R,T)(
 #+name: abs_functions_heading
 #+BEGIN_SRC d
 auto _heading_matched_(L,C,O,K,Lv,Lc,T,Me)(
-  return ref L  line,
+             L  line,
   return ref C  line_occur,
   return ref O  an_object,
   return ref K  an_object_key,
@@ -4075,7 +4075,7 @@ auto _heading_matched_(L,C,O,K,Lv,Lc,T,Me)(
 #+name: abs_functions_para
 #+BEGIN_SRC d
 void _para_match_(L,O,K,I,B,T,C)(
-  return ref L  line,
+             L  line, // watch
   return ref O  an_object,
   return ref K  an_object_key,
   return ref I  indent,
-- 
cgit v1.2.3