Before

…lines 1–147 unchanged (147 lines)
148<p>The package requires Tcl threading extension but can be alternatively
149used stand-alone within the AOLserver, a scalable webserver from
150America Online.</p>
151<p>In a nutshell, a short sample illustrating the usage of the ttrace
152with the Tcl threading extension:</p>
153<pre class="doctools_example">
154 % package require Ttrace
155 2.8.2
156 % set t1 [thread::create {package require Ttrace; thread::wait}]
157 tid0x1802800
158 % ttrace::eval {proc test args {return test-[thread::id]}}
159 % thread::send $t1 test
160 test-tid0x1802800
161 % set t2 [thread::create {package require Ttrace; thread::wait}]
…lines 162–313 unchanged (152 lines)

After

…lines 1–147 unchanged (147 lines)
148<p>The package requires Tcl threading extension but can be alternatively
149used stand-alone within the AOLserver, a scalable webserver from
150America Online.</p>
151<p>In a nutshell, a short sample illustrating the usage of the ttrace
152with the Tcl threading extension:</p>
153<pre class="doctools_example">
154 % package require Ttrace
155 2.8.13
156 % set t1 [thread::create {package require Ttrace; thread::wait}]
157 tid0x1802800
158 % ttrace::eval {proc test args {return test-[thread::id]}}
159 % thread::send $t1 test
160 test-tid0x1802800
161 % set t2 [thread::create {package require Ttrace; thread::wait}]
…lines 162–313 unchanged (152 lines)

Before

document
element
start_tag
< "<"
tag_name "html"
> ">"
element (+36 nodes collapsed)
ERROR
<! "<!"
ERROR "-- Generated from file"
' "'"
' "'"
ERROR "by tcllib/doctools with format"
' "'"
ERROR "html"
' "'"
ERROR "--"
> ">"
<! "<!"
ERROR "-- ttrace.n\n --"
> ">"
element
start_tag
< "<"
tag_name "body"
> ">"
element
start_tag
< "<"
tag_name "div"
attribute
attribute_name "class"
= "="
quoted_attribute_value
" "\""
attribute_value "doctools"
" "\""
> ">"
element
start_tag
< "<"
tag_name "h1"
attribute
attribute_name "class"
= "="
quoted_attribute_value
" "\""
attribute_value "doctools_title"
" "\""
> ">"
text "ttrace(n) 2.8"
entity "&quot;"
text "Tcl Threading"
entity "&quot;"
end_tag
</ "</"
tag_name "h1"
> ">"
element (+59 nodes collapsed)
element (+329 nodes collapsed)
element (+1341 nodes collapsed)
element
start_tag
< "<"
tag_name "div"
attribute
attribute_name "id"
= "="
quoted_attribute_value
" "\""
attribute_value "section1"
" "\""
attribute
attribute_name "class"
= "="
quoted_attribute_value
" "\""
attribute_value "doctools_section"
" "\""
> ">"
element (+26 nodes collapsed)
element (+28 nodes collapsed)
element
start_tag
< "<"
tag_name "p"
> ">"
text "The package requires Tcl threading extension but can be alte"...
end_tag
</ "</"
tag_name "p"
> ">"
element
start_tag
< "<"
tag_name "p"
> ">"
text "In a nutshell, a short sample illustrating the usage of the "...
end_tag
</ "</"
tag_name "p"
> ">"
element
start_tag
< "<"
tag_name "pre"
attribute
attribute_name "class"
= "="
quoted_attribute_value
" "\""
attribute_value "doctools_example"
" "\""
> ">"
text "% package require Ttrace\n 2.8.2\n % set t1 [thread::cre"...
end_tag
</ "</"
tag_name "pre"
> ">"
element (+46 nodes collapsed)
end_tag
</ "</"
tag_name "div"
> ">"
element (+592 nodes collapsed)
element (+1632 nodes collapsed)
element (+141 nodes collapsed)
element (+59 nodes collapsed)
element (+59 nodes collapsed)
end_tag
</ "</"
tag_name "div"
> ">"
end_tag
</ "</"
tag_name "body"
> ">"
end_tag
</ "</"
tag_name "html"
> ">"

After

document
element
start_tag
< "<"
tag_name "html"
> ">"
element (+36 nodes collapsed)
ERROR
<! "<!"
ERROR "-- Generated from file"
' "'"
' "'"
ERROR "by tcllib/doctools with format"
' "'"
ERROR "html"
' "'"
ERROR "--"
> ">"
<! "<!"
ERROR "-- ttrace.n\n --"
> ">"
element
start_tag
< "<"
tag_name "body"
> ">"
element
start_tag
< "<"
tag_name "div"
attribute
attribute_name "class"
= "="
quoted_attribute_value
" "\""
attribute_value "doctools"
" "\""
> ">"
element
start_tag
< "<"
tag_name "h1"
attribute
attribute_name "class"
= "="
quoted_attribute_value
" "\""
attribute_value "doctools_title"
" "\""
> ">"
text "ttrace(n) 2.8"
entity "&quot;"
text "Tcl Threading"
entity "&quot;"
end_tag
</ "</"
tag_name "h1"
> ">"
element (+59 nodes collapsed)
element (+329 nodes collapsed)
element (+1341 nodes collapsed)
element
start_tag
< "<"
tag_name "div"
attribute
attribute_name "id"
= "="
quoted_attribute_value
" "\""
attribute_value "section1"
" "\""
attribute
attribute_name "class"
= "="
quoted_attribute_value
" "\""
attribute_value "doctools_section"
" "\""
> ">"
element (+26 nodes collapsed)
element (+28 nodes collapsed)
element
start_tag
< "<"
tag_name "p"
> ">"
text "The package requires Tcl threading extension but can be alte"...
end_tag
</ "</"
tag_name "p"
> ">"
element
start_tag
< "<"
tag_name "p"
> ">"
text "In a nutshell, a short sample illustrating the usage of the "...
end_tag
</ "</"
tag_name "p"
> ">"
element
start_tag
< "<"
tag_name "pre"
attribute
attribute_name "class"
= "="
quoted_attribute_value
" "\""
attribute_value "doctools_example"
" "\""
> ">"
text "% package require Ttrace\n 2.8.13\n % set t1 [thread::cr"...
end_tag
</ "</"
tag_name "pre"
> ">"
element (+46 nodes collapsed)
end_tag
</ "</"
tag_name "div"
> ">"
element (+592 nodes collapsed)
element (+1632 nodes collapsed)
element (+141 nodes collapsed)
element (+59 nodes collapsed)
element (+59 nodes collapsed)
end_tag
</ "</"
tag_name "div"
> ">"
end_tag
</ "</"
tag_name "body"
> ">"
end_tag
</ "</"
tag_name "html"
> ">"