x: package require Tk 
x: list update 
x: set updatecmd 0
� 
x: radiobutton .radio_noidle -text update -variable updatecmd -value update 
eval script: ::oo::define ::oo::Slot {
    method Get {} {error unimplemented}
    method Set list {error unimplemented}
    method -set args {
        uplevel 1 [list [namespace which my] Set $args]
    }
    method -append args {
        uplevel 1 [list [namespace which my] Set [list                {*}[uplevel 1 [list [namespace which my] Get]] {*}$args]]
    }
    method -clear {} {uplevel 1 [list [namespace which my] Set {}]}
    forward --default-operation my -append
    method unknown {args} {
        set def --default-operation
        if {[llength $args] == 0} {
            return [uplevel 1 [list [namespace which my] $def]]
        } elseif {![string match -* [lindex $args 0]]} {
            return [uplevel 1 [list [namespace which my] $def {*}$args]]
        }
        next {*}$args
    }
    export -set -append -clear
    unexport unknown destroy
}
::oo::objdefine ::oo::define::superclass forward --default-operation my -set
::oo::objdefine ::oo::define::mixin forward --default-operation my -set
::oo::objdefine ::oo::objdefine::mixin forward --default-operation my -set

eval ::oo::define ::oo::Slot {
    method Get {} {error unimplemented}
    method Set list {error unimplemented}
    method -set args {
        uplevel 1 [list [namespace which my] Set $args]
    }
    method -append args {
        uplevel 1 [list [namespace which my] Set [list                {*}[uplevel 1 [list [namespace which my] Get]] {*}$args]]
    }
    method -clear {} {uplevel 1 [list [namespace which my] Set {}]}
    forward --default-operation my -append
    method unknown {args} {
        set def --default-operation
        if {[llength $args] == 0} {
            return [uplevel 1 [list [namespace which my] $def]]
        } elseif {![string match -* [lindex $args 0]]} {
            return [uplevel 1 [list [namespace which my] $def {*}$args]]
        }
        next {*}$args
    }
    export -set -append -clear
    unexport unknown destroy
}
::oo::objdefine ::oo::define::superclass forward --default-operation my -set
::oo::objdefine ::oo::define::mixin forward --default-operation my -set
::oo::objdefine ::oo::objdefine::mixin forward --default-operation my -set

x: ::oo::define ::oo::Slot 
    method Get {} {error unimplemented}
    method Set list {error unimplemented}
    method -set args {
        uplevel 1 [list [namespace which my] Set $args]
    }
    method -append args {
        uplevel 1 [list [namespace which my] Set [list                {*}[uplevel 1 [list [namespace which my] Get]] {*}$args]]
    }
    method -clear {} {uplevel 1 [list [namespace which my] Set {}]}
    forward --default-operation my -append
    method unknown {args} {
        set def --default-operation
        if {[llength $args] == 0} {
            return [uplevel 1 [list [namespace which my] $def]]
        } elseif {![string match -* [lindex $args 0]]} {
            return [uplevel 1 [list [namespace which my] $def {*}$args]]
        }
        next {*}$args
    }
    export -set -append -clear
    unexport unknown destroy
 
x: method Get  error unimplemented 
x: method Set list error unimplemented 
x: method -set args 
        uplevel 1 [list [namespace which my] Set $args]
     
x: method -append args 
        uplevel 1 [list [namespace which my] Set [list                {*}[uplevel 1 [list [namespace which my] Get]] {*}$args]]
     
x: method -clear  uplevel 1 [list [namespace which my] Set {}] 
x: forward --default-operation my -append 
x: method unknown args 
        set def --default-operation
        if {[llength $args] == 0} {
            return [uplevel 1 [list [namespace which my] $def]]
        } elseif {![string match -* [lindex $args 0]]} {
            return [uplevel 1 [list [namespace which my] $def {*}$args]]
        }
        next {*}$args
     
