home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Source Code 1993 July / THE_SOURCE_CODE_CD_ROM.iso / languages / tcl / tclX6.5c / ucbsrc / tclBasic.cdiff < prev    next >
Encoding:
Text File  |  1992-12-19  |  638 b   |  23 lines
  1. *** ../../tcl6.4/tclBasic.c    Sun Jun 21 14:09:46 1992
  2. --- tclBasic.c    Tue Oct  6 17:19:52 1992
  3. ***************
  4. *** 705,710
  5.       iPtr->result = iPtr->resultSpace;
  6.       iPtr->resultSpace[0] = 0;
  7.       result = (*cmdPtr->proc)(cmdPtr->clientData, interp, argc, argv);
  8.       if (result != TCL_OK) {
  9.           break;
  10.       }
  11.  
  12. --- 705,714 -----
  13.       iPtr->result = iPtr->resultSpace;
  14.       iPtr->resultSpace[0] = 0;
  15.       result = (*cmdPtr->proc)(cmdPtr->clientData, interp, argc, argv);
  16. +         /*
  17. +          * Signal handling added for Extended Tcl.
  18. +          */
  19. +         result = Tcl_CheckForSignal (interp, result);
  20.       if (result != TCL_OK) {
  21.           break;
  22.       }
  23.