How to make tcl background proc wait on a file?

Question

I\'m trying to write a proc that waits in the background on a file and launches a command and keeps on getting stuck while waiting
My code:

proc stuck_o