1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
|
#+TITLE: Emacs config file written in org-mode
#+AUTHOR: Ralph Amissah
#+EMAIL: ralph.amissah@gmail.com
#+STARTUP: indent
#+LANGUAGE: en
#+OPTIONS: H:3 num:nil toc:t \n:nil @:t ::t |:t ^:nil -:t f:t *:t <:t
#+OPTIONS: TeX:t LaTeX:t skip:nil d:nil todo:t pri:nil tags:not-in-toc
#+OPTIONS: author:nil email:nil creator:nil timestamp:nil
#+OPTIONS: ^:nil _:nil#+OPTIONS: ^:nil _:nil
#+EXPORT_SELECT_TAGS: export
#+EXPORT_EXCLUDE_TAGS: noexport
#+TAGS: Amissah(A) Class(c) WEB(W) noexport(n)
* object setter
** comment
#+name: ao_object_setter
#+BEGIN_SRC d :exports none
string[string] contents_comment(in string object) {
string[string] object_set;
object_set["use"] = "comment";
object_set["of"] = "comment";
object_set["is"] = "comment";
object_set["obj"] = object;
return object_set;
}
#+end_src
** heading
#+name: ao_object_setter
#+BEGIN_SRC d :exports none
string[string] contents_heading(
in int type,
in string object,
in string attrib,
in int ocn,
in string lev,
in string lvn,
in string lcn,
) {
string[string] object_set;
object_set["use"] = "content";
object_set["of"] = "para";
object_set["is"] = "heading";
object_set["type"] = to!string(type);
object_set["obj"] = object;
object_set["ocn"] = (ocn==0) ? "" : to!string(ocn);
object_set["lev"] = to!string(lev);
object_set["lvn"] = to!string(lvn);
object_set["lcn"] = to!string(lcn);
object_set["attrib"] = attrib;
return object_set;
}
#+end_src
** para
#+name: ao_object_setter
#+BEGIN_SRC d :exports none
string[string] contents_para(
in string type,
in string object,
in string attrib,
in int ocn,
in string indent_first,
in string indent_second,
in bool bullet
) {
string[string] object_set;
object_set["use"] = "content";
object_set["of"] = "para";
object_set["is"] = type;
object_set["obj"] = object;
object_set["ocn"] = (ocn==0) ? "" : to!string(ocn);
object_set["indent_first"] = indent_first;
object_set["indent_second"] = indent_second;
object_set["bullet"] = to!string(bullet);
object_set["attrib"] = attrib;
return object_set;
}
#+end_src
** block
#+name: ao_object_setter
#+BEGIN_SRC d :exports none
string[string] contents_block(
in string type,
in string object,
in string attrib,
in int ocn
) {
string[string] object_set;
object_set["use"] = "content";
object_set["of"] = "block";
object_set["is"] = type;
object_set["obj"] = object;
object_set["ocn"] = (ocn==0) ? "" : to!string(ocn);
object_set["attrib"] = attrib;
return object_set;
}
#+end_src
** block ocn string
#+name: ao_object_setter
#+BEGIN_SRC d :exports none
string[string] contents_block_ocn_string(
in string type,
in string object,
in string ocn,
in string node
) {
string[string] object_set;
object_set["use"] = "content";
object_set["of"] = "block";
object_set["is"] = type;
object_set["obj"] = object;
object_set["ocn"] = ocn;
object_set["node"] = node;
return object_set;
}
#+end_src
* tangles
** code structure: :ao_object_setter.d:
#+name: tangle_ao_object_setter
#+BEGIN_SRC d :tangle ../lib/sdp/ao_object_setter.d :exports none :noweb yes
/*
object setter
ao_object_setter.d
*/
mixin template ObjectSetters() {
class ObjectAbstractSet {
import std.conv : to;
<<ao_object_setter>>
}
}
#+end_src
|
