.#*�" 86 0 Tcl_Check_Syntax+! 1�0 Tcl_Check_Syntax�" 89# TCL�" $1��" 91 " $1� 3 create_syntax_table,*�" 95 $ name+��" 97+ tclmode.dfa $ name� : dfa_enable_highlight_cache��" 98$, ^[ \\t]*#.*$' comment $ name� 9 dfa_define_highlight_rule��" 99$, ;[ \\
t]*#.*$' comment $ name� 9 dfa_define_highlight_rule��# 100$3 "([^\\\\"]|\\\\.)*"& string $ name� 9 dfa_define_highlight_rule��# 101$* [{}\\[\\]]* Qdelimiter $ name� 9 dfa_define_highlight_rule��# 102$H [0-9]+(\\.[0-9]*)?([Ee][\\+\\-]?[0-9]*)?& number
 $ name� 9 dfa_define_highlight_rule��# 103! .& normal $ name� 9 dfa_define_highlight_rule��# 104$. [A-Za-z_\\.:]+' Knormal $ name� 9 dfa_define_highlight_rule��# 105$1 \\$[a-zA-Z0-9_:]+& string $ name� 9 dfa_define_highlight_rule��# 106$' \\${.*}' Q
string $ name� 9 dfa_define_highlight_rule��# 107$/ ^[ \\t]*proc.*$+ Qpreprocess $ name� 9 dfa_define_highlight_rule��# 108)  -[a-z]+ ( operator $ name� 9 dfa_define_highlight_rule��# 109 $ name� 9 dfa_build_highlight_table�" 95�2 setup_dfa_callback��#
 111}2 setup_dfa_callback# TCL� 5 dfa_set_init_callback�# 117! 0�" $2��# 118 " $1$ cdif! 2 " $2� 1 define_keywords_nP��# 119 " $1/ eofforpidpwdset! 3 " $2� 1 define_keywords_nP��# 120 " $1x caseelseevalexecexitexprfilegetsglobincrinfojoinlistloadop
enprocputsreadscanseektelltime! 4 " $2� 1 define_keywords_nP��# 121 " $1u afterarraybreakcatchclockcloseerrorfcopyflushlsortsplitsubsttraceunsetupvarvwaitwhile! 5 " $2� 1 define_keywords_nP��# 122 " $1� appendbinaryconcatformatglobalinterplindexlrange
regexpregsubrenamereturnsocketsourcestringswitch! 6 " $2� 1 define_keywords_nP��# 123 " $1_ consoleforeachhistorylappendlinsertllengthlsearchunknownuplevel! 7 " $2� 1 define_keywords_nP��# 124 " $18 continuefblockedlreplace! 8 " $2� 1 define_keywords
_nP��# 125 " $1) fileevent! 9 " $2� 1 define_keywords_nP�# 128! 1�" $2��# 129 " $1$ tkwm! 2 " $2� 1 define_keywords_nP��# 130 " $1D bellbindfontgrabgridmenupacksendtext! 4 " $2� 1 define_keywords_nP��# 131 " $1W entryeventfocusframeimagelabellower
placeraisescalewinfo! 5 " $2� 1 define_keywords_nP��# 132 " $1> buttoncanvasoptiontkwaitupdate! 6 " $2� 1 define_keywords_nP��# 133 " $1< destroylistboxmessagetkerror! 7 " $2� 1 define_keywords_nP��# 134 " $18 bindtagstk_popuptoplevel! 8 " $2� 1 de
fine_keywords_nP��# 135 " $1M clipboardscrollbarselectiontk_bisquetk_dialog! 9 " $2� 1 define_keywords_nP��# 136 " $1* menubutton" 10 " $2� 1 define_keywords_nP��# 137 " $16 checkbuttonradiobutton" 11 " $2� 1 define_keywords_nP��# 138 " $18 tk_focu
sNexttk_focusPrev" 12 " $2� 1 define_keywords_nP��# 139 " $1: tk_messageBoxtk_setPalette" 13 " $2� 1 define_keywords_nP��# 140 " $1X tk_chooseColortk_getOpenFiletk_getSaveFiletk_optionsMenu" 14 " $2� 1 define_keywords_nP,�# 142y/ tcl_indent_line,�#
 147 ' newline�# 148 / tcl_indent_line�# 145y6 tcl_newline_and_indent,*�# 151 ! n+�# 153 . bol_skip_white�# 154 + what_column ! nB.�# 156 ( bol_trim�# 157�! n��# 158 ! n� * whitespace/c�# 151y- tcl_indent_to,*�# 165 ! c * open_count+! 0�* open_count* +
 close_count+! 0�+ close_count*�# 166 ' escaped+! 0�' escaped�# 168 ) push_spot.�# 170 # bol/. $ eolpN/. * go_right_1/.�# 171 ) what_char�! c�# 172 ! c.�# 173" 92x3 ' escaped.! 2�' escaped/b/.�# 175# 123x3 ' escaped.�* open_count/b/.�# 177# 125x3 ' 
