Matt Tharma wrote:
> Hey CBee,
> Thanks for the mail. I do have a sleep in my tcl/tk code. This is the
> function that I am calling in my Tcl/tk.
> -------------------------------------------------------------------
> # # # # # # # # # # # # # # # # # # # # # # # # # #
> # Play an Aleart
> # # # # # # # # # # # # # # # # # # # # # # # # # #
> proc playSound {} \
> {
> global playSnd
>
> if {$playSnd > 0} \
> {
> bell
> # after 1250 milli secs play a bell
> after 1250 bell
> playNext
> }
> #puts "in playSound -> $playSnd"
> }
>
> proc playNext {} \
> {
> after 1250 playSound
> }
Is recursion the normal way of making a loop in TCL? If the interpreter is
smart enough it might be able to see that this is tail recursion and turn it
into a loop, but otherwise it will eventually run out of memory.
What exactly did you change when it worked?
Bjvrn Persson
_______________________________________________
VNC-List mailing list
[EMAIL PROTECTED]
To remove yourself from the list visit:
http://www.realvnc.com/mailman/listinfo/vnc-list
