home *** CD-ROM | disk | FTP | other *** search
/ ftp.mactech.com 2010 / ftp.mactech.com.tar / ftp.mactech.com / online / source / c / compilers / Tickle-4.0.sit.hqx / Tickle-4.0 / src / XTCL.h < prev    next >
Text File  |  1993-11-18  |  1KB  |  48 lines
  1. /*
  2. ** This source code was written by Tim Endres
  3. ** Email: time@ice.com.
  4. ** USMail: 8840 Main Street, Whitmore Lake, MI  48189
  5. **
  6. ** Some portions of this application utilize sources
  7. ** that are copyrighted by ICE Engineering, Inc., and
  8. ** ICE Engineering retains all rights to those sources.
  9. **
  10. ** Neither ICE Engineering, Inc., nor Tim Endres, 
  11. ** warrants this source code for any reason, and neither
  12. ** party assumes any responsbility for the use of these
  13. ** sources, libraries, or applications. The user of these
  14. ** sources and binaries assumes all responsbilities for
  15. ** any resulting consequences.
  16. */
  17.  
  18. #ifndef __DIALOGS__
  19. #include <Dialogs.h>
  20. #endif
  21.  
  22.  
  23. #define ucNoErr                0
  24. #define ucCancelErr            -1
  25. #define ucNoAddrErr            1001
  26.  
  27. #define XTCL_CB_VERSION        0x00010001
  28.  
  29. /*
  30. ** This is the interface for text selection resource commands.
  31. */
  32. typedef struct {
  33.     long        version;            /* Version of the Cmd interface. */
  34.     long        result;                /* CMD's operation result code. */
  35.     Handle        resultH;            /* CMD's result handle. */
  36.     short        cmdRefNum;            /* Cmd file reference number. */
  37.     Handle        cmdHandle;            /* CMD's command code handle. */
  38.     Tcl_Interp    *interp;            /* Interpreter calling this XTCL. */
  39.     int            (*eval)();            /* Callback procedure (C) for tcl script evaluation */
  40.     ModalFilterProcPtr    modalproc;    /* Routine for ModalDialog() to keep background. */
  41.     long        reserved;
  42.     } XTCLParmBlk, *XTCLPBPtr;
  43.  
  44. #define XTCL_FAILURE            0
  45. #define XTCL_SUCCESS            1
  46. #define XTCL_REQ_UNKNOWN        -1
  47.  
  48.