home *** CD-ROM | disk | FTP | other *** search
/ Netrunner 2004 October / NETRUNNER0410.ISO / regular / ActivePerl-5.8.4.810-MSWin32-x86.msi / _9b07edabdcb83550cf98ff9af806bc91 < prev    next >
Encoding:
Text File  |  2004-06-01  |  5.5 KB  |  122 lines
  1. #ifndef _TKEVENT
  2. #define _TKEVENT
  3.  
  4. #define LangCallbackArg(x) LangOldCallbackArg(x,__FILE__,__LINE__)
  5.  
  6. EXTERN int        LangCallCallback _ANSI_ARGS_((LangCallback *cb, int flags));
  7. EXTERN Tcl_Obj *    LangCallbackObj _ANSI_ARGS_((LangCallback *));
  8. EXTERN int        LangCmpCallback _ANSI_ARGS_((LangCallback *a,Tcl_Obj * b));
  9. EXTERN LangCallback *    LangCopyCallback _ANSI_ARGS_((LangCallback *));
  10. EXTERN void        LangDebug _ANSI_ARGS_((CONST char *fmt,...));
  11. EXTERN void        LangFreeCallback _ANSI_ARGS_((LangCallback *));
  12. EXTERN LangCallback *    LangMakeCallback _ANSI_ARGS_((Tcl_Obj *));
  13. EXTERN Tcl_Obj *        LangOldCallbackArg _ANSI_ARGS_((LangCallback *,char *,int));
  14. EXTERN void        LangPushCallbackArgs _ANSI_ARGS_((LangCallback **svp));
  15. EXTERN long Lang_OSHandle _ANSI_ARGS_((int fd));
  16. EXTERN void        Tcl_AlertNotifier _ANSI_ARGS_((ClientData clientData));
  17. EXTERN char *        Tcl_Alloc _ANSI_ARGS_((unsigned int size));
  18. EXTERN Tcl_AsyncHandler     Tcl_AsyncCreate _ANSI_ARGS_((Tcl_AsyncProc * proc,
  19.                 ClientData clientData));
  20. EXTERN void        Tcl_AsyncDelete _ANSI_ARGS_((Tcl_AsyncHandler async));
  21. EXTERN int        Tcl_AsyncInvoke _ANSI_ARGS_((Tcl_Interp * interp,
  22.                 int code));
  23. EXTERN void        Tcl_AsyncMark _ANSI_ARGS_((Tcl_AsyncHandler async));
  24. EXTERN int        Tcl_AsyncReady _ANSI_ARGS_((void));
  25. EXTERN void        Tcl_CancelIdleCall _ANSI_ARGS_((Tcl_IdleProc *idleProc,
  26.                 ClientData clientData));
  27. EXTERN void        Tcl_CreateEventSource _ANSI_ARGS_((
  28.                 Tcl_EventSetupProc *setupProc,
  29.                 Tcl_EventCheckProc *checkProc,
  30.                 ClientData clientData));
  31. EXTERN void        Tcl_CreateExitHandler _ANSI_ARGS_((Tcl_ExitProc *proc,
  32.                 ClientData clientData));
  33. EXTERN void        Tcl_CreateFileHandler _ANSI_ARGS_((
  34.                     int fd, int mask, Tcl_FileProc *proc,
  35.                 ClientData clientData));
  36. EXTERN void        Tcl_CreateThreadExitHandler _ANSI_ARGS_((
  37.                 Tcl_ExitProc * proc, ClientData clientData));
  38. EXTERN Tcl_TimerToken    Tcl_CreateTimerHandler _ANSI_ARGS_((int milliseconds,
  39.                 Tcl_TimerProc *proc, ClientData clientData));
  40. EXTERN char *        Tcl_DbCkalloc _ANSI_ARGS_((unsigned int size,CONST char *file,int line));
  41. EXTERN int        Tcl_DbCkfree _ANSI_ARGS_((char * ptr, CONST char * file,
  42.                 int line));
  43. EXTERN char *        Tcl_DbCkrealloc _ANSI_ARGS_((char *ptr,
  44.                 unsigned int size, CONST char *file,int line));
  45. EXTERN void        Tcl_DeleteEventSource _ANSI_ARGS_((
  46.                 Tcl_EventSetupProc *setupProc,
  47.                 Tcl_EventCheckProc *checkProc,
  48.                 ClientData clientData));
  49. EXTERN void        Tcl_DeleteEvents _ANSI_ARGS_((
  50.                 Tcl_EventDeleteProc * proc,
  51.                 ClientData clientData));
  52. EXTERN void        Tcl_DeleteExitHandler _ANSI_ARGS_((
  53.                 Tcl_ExitProc * proc, ClientData clientData));
  54. EXTERN void        Tcl_DeleteFileHandler _ANSI_ARGS_((int fd));
  55. EXTERN void        Tcl_DeleteThreadExitHandler _ANSI_ARGS_((
  56.                 Tcl_ExitProc * proc, ClientData clientData));
  57. EXTERN void        Tcl_DeleteTimerHandler _ANSI_ARGS_((
  58.                 Tcl_TimerToken token));
  59. EXTERN int        Tcl_DoOneEvent _ANSI_ARGS_((int flags));
  60. EXTERN void        Tcl_DoWhenIdle _ANSI_ARGS_((Tcl_IdleProc *proc,
  61.                 ClientData clientData));
  62. EXTERN int        Tcl_DumpActiveMemory _ANSI_ARGS_((CONST char * fileName));
  63. EXTERN void        Tcl_Exit _ANSI_ARGS_((int status));
  64. EXTERN void        Tcl_Finalize _ANSI_ARGS_((void));
  65. EXTERN void        Tcl_FinalizeNotifier _ANSI_ARGS_((
  66.                 ClientData clientData));
  67. EXTERN void        Tcl_FinalizeThread _ANSI_ARGS_((void));
  68. EXTERN void        Tcl_Free _ANSI_ARGS_((char *ptr));
  69. EXTERN Tcl_ThreadId    Tcl_GetCurrentThread _ANSI_ARGS_((void));
  70. EXTERN int        Tcl_GetServiceMode _ANSI_ARGS_((void));
  71. EXTERN VOID *        Tcl_GetThreadData _ANSI_ARGS_((
  72.                 Tcl_ThreadDataKey * keyPtr, int size));
  73. EXTERN ClientData    Tcl_InitNotifier _ANSI_ARGS_((void));
  74. EXTERN void        Tcl_Panic _ANSI_ARGS_((CONST char *,...));
  75. EXTERN void        Tcl_QueueEvent _ANSI_ARGS_((Tcl_Event *evPtr,
  76.                 Tcl_QueuePosition position));
  77. EXTERN void        Tcl_QueueProcEvent _ANSI_ARGS_((Tcl_EventProc *proc,
  78.                 Tcl_Event *evPtr,
  79.                 Tcl_QueuePosition position));
  80. EXTERN char *        Tcl_Realloc _ANSI_ARGS_((char *ptr,
  81.                 unsigned int size));
  82. EXTERN int        Tcl_ServiceAll _ANSI_ARGS_((void));
  83. EXTERN int        Tcl_ServiceEvent _ANSI_ARGS_((int flags));
  84. EXTERN void        Tcl_ServiceModeHook _ANSI_ARGS_((int mode));
  85. EXTERN void        Tcl_SetMaxBlockTime _ANSI_ARGS_((Tcl_Time *timePtr));
  86. EXTERN void        Tcl_SetNotifier _ANSI_ARGS_((
  87.                 Tcl_NotifierProcs * notifierProcPtr));
  88. EXTERN int        Tcl_SetServiceMode _ANSI_ARGS_((int mode));
  89. EXTERN void        Tcl_SetTimer _ANSI_ARGS_((Tcl_Time * timePtr));
  90. EXTERN void        Tcl_Sleep _ANSI_ARGS_((int ms));
  91. EXTERN void        Tcl_ThreadAlert _ANSI_ARGS_((Tcl_ThreadId threadId));
  92. EXTERN void        Tcl_ThreadQueueEvent _ANSI_ARGS_((
  93.                 Tcl_ThreadId threadId, Tcl_Event* evPtr,
  94.                 Tcl_QueuePosition position));
  95. EXTERN void        Tcl_ValidateAllMemory _ANSI_ARGS_((CONST char * file,
  96.                 int line));
  97. EXTERN int        Tcl_WaitForEvent _ANSI_ARGS_((Tcl_Time * timePtr));
  98. EXTERN void        TclpAsyncMark _ANSI_ARGS_((Tcl_AsyncHandler async));
  99. EXTERN void        Tcl_GetTime _ANSI_ARGS_((Tcl_Time *time));
  100. EXTERN void *        TkInitTimer _ANSI_ARGS_((void));
  101. EXTERN void         Lang_NoteOwner _ANSI_ARGS_((void *owner,void *packet,
  102.                 CONST char *file, int line));
  103. EXTERN char *        Tcl_AttemptDbCkalloc _ANSI_ARGS_((unsigned int size,
  104.                 CONST char * file, int line));
  105. EXTERN void             TclpExit _ANSI_ARGS_((int status));
  106.  
  107. #ifdef TCL_MEM_DEBUG
  108. #define LangNoteOwner(owner,packet) Lang_NoteOwner(owner,packet,__FILE__,__LINE__)
  109. #else
  110. #define LangNoteOwner(owner,packet)
  111. #endif
  112.  
  113. #ifndef TCL_TSD_INIT
  114. #define TCL_TSD_INIT(keyPtr)    (ThreadSpecificData *)Tcl_GetThreadData((keyPtr), sizeof(ThreadSpecificData))
  115. #endif
  116.  
  117.  
  118. #endif /* _TKEVENT */
  119.  
  120.  
  121.  
  122.