summaryrefslogtreecommitdiffstats
path: root/generic/tclIntPlatStubs.c
diff options
context:
space:
mode:
Diffstat (limited to 'generic/tclIntPlatStubs.c')
-rw-r--r--generic/tclIntPlatStubs.c146
1 files changed, 0 insertions, 146 deletions
diff --git a/generic/tclIntPlatStubs.c b/generic/tclIntPlatStubs.c
deleted file mode 100644
index 1a10ac5..0000000
--- a/generic/tclIntPlatStubs.c
+++ /dev/null
@@ -1,146 +0,0 @@
-/*
- * tclIntPlatStubs.c --
- *
- * This file contains the wrapper functions for the platform dependent
- * unsupported Tcl API.
- *
- * Copyright (c) 1998-1999 by Scriptics Corporation.
- * All rights reserved.
- *
- * RCS: @(#) $Id: tclIntPlatStubs.c,v 1.1 1999/03/03 00:38:41 stanton Exp $
- */
-
-#include "tclInt.h"
-#include "tclPort.h"
-
-/*
- * WARNING: This file is automatically generated by the tools/genStubs.tcl
- * script. Any modifications to the function declarations below should be made
- * in the generic/tclInt.decls script.
- */
-
-/* !BEGIN!: Do not edit below this line. */
-
-/*
- * Exported stub functions:
- */
-
-#ifdef __WIN32__
-/* Slot 0 */
-void
-TclWinConvertError(errCode)
- DWORD errCode;
-{
- (tclIntPlatStubsPtr->tclWinConvertError)(errCode);
-}
-
-/* Slot 1 */
-void
-TclWinConvertWSAError(errCode)
- DWORD errCode;
-{
- (tclIntPlatStubsPtr->tclWinConvertWSAError)(errCode);
-}
-
-/* Slot 2 */
-struct servent *
-TclWinGetServByName(nm, proto)
- const char * nm;
- const char * proto;
-{
- return (tclIntPlatStubsPtr->tclWinGetServByName)(nm, proto);
-}
-
-/* Slot 3 */
-int
-TclWinGetSockOpt(s, level, optname, optval, optlen)
- SOCKET s;
- int level;
- int optname;
- char FAR * optval;
- int FAR * optlen;
-{
- return (tclIntPlatStubsPtr->tclWinGetSockOpt)(s, level, optname, optval, optlen);
-}
-
-/* Slot 4 */
-HINSTANCE
-TclWinGetTclInstance()
-{
- return (tclIntPlatStubsPtr->tclWinGetTclInstance)();
-}
-
-/* Slot 5 */
-HINSTANCE
-TclWinLoadLibrary(name)
- char * name;
-{
- return (tclIntPlatStubsPtr->tclWinLoadLibrary)(name);
-}
-
-/* Slot 6 */
-u_short
-TclWinNToHS(ns)
- u_short ns;
-{
- return (tclIntPlatStubsPtr->tclWinNToHS)(ns);
-}
-
-/* Slot 7 */
-int
-TclWinSetSockOpt(s, level, optname, optval, optlen)
- SOCKET s;
- int level;
- int optname;
- const char FAR * optval;
- int optlen;
-{
- return (tclIntPlatStubsPtr->tclWinSetSockOpt)(s, level, optname, optval, optlen);
-}
-
-#endif /* __WIN32__ */
-#ifdef MAC_TCL
-/* Slot 0 */
-int
-TclpCheckStackSpace()
-{
- return (tclIntPlatStubsPtr->tclpCheckStackSpace)();
-}
-
-/* Slot 1 */
-VOID *
-TclpSysAlloc(size, isBin)
- long size;
- int isBin;
-{
- return (tclIntPlatStubsPtr->tclpSysAlloc)(size, isBin);
-}
-
-/* Slot 2 */
-void
-TclpSysFree(ptr)
- VOID * ptr;
-{
- (tclIntPlatStubsPtr->tclpSysFree)(ptr);
-}
-
-/* Slot 3 */
-VOID *
-TclpSysRealloc(cp, size)
- VOID * cp;
- unsigned int size;
-{
- return (tclIntPlatStubsPtr->tclpSysRealloc)(cp, size);
-}
-
-/* Slot 4 */
-void
-TclPlatformExit(status)
- int status;
-{
- (tclIntPlatStubsPtr->tclPlatformExit)(status);
-}
-
-#endif /* MAC_TCL */
-
-/* !END!: Do not edit above this line. */