Posted to tcl by mr_calvin at Wed May 23 23:25:28 GMT 2018view raw

  1. if (thrId == Tcl_GetCurrentThread()) {
  2. /*
  3. * FIXME: Do something for callbacks to self
  4. */
  5. Tcl_SetObjResult(interp, Tcl_NewStringObj("can't notify self", -1));
  6. return TCL_ERROR;
  7. }