/L10"TCL/TK" 1Line Comment = # Escape Char = \ File Extensions = TCL TK /Delimiters = ~!@%^&*()+=|\/{}[]:;"'<> ,.?/ /Indent Strings = "{" /Unindent Strings = "}" /Function String = "%proc*{*}*{" /C1"Statements" after append array auto_execok auto_load auto_mkindex auto_reset bgerror catch cd clock close concat eof error eval exec exit expr fblocked fconfigure file fileevent flush format gets glob global history incr info interp join lappend lindex linsert list llength load lrange lreplace lsearch lsort message open package parray pid proc puts pwd read regexp regsub rename return scan seek set socket source split string subst tell time trace tcl_endOfWord tcl_startOfNextWord tcl_startOfPreviousWord tcl_wordBreakAfter tcl_wordBreakBefore unknown unset update uplevel upvar vwait /C2"Flow Control" break case continue default else elseif for foreach if switch then while /C3"???" auto_execs auto_index auto_noexec auto_noload auto_path env ErrorCode ErrorInfo tcl_library tcl_patchLevel tcl_pkgPath tcl_platform tcl_precision tcl_rcFileName tcl_rcRsrcName tcl_version tcl_nonwordchars tcl_wordchars unknown_active /C4"Oracle Extensions" convertin convertout oraarguments oraclose oradefine orafetch orafixit oralogoff oralogon oramsg oraopen oraresults orasql oravardesc /C5"Refs" ** $ /C6"Tk" bell bind bindtags bitmap button canvas checkbutton clipboard destroy entry event focus frame grab grid image label listbox lower menu menubutton message option pack photo place radiobutton raise scale scrollbar selection send text tk tk_bindForTraversal tk_bisque tk_chooseColor tk_dialog tk_focusFollowsMouse tk_focusNext tk_focusPrev tk_getOpenFile tk_getSaveFile tk_menuBar tk_messageBox tk_optionMenu tk_popup tk_setPalette tkerror tkvars tkwait toplevel winfo wm