escaped.�# 178 * open_count.�* open_count/.�# 179�+ close_count/d/b/j�# 182 ' escaped.�' escaped/c/g�# 185 ( pop_spot�# 186 * open_count + close_countw�# 163y0 tcl_count_braces,.�# 193 $ up_1.�# 194 . bol_skip_white�# 195 $ eolp.u/c�# 196 ) what_char" 
35B.! 1w/c/.�# 198! 0w/d/e�# 190y) tcl_go_up,�# 205 # eol�# 206 + bskip_white��# 207$" \\� + blooking_at.! 1/.�# 208! 0/dw�# 203y5 tcl_is_continued_line,*�# 215 & indent+! 0�& indent* * open_count+�# 216 ) push_spot�# 217 ) tcl_go_up.�# 219 + what
_column�& indent�# 221 0 tcl_count_bracesP�* open_count�# 222 * open_count ( C_INDENT;�& indent�# 225 5 tcl_is_continued_line. 2 C_CONTINUED_OFFSET�& indent/c�# 226 ) tcl_go_up 5 tcl_is_continued_lineC. 2 C_CONTINUED_OFFSET�& indent/c/c�# 229 ( pop_spot�#
 230 & indentw�# 213y2 tcl_prev_line_rule,*�# 236 & indent+! 0�& indent* + close_count+! 0�+ close_count�# 238 0 tcl_count_braces�+ close_countP�# 239 + close_count ( C_INDENT;�& indent�# 240 & indentw�# 234y1 tcl_cur_line_rule,*�# 246 & cursor ) oldi
ndent+*�# 247 & indent+�# 250 + what_column�& cursor�# 251 . bol_skip_white�# 252 + what_column�) oldindent�# 255 2 tcl_prev_line_rule�& indent�# 256 1 tcl_cur_line_rule�& indent��# 260 & indent� - tcl_indent_to��# 261 & cursor & indent9 ) oldindent:� + g
oto_column�# 244y/ tcl_indent_line,��# 267! 1� , check_region�# 268 * pop_mark_1�# 269 ) push_mark�# 270 / tcl_indent_line�# 271 ( pop_spot�# 273 ) push_spot�# 274 ' go_up_1�# 275 & narrow�# 276 # bob��# 2783 Indenting region...� % flush.�# 279 & down_
1/.�# 280 / tcl_indent_line/f��# 2839 Indenting region... Done.� % flush�# 285 % widen�# 286 ( pop_spot�# 265y1 tcl_indent_region,*�# 290 # msg+��# 292) Warning:  # msg9� % flush�# 290y2 tcl_syntax_warning,��# 297! }� & insert�# 298 / tcl_indent_lin
e�# 299 + blink_match�# 295y. tcl_insert_ket,�# 304 0 Tcl_Check_Syntax.�# 305 ) push_spot�# 306 + bskip_white�# 307 $ bolp.��# 308C '{' shouldn't be on a separate line� 2 tcl_syntax_warning/c�# 310 ( pop_spot/c��# 312! {� & insert�# 302y. tcl_insert_br
a,�# 317 0 Tcl_Check_Syntax.�# 318 ) push_spot�# 319 + bskip_white�# 320 $ bolp�! ;� + blooking_atD.��# 321O '#' should be on a separate line or after a ';'� 2 tcl_syntax_warning/b�# 323 ( pop_spot/c��# 325! #� & insert�# 315y2 tcl_insert_comment�# 32
8# TCL�" $1��# 329 " $1� ( keymap_p.��# 331 " $1� + make_keymap��# 332. tcl_insert_bra! { " $1� ) definekey��# 333. tcl_insert_ket! } " $1� ) definekey��# 3342 tcl_insert_comment! # " $1� ) definekey��# 3351 tcl_indent_region" ^Q " $1� 2 defineke
y_reserved��# 336+ indent_line! 	 " $1� ) definekey/b,*�# 365 $ mode+# TCL�$ mode��# 366 $ mode! 4� ( set_mode��# 367 $ mode� * use_keymap��# 368 $ mode� 0 use_syntax_table��# 369+ indent_hook/ tcl_indent_line� / set_buffer_hook��# 3703 newline_in
dent_hook6 tcl_newline_and_indent� / set_buffer_hook��# 371- tcl_mode_hook� . run_mode_hooks�# 363y( tcl_mode