[Tile-dev] [ 1338148 ] ttk::scale crashes

[Mats B. <ma...@pr...>]

I duplicate this bugreport here since it sometimes show up in SFs
bug list and sometimes not.
Direct link:
http://sourceforge.net/tracker/?group_id=11464&atid=111464&func=detail&aid=1338148

-----------------------

toplevel .t
set opacity 100
ttk::scale .t.s -orient horizontal -from 50 -to 100 \
  -variable opacity -value $opacity
pack .t.s

The following script isolates a crash scenario:

toplevel .t
set opacity 100
ttk::scale .t.s -orient horizontal -from 50 -to 100 \
  -variable opacity -value $opacity
pack .t.s


if destroyed and then executed once more.
Backtrace:
Exception:  EXC_BAD_ACCESS (0x0001)
Codes:      KERN_PROTECTION_FAILURE (0x0002) at 0x00000000

Thread 0 Crashed:
 #0   0x018f0c10 in ScaleVariableChanged
 #1   0x018fa148 in VarTraceProc
 #2   0x0a070748 in CallVarTraces
 #3   0x0a06e064 in TclPtrSetVar
 #4   0x0a032ea4 in TclExecuteByteCode
 #5   0x0a031bb0 in TclCompEvalObj
 #6   0x0a0619dc in TclObjInterpProc
 #7   0x0a00eb00 in TclEvalObjvInternal
 #8   0x0a0325ac in TclExecuteByteCode
 #9   0x0a031bb0 in TclCompEvalObj
 #10  0x0a0619dc in TclObjInterpProc
...
Using scale.c version:
/* $Id: scale.c,v 1.45 2005/10/08 14:02:47 jenglish Exp $

See the attached screenshot.

Mats