x: export -set -append -clear 
x: unexport unknown destroy 
x: ::oo::objdefine ::oo::define::superclass forward --default-operation my -set 
x: ::oo::objdefine::forward --default-operation my -set 
x: ::oo::objdefine ::oo::define::mixin forward --default-operation my -set 
x: ::oo::objdefine::forward --default-operation my -set 
x: ::oo::objdefine ::oo::objdefine::mixin forward --default-operation my -set 
x: ::oo::objdefine::forward --default-operation my -set 
eval script: package ifneeded TclOO 1.0.4 {# Already present, OK?};namespace eval ::oo { variable version 1.0.4 };namespace eval ::oo { variable patchlevel 1.0.4 };
eval package ifneeded TclOO 1.0.4 {# Already present, OK?};namespace eval ::oo { variable version 1.0.4 };namespace eval ::oo { variable patchlevel 1.0.4 };
x: package ifneeded TclOO 1.0.4 # Already present, OK? 
x: namespace eval ::oo  variable version 1.0.4  
x: ::tcl::namespace::eval ::oo  variable version 1.0.4  
x: variable version 1.0.4 
x: namespace eval ::oo  variable patchlevel 1.0.4  
x: ::tcl::namespace::eval ::oo  variable patchlevel 1.0.4  
x: variable patchlevel 1.0.4 
eval script: namespace eval ::tcl::zlib {variable cmdcounter 0}
eval namespace eval ::tcl::zlib {variable cmdcounter 0}
x: namespace eval ::tcl::zlib variable cmdcounter 0 
x: ::tcl::namespace::eval ::tcl::zlib variable cmdcounter 0 
x: variable cmdcounter 0 
x: pack .radio_noidle -anchor w 
x: radiobutton .radio_idle -text update idletasks -variable updatecmd -value update idletasks 
x: pack .radio_idle -anchor w 
x: proc swap  
	global PackedLabel updatecmd
	
	.b configure -state disabled
	pack forget $PackedLabel
	if {$PackedLabel eq ".foo"} {
		set PackedLabel .bar
	} else {
		set PackedLabel .foo
	}
	pack $PackedLabel -pady 10
	eval $updatecmd; flush stdout
	
	# mimic being occupied for two seconds
	after 2000
	.b configure -state normal
 
x: button .b -text Swap Labels -command swap 
x: pack .b -padx 10 -pady 10 
x: label .foo -text foo -bg lightblue -padx 5 -bd 2 -relief groove 
x: label .bar -text bar -bg lightyellow -padx 5 -bd 2 -relief groove 
x: pack .foo -pady 10 
x: set PackedLabel .foo 
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$1 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$2 = (Tcl_IdleProc *) 0x9dbf20 <MapFrame>
Tcl_DoOneEvent(32)
Service Idle EventIdle proc:
$3 = (Tcl_IdleProc *) 0xa409e0 <ThemeChangedProc>
eval script: ttk::ThemeChanged
eval ttk::ThemeChanged
x: ttk::ThemeChanged 
x: event generate . <<ThemeChanged>> 
x: winfo children . 
x: event generate .radio_noidle <<ThemeChanged>> 
x: winfo children .radio_noidle 
x: event generate .radio_idle <<ThemeChanged>> 
x: winfo children .radio_idle 
x: event generate .b <<ThemeChanged>> 
x: winfo children .b 
x: event generate .foo <<ThemeChanged>> 
x: winfo children .foo 
x: event generate .bar <<ThemeChanged>> 
x: winfo children .bar 
Idle proc:
$4 = (Tcl_IdleProc *) 0xa710f0 <ArrangePacking>
Tcl_DoOneEvent(32)
Service Idle EventIdle proc:
$5 = (Tcl_IdleProc *) 0xa710f0 <ArrangePacking>
Tcl_DoOneEvent(32)
Service Idle EventCall event proc:
$6 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$7 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$8 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$9 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$10 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$11 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$12 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$13 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$14 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$15 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$16 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$17 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$18 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$19 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$20 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$21 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$22 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$23 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$24 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$25 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$26 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$27 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$28 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$29 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$30 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$31 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$32 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$33 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$34 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$35 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$36 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$37 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$38 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$39 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$40 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$41 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$42 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$43 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$44 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$45 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$46 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$47 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$48 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$49 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$50 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$51 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$52 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$53 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$54 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$55 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$56 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$57 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$58 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$59 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$60 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$61 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$62 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$63 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$64 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Call event proc:
$65 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$66 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$67 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$68 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$69 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$70 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$71 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$72 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$73 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$74 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$75 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$76 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$77 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$78 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$79 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$80 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$81 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$82 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$83 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$84 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$85 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$86 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$87 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$88 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$89 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$90 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$91 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$92 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$93 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$94 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$95 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$96 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$97 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$98 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$99 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$100 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$101 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$102 = (Tcl_IdleProc *) 0x9dac00 <DisplayFrame>
Idle proc:
$103 = (Tcl_IdleProc *) 0xa710f0 <ArrangePacking>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$104 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$105 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$106 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$107 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$108 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$109 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$110 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$111 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$112 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$113 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Idle proc:
$114 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Idle proc:
$115 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Idle proc:
$116 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$117 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$118 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$119 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$120 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$121 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$122 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$123 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$124 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$125 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$126 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$127 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$128 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$129 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$130 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$131 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$132 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$133 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$134 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$135 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$136 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$137 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$138 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$139 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$140 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$141 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$142 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$143 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$144 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$145 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$146 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
eval ::tk::ScreenChanged :1054.0
x: ::tk::ScreenChanged :1054.0 
x: uplevel #0  
x: upvar #0 ::tk::Priv.:1054 ::tk::Priv 
Eval bind -> 
    tk::ButtonEnter .b

eval script: 
    tk::ButtonEnter .b

eval 
    tk::ButtonEnter .b

x: tk::ButtonEnter .b 
x: .b cget -state 
x: .b configure -state active 
x: .b cget -relief 
x: .b cget -overrelief 
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$147 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$148 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$149 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$150 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$151 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$152 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$153 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$154 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$155 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$156 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$157 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$158 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$159 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$160 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$161 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$162 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$163 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$164 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$165 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$166 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$167 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$168 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$169 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$170 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$171 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$172 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$173 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$174 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$175 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$176 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$177 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$178 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$179 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$180 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$181 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$182 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$183 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Eval bind -> 
    tk::ButtonDown .b

eval script: 
    tk::ButtonDown .b

eval 
    tk::ButtonDown .b

x: tk::ButtonDown .b 
x: .b cget -state 
x: .b configure -relief sunken 
x: after cancel  
x: .b cget -repeatdelay 
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$184 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$185 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$186 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$187 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$188 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Eval bind -> 
    tk::ButtonUp .b

eval script: 
    tk::ButtonUp .b

eval 
    tk::ButtonUp .b

x: tk::ButtonUp .b 
x: .b cget -relief 
x: .b configure -relief raised 
x: after cancel  
x: .b cget -state 
x: uplevel #0 �z� 
x: .b invoke 
eval swap
x: swap 
x: .b configure -state disabled 
x: pack forget .foo 
x: pack .bar -pady 10 
x: eval update 
x: update 
Tcl_DoOneEvent(2)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$189 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Idle proc:
$190 = (Tcl_IdleProc *) 0xa710f0 <ArrangePacking>
Tcl_DoOneEvent(2)
Wait for event
Call event proc:
$191 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(2)
Call event proc:
$192 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(2)
Call event proc:
$193 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(2)
Call event proc:
$194 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(2)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$195 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Idle proc:
$196 = (Tcl_IdleProc *) 0x9dac00 <DisplayFrame>
Tcl_DoOneEvent(2)
Wait for event
Check for idle events
Service Idle EventTcl_DoOneEvent(2)
Wait for event
Call event proc:
$197 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(2)
Wait for event
Check for idle events
Service Idle EventTcl_DoOneEvent(2)
Wait for event
Check for idle events
Service Idle Eventx: flush stdout 
x: after 2000 
x: .b configure -state normal 
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$198 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$199 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$200 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$201 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$202 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Eval bind -> 
    tk::ButtonDown .b

eval script: 
    tk::ButtonDown .b

eval 
    tk::ButtonDown .b

x: tk::ButtonDown .b 
x: .b cget -relief 
x: .b cget -state 
x: .b configure -relief sunken 
x: after cancel  
x: .b cget -repeatdelay 
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$203 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$204 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$205 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$206 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$207 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Eval bind -> 
    tk::ButtonUp .b

eval script: 
    tk::ButtonUp .b

eval 
    tk::ButtonUp .b

x: tk::ButtonUp .b 
x: .b cget -relief 
x: .b configure -relief raised 
x: after cancel  
x: .b cget -state 
x: uplevel #0 �� 
x: .b invoke 
eval swap
x: swap 
x: .b configure -state disabled 
x: pack forget .bar 
x: pack .foo -pady 10 
x: eval update 
x: update 
Tcl_DoOneEvent(2)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$208 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Idle proc:
$209 = (Tcl_IdleProc *) 0xa710f0 <ArrangePacking>
Tcl_DoOneEvent(2)
Wait for event
Call event proc:
$210 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(2)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$211 = (Tcl_IdleProc *) 0x9dac00 <DisplayFrame>
Tcl_DoOneEvent(2)
Wait for event
Call event proc:
$212 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(2)
Call event proc:
$213 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(2)
Call event proc:
$214 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(2)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$215 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Tcl_DoOneEvent(2)
Wait for event
Check for idle events
Service Idle EventTcl_DoOneEvent(2)
Wait for event
Call event proc:
$216 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(2)
Wait for event
Check for idle events
Service Idle EventTcl_DoOneEvent(2)
Wait for event
Check for idle events
Service Idle Eventx: flush stdout 
x: after 2000 
x: .b configure -state normal 
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$217 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$218 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$219 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Eval bind -> 
    tk::ButtonLeave .b

eval script: 
    tk::ButtonLeave .b

eval 
    tk::ButtonLeave .b

x: tk::ButtonLeave .b 
x: .b cget -state 
x: .b configure -state normal 
Tcl_DoOneEvent(0)
Call event proc:
$220 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$221 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$222 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$223 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Eval bind -> 
	tk::ButtonEnter .radio_idle
    
eval script: 
	tk::ButtonEnter .radio_idle
    
eval 
	tk::ButtonEnter .radio_idle
    
x: tk::ButtonEnter .radio_idle 
x: .radio_idle cget -state 
x: .radio_idle configure -state active 
x: .radio_idle cget -relief 
x: .radio_idle cget -overrelief 
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$224 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Idle proc:
$225 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Idle proc:
$226 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Tcl_DoOneEvent(0)
Call event proc:
$227 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$228 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$229 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$230 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$231 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$232 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$233 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$234 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$235 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$236 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$237 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$238 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$239 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$240 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$241 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$242 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$243 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$244 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$245 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$246 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$247 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$248 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$249 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$250 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$251 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$252 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$253 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$254 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$255 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$256 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$257 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$258 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$259 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$260 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$261 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$262 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$263 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$264 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$265 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$266 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$267 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$268 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$269 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$270 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$271 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$272 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$273 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$274 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Eval bind -> 
	tk::CheckRadioInvoke .radio_idle
    
eval script: 
	tk::CheckRadioInvoke .radio_idle
    
eval 
	tk::CheckRadioInvoke .radio_idle
    
x: tk::CheckRadioInvoke .radio_idle 
x: .radio_idle cget -state 
x: uplevel #0 0�� 
x: .radio_idle invoke 
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$275 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Idle proc:
$276 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$277 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$278 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$279 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$280 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$281 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$282 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$283 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$284 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$285 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$286 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$287 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$288 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$289 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$290 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$291 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$292 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$293 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Eval bind -> 
    tk::ButtonLeave .radio_idle

eval script: 
    tk::ButtonLeave .radio_idle

eval 
    tk::ButtonLeave .radio_idle

x: tk::ButtonLeave .radio_idle 
x: .radio_idle cget -state 
x: .radio_idle configure -state normal 
Tcl_DoOneEvent(0)
Call event proc:
$294 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$295 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Idle proc:
$296 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Tcl_DoOneEvent(0)
Call event proc:
$297 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$298 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$299 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$300 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$301 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$302 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$303 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$304 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$305 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$306 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$307 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$308 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$309 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$310 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$311 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$312 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$313 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$314 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$315 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$316 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Eval bind -> 
    tk::ButtonEnter .b

eval script: 
    tk::ButtonEnter .b

eval 
    tk::ButtonEnter .b

x: tk::ButtonEnter .b 
x: .b cget -state 
x: .b configure -state active 
x: .b cget -relief 
x: .b cget -overrelief 
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$317 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Idle proc:
$318 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$319 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$320 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$321 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$322 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$323 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$324 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$325 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$326 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$327 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$328 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$329 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$330 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$331 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$332 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$333 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$334 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$335 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$336 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$337 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$338 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$339 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$340 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$341 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$342 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$343 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$344 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$345 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$346 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$347 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$348 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$349 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$350 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$351 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$352 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$353 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$354 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$355 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$356 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$357 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$358 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$359 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$360 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$361 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$362 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$363 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$364 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$365 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$366 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$367 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$368 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$369 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$370 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$371 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$372 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$373 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$374 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$375 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$376 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$377 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$378 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$379 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$380 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$381 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$382 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$383 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$384 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$385 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$386 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$387 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$388 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$389 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$390 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$391 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$392 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Eval bind -> 
    tk::ButtonDown .b

eval script: 
    tk::ButtonDown .b

eval 
    tk::ButtonDown .b

x: tk::ButtonDown .b 
x: .b cget -state 
x: .b configure -relief sunken 
x: after cancel  
x: .b cget -repeatdelay 
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$393 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$394 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$395 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$396 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$397 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Eval bind -> 
    tk::ButtonUp .b

eval script: 
    tk::ButtonUp .b

eval 
    tk::ButtonUp .b

x: tk::ButtonUp .b 
x: .b cget -relief 
x: .b configure -relief raised 
x: after cancel  
x: .b cget -state 
x: uplevel #0 � 
x: .b invoke 
eval swap
x: swap 
x: .b configure -state disabled 
x: pack forget .foo 
x: pack .bar -pady 10 
x: eval update idletasks 
x: update idletasks 
Tcl_DoOneEvent(32)
Service Idle EventIdle proc:
$398 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Idle proc:
$399 = (Tcl_IdleProc *) 0xa710f0 <ArrangePacking>
Tcl_DoOneEvent(32)
Service Idle EventTcl_DoOneEvent(32)
Service Idle Eventx: flush stdout 
x: after 2000 
x: .b configure -state normal 
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$400 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$401 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$402 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$403 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$404 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Idle proc:
$405 = (Tcl_IdleProc *) 0x9dac00 <DisplayFrame>
Idle proc:
$406 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$407 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$408 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$409 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$410 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$411 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Eval bind -> 
    tk::ButtonDown .b

eval script: 
    tk::ButtonDown .b

eval 
    tk::ButtonDown .b

x: tk::ButtonDown .b 
x: .b cget -relief 
x: .b cget -state 
x: .b configure -relief sunken 
x: after cancel  
x: .b cget -repeatdelay 
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$412 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$413 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$414 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$415 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$416 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Eval bind -> 
    tk::ButtonUp .b

eval script: 
    tk::ButtonUp .b

eval 
    tk::ButtonUp .b

x: tk::ButtonUp .b 
x: .b cget -relief 
x: .b configure -relief raised 
x: after cancel  
x: .b cget -state 
x: uplevel #0 �� 
x: .b invoke 
eval swap
x: swap 
x: .b configure -state disabled 
x: pack forget .bar 
x: pack .foo -pady 10 
x: eval update idletasks 
x: update idletasks 
Tcl_DoOneEvent(32)
Service Idle EventIdle proc:
$417 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Idle proc:
$418 = (Tcl_IdleProc *) 0xa710f0 <ArrangePacking>
Tcl_DoOneEvent(32)
Service Idle EventTcl_DoOneEvent(32)
Service Idle Eventx: flush stdout 
x: after 2000 
x: .b configure -state normal 
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$419 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$420 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$421 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$422 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$423 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Idle proc:
$424 = (Tcl_IdleProc *) 0x9dac00 <DisplayFrame>
Idle proc:
$425 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$426 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$427 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$428 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$429 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$430 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$431 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$432 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$433 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$434 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$435 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$436 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$437 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$438 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$439 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$440 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$441 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$442 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$443 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$444 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$445 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$446 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$447 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$448 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$449 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$450 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$451 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Eval bind -> 
    tk::ButtonLeave .b

eval script: 
    tk::ButtonLeave .b

eval 
    tk::ButtonLeave .b

x: tk::ButtonLeave .b 
x: .b cget -state 
x: .b configure -state normal 
Tcl_DoOneEvent(0)
Call event proc:
$452 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$453 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$454 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$455 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$456 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$457 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$458 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$459 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$460 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$461 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$462 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$463 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$464 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Eval bind -> 
	tk::ButtonEnter .radio_idle
    
eval script: 
	tk::ButtonEnter .radio_idle
    
eval 
	tk::ButtonEnter .radio_idle
    
x: tk::ButtonEnter .radio_idle 
x: .radio_idle cget -state 
x: .radio_idle configure -state active 
x: .radio_idle cget -relief 
x: .radio_idle cget -overrelief 
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$465 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$466 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$467 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$468 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$469 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$470 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$471 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$472 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$473 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$474 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$475 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$476 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$477 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$478 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$479 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$480 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$481 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$482 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$483 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$484 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$485 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$486 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$487 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$488 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$489 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$490 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$491 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$492 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$493 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$494 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Eval bind -> 
    tk::ButtonLeave .radio_idle

eval script: 
    tk::ButtonLeave .radio_idle

eval 
    tk::ButtonLeave .radio_idle

x: tk::ButtonLeave .radio_idle 
x: .radio_idle cget -state 
x: .radio_idle configure -state normal 
Tcl_DoOneEvent(0)
Call event proc:
$495 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$496 = (Tcl_IdleProc *) 0xa4a0b0 <TkpDisplayButton>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$497 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$498 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$499 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$500 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$501 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$502 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$503 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$504 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$505 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$506 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$507 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$508 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$509 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$510 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$511 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$512 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$513 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$514 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$515 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$516 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$517 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$518 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$519 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$520 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$521 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$522 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$523 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$524 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$525 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$526 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$527 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$528 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$529 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$530 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$531 = (Tcl_IdleProc *) 0x9c2390 <DelayedMotionProc>
Tcl_DoOneEvent(0)
Call event proc:
$532 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$533 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$534 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$535 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$536 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$537 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$538 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$539 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$540 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$541 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$542 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$543 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$544 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$545 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$546 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>
Tcl_DoOneEvent(0)
Wait for event
Check for idle events
Service Idle EventIdle proc:
$547 = (Tcl_IdleProc *) 0x9dac00 <DisplayFrame>
Tcl_DoOneEvent(0)
Wait for event
Call event proc:
$548 = (Tcl_EventProc *) 0xb817f0 <FileHandlerEventProc>
Tcl_DoOneEvent(0)
Call event proc:
$549 = (Tcl_EventProc *) 0x9c2f70 <WindowEventProc>