/#include <signal.h>/a\
extern Tcl_Interp *tk_mainInterp;

/numFound = select(numFds/i\
	if (Tcl_CheckForSignal (tk_mainInterp, TCL_OK) == TCL_ERROR)\
	    TkBindError(tk_mainInterp);\