Tcl Library Source Code

Artifact [f0f5ad6976]
Login

Artifact f0f5ad697611d444be4450cc0b82edc172317862:

Ticket change [f0f5ad6976] - New ticket [dae6b527bc159a14|dae6b527bc] <i>Declaring a cron handler inside a cron command creates and infinte loop</i>. by anonymous 2015-09-18 21:45:03.
D 2015-09-18T21:45:03.023
J assignee nobody
J closer nobody
J cmimetype text/plain
J comment Okay!\sSo\swhen\sdefining\scron\shandlers,\syou\scannot\snest\sthem:\r\n=========================================================\r\n#!\s/usr/bin/tclsh\r\npackage\srequire\scron\r\n\r\n#\sDone\stimer\r\n::cron::in\sdone\s20\s{incr\s::done}\r\n\r\n#\sTen\ssecond\stimer\r\n::cron::in\sten_seconds\s10\s{\r\n\s\s\s\sputs\s"10\ssecond\stimer\striggered!"\r\n\s\s\s\s#\sNested\stimer\r\n\s\s\s\s::cron::in\sfive_seconds\s5\s{\r\n\s\s\s\s\s\s\s\sputs\s"5\sseconds\striggered!"\r\n\s\s\s\s}\r\n}\r\n\r\nvwait\s::done\r\n=========================================================\r\nGives\sus\sthis\soutput:\r\n=========================================================\r\nsecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n10\ssecond\stimer\striggered!\r\n5\sseconds\striggered!\r\n[hooga@samserv01\s~]$\r\n=========================================================\r\n\r\nIf\syou\sinstead\sturn\sthe\sinner\scron\sstatement\sto\san\safter\sXms\sy,\sit\sworks\sas\sexpected:\r\n=========================================================\r\n#!\s/usr/bin/tclsh\r\npackage\srequire\scron\r\n\r\n#\sDone\stimer\r\n::cron::in\sdone\s20\s{incr\s::done}\r\n\r\n#\sTen\ssecond\stimer\r\n::cron::in\sten_seconds\s10\s{\r\n\s\s\s\sputs\s"10\ssecond\stimer\striggered!"\r\n\s\s\s\s#\sNested\stimer\r\n\s\s\s\safter\s5000\s{\r\n\s\s\s\s\s\s\s\sputs\s"After\s5\sseconds\striggered!"\r\n\s\s\s\s}\r\n}\r\n\r\nvwait\s::done\r\n=========================================================\r\n\r\n=========================================================\r\n[hooga@samserv01\s~]$\s./cron.tcl\r\n10\ssecond\stimer\striggered!\r\nAfter\s5\sseconds\striggered!\r\n[hooga@samserv01\s~]$\r\n=========================================================
J foundin 1.17
J is_private 0
J login anonymous
J priority 5\sMedium
J private_contact 310273a9a9308c961b73e79a87acdf09488aea25
J resolution None
J severity Minor
J status Open
J submitter anonymous
J subsystem cron
J title Declaring\sa\scron\shandler\sinside\sa\scron\scommand\screates\sand\sinfinte\sloop
J type Bug
K dae6b527bc159a14c914c3d4eae46ac99a31b9be
U anonymous
Z 3d493ba20cfb569cc5cdfab604717b5b