projects / micropolis / blame
| Commit | Line | Data |
|---|---|---|
| 6a5fa4e0 MG |
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 */ |