4 |
4 |
5 <style-sheet> |
5 <style-sheet> |
6 <style-specification use="docbook"> |
6 <style-specification use="docbook"> |
7 <style-specification-body> |
7 <style-specification-body> |
8 |
8 |
|
9 (define x "25") |
|
10 (define nnl (named-node-list-names (attributes current-node))) |
|
11 (define attributumok (attributes current-node)) |
|
12 |
|
13 |
9 (element etik:class |
14 (element etik:class |
10 (process-children)) |
15 (make sequence |
|
16 (if (attribute-string "id") |
|
17 (make element gi: "A" |
|
18 attributes: (list (list "NAME" (attribute-string "id"))) |
|
19 (empty-sosofo)) |
|
20 (empty-sosofo)) |
|
21 |
|
22 |
|
23 (if (attribute-string "xreflabel") (empty-sosofo) |
|
24 ( literal "ures xreflabel")) |
|
25 |
|
26 ;; (toc-entry (current-node)) |
|
27 (process-children))) |
11 |
28 |
12 (element (etik:class etik:name) |
29 (element (etik:class etik:name) |
13 (make element gi: "H2" |
30 (make element gi: "H2" |
14 (process-children))) |
31 (process-children))) |
15 |
32 |
93 (make element gi: "TH" (literal "Name")) |
110 (make element gi: "TH" (literal "Name")) |
94 (make element gi: "TH" (literal "Where defined")) |
111 (make element gi: "TH" (literal "Where defined")) |
95 (make element gi: "TH" (literal "Description")) |
112 (make element gi: "TH" (literal "Description")) |
96 (process-children))))) |
113 (process-children))))) |
97 |
114 |
|
115 (element (etik:class etik:prot_members) |
|
116 (make sequence |
|
117 (make element gi: "H3" |
|
118 (literal "Protected members")) |
|
119 (make element gi: "TABLE" |
|
120 attributes: (list |
|
121 (list "CELLSPACING" "1") |
|
122 (list "BORDER" "1")) |
|
123 (make element gi: "TR" |
|
124 (make element gi: "TH" (literal "Name")) |
|
125 (make element gi: "TH" (literal "Where defined")) |
|
126 (make element gi: "TH" (literal "Description")) |
|
127 (process-children))))) |
|
128 |
|
129 (element (etik:prot_members etik:member) |
|
130 (make element gi: "TR" |
|
131 (process-children))) |
|
132 |
|
133 (element (etik:class etik:priv_members) |
|
134 (make sequence |
|
135 (make element gi: "H3" |
|
136 (literal "Private members")) |
|
137 (make element gi: "TABLE" |
|
138 attributes: (list |
|
139 (list "CELLSPACING" "1") |
|
140 (list "BORDER" "1")) |
|
141 (make element gi: "TR" |
|
142 (make element gi: "TH" (literal "Name")) |
|
143 (make element gi: "TH" (literal "Where defined")) |
|
144 (make element gi: "TH" (literal "Description")) |
|
145 (process-children))))) |
|
146 |
|
147 (element (etik:priv_members etik:member) |
|
148 (make element gi: "TR" |
|
149 (process-children))) |
|
150 |
98 (element (etik:example etik:code) |
151 (element (etik:example etik:code) |
99 ($verbatim-display$ |
152 ($verbatim-display$ |
100 #f ;; mivel indentaljon |
153 #f ;; mivel indentaljon |
101 #f)) ;; legyen-e sorszamozas |
154 #f)) ;; legyen-e sorszamozas |
|
155 |
|
156 (element (etik:class etik:notes) |
|
157 (make sequence |
|
158 (make element gi: "H3" |
|
159 (literal "Notes")) |
|
160 (make element gi: "P" |
|
161 (process-children)))) |
|
162 |
|
163 (element (etik:class etik:category) |
|
164 (make sequence |
|
165 (make element gi: "H3" |
|
166 (literal "Category")) |
|
167 (make element gi: "P" |
|
168 (process-children)))) |
102 |
169 |
103 |
170 |
104 </style-specification-body> |
171 </style-specification-body> |
105 </style-specification> |
172 </style-specification> |
106 <external-specification id="docbook" document="dbstyle"> |
173 <external-specification id="docbook" document="dbstyle"> |