Lines Matching refs:toc
16 snit::type ::doctools::toc::structure {
43 array set toc $contents
46 if {[info exists toc($k)]} continue
51 VerifyDivision $toc(items)
56 VerifyDivision $toc(items) iscanonical
89 array set toc $serial
90 array set toc $toc(doctools::toc)
91 unset toc(doctools::toc)
94 set serial [list doctools::toc \
96 items [CanonicalizeDivision $toc(items)] \
97 label $toc(label) \
98 title $toc(title)]]
108 # Merge using title and label of the second toc, and the new
112 array set a $seriala ; array set a $a(doctools::toc) ; unset a(doctools::toc)
113 array set b $serialb ; array set a $b(doctools::toc) ; unset b(doctools::toc)
116 set serial [list doctools::toc \
127 # Converts a toc serialization into a human readable string for
133 array set toc $serial
134 array set toc $toc(doctools::toc)
135 unset toc(doctools::toc)
138 lappend lines [list doctools::toc $toc(label) $toc(title)]
139 PrintDivision lines $toc(items) .... ....
165 array set toc $edata
167 if {[info exists toc($k)]} continue
170 lappend label($toc(label)) .
184 array set toc $edata
186 if {[info exists toc($k)]} continue
189 lappend label($toc(label)) .
191 VerifyDivision $toc(items)
193 VerifyDivision $toc(items) iscanonical
195 if {[info exists toc(id)]} {
215 unset toc
234 array set toc $edata
239 desc $toc(desc) \
240 id $toc(id) \
241 label $toc(label)]
245 if {[info exists toc(id)]} {
246 lappend element id $toc(id)
249 items [CanonicalizeDivision $toc(items)] \
250 label $toc(label)
253 unset toc
265 array set toc $edata
268 lappend lines $prefix[list $toc(id) $toc(label) $toc(desc)]
272 if {[info exists toc(id)]} {
273 lappend buf $toc(id)
275 lappend buf $toc(label)
277 PrintDivision lines $toc(items) $prefix$increment $increment
280 unset toc
291 array set toc $edata
292 set b($toc(label)) [list $etype $edata]
293 unset toc
301 array set toc $edata
302 set label $toc(label)
328 } elseif {[info exists toc(id)]} {
329 lappend element id $toc(id)
332 items [MergeDivisions $toc(items) $btoc(items)] \
340 unset toc
347 array set toc $edata
348 set label $toc(label)
358 typevariable ourcode doctools::toc
360 # # Test cases (doctools-toc-structure-)
387 package provide doctools::toc::structure 0.1