* Alexandru <
alexandr...@meshparts.de>
| My string was 35k chars long. In my code I set the entry's variable to
| this string. The time needed to complete the action is the order of
| magnitude of 1 second.
>
| pack [entry .e -textvariable ::myvar]
| set s [join [lrepeat 35000 "a"] ""]
| set ::myvar $s
>
| Can you confirm this behavior?
No:
pack [entry .e -textvariable ::myvar]
update
set s [join [lrepeat 35000 "a"] ""]
(curious: why not simply 'string repeat'?)
time { set ::myvar $s }
=>
4579 microseconds per iteration
Note that if you run that interactively, the printing of the result string
to the console may take some time, too.
% info patchlevel
8.6.11
% parray tcl_platform
tcl_platform(byteOrder) = littleEndian
tcl_platform(engine) = Tcl
tcl_platform(machine) = x86_64
tcl_platform(os) = Linux
tcl_platform(osVersion) = 5.3.18-59.27-default
tcl_platform(pathSeparator) = :
tcl_platform(platform) = unix
tcl_platform(pointerSize) = 8
tcl_platform(threaded) = 1
tcl_platform(user) = ralf
tcl_platform(wordSize) = 8
R'