Lines Matching refs:line

73   foreach line [split $docs "\n"] {
74     regsub {[*]*} $line {} line
75     if {[regexp {^  } $line]} {
76       append current_doc "$line\n"
77     } elseif {[string trim $line]==""} {
85       regexp {^ *([[:alpha:]]*)} $line -> subject
89         set current_header [string trim $line]
105   foreach line [split [string trim $docs] "\n"] {
106     regexp {[*][*](.*)} $line -> line
107     if {[regexp {^ ?x.*:} $line]} {
108       append res "<dt><b>$line</b></dt><dd><p style=margin-top:0>\n"
111     if {[regexp {SYNONYM SUPPORT} $line]} {
112       set line "</dl><h3>Synonym Support</h3>"
114     if {[string trim $line] == ""} {
117       append res "$line\n"
152     regsub -line {^  *[)]} $hdr ")" hdr
159     foreach line [split [string trim $docs] "\n"] {
160       if {[string trim $line]==""} {
164         if {[regexp {^     } $line]} {
172       output $line
183   foreach line [split $data "\n"] {
185       if {[regexp $start $line]} {
191       append res "$line\n"
195       if {[regexp $end $line]} {