git.zerfleddert.de Git - micropolis/blob - src/tk/tktcp.h

   1 /* tkTCP.h --
   2  *
   3  *      This file provides declarations needed by the TCP server
   4  *      implementation for Tcl interpreters.
   5  *
   6  * $Header: /cluster21/kennykb/src/tclTCP.1.0beta/RCS/tclTCP.h,v 1.1 1992/02/14 19:57:51 kennykb Exp $
   7  * $Source: /cluster21/kennykb/src/tclTCP.1.0beta/RCS/tclTCP.h,v $
   8  * $Log: tclTCP.h,v $
   9  * Revision 1.1  1992/02/14  19:57:51  kennykb
  10  * Initial revision
  11  *
  12  *
  13  *
  14  *      Copyright (C) 1992 General Electric.
  15  *      All rights reserved.
  16  *
  17  *
  18  *   Permission to use, copy, modify, and distribute this
  19  *   software and its documentation for any purpose and without
  20  *   fee is hereby granted, provided that the above copyright
  21  *   notice appear in all copies and that both that copyright
  22  *   notice and this permission notice appear in supporting
  23  *   documentation, and that the name of General Electric not be used in
  24  *   advertising or publicity pertaining to distribution of the
  25  *   software without specific, written prior permission.
  26  *   General Electric makes no representations about the suitability of
  27  *   this software for any purpose.  It is provided "as is"
  28  *   without express or implied warranty.
  29  *
  30  *   This work was supported by the DARPA Initiative in Concurrent
  31  *   Engineering (DICE) through DARPA Contract MDA972-88-C-0047.
  32  *
  33  */
  34
  35 #ifndef _TCLTCP
  36 #define _TCLTCP 1
  37
  38 #ifndef _TCL
  39 #include "tcl.h"
  40 #endif
  41
  42 /* Definitions of the functions */
  43
  44 EXTERN int tcpCommand _ANSI_ARGS_((ClientData clientData,
  45                                    Tcl_Interp * interp,
  46                                    int argc,
  47                                    char * * argv));
  48
  49 extern void simpleCreateFileHandler _ANSI_ARGS_((int fd,
  50                                                  int mask,
  51                                                  Tk_FileProc * proc,
  52                                                  ClientData clientData));
  53
  54 extern void simpleDeleteFileHandler _ANSI_ARGS_((int fd));
  55
  56 extern void simpleReportBackgroundError _ANSI_ARGS_((Tcl_Interp * interp));
  57
  58 #endif /* _TCLTCP */