/*
 * tclIntDecls.h --
 *
 *	This file contains the declarations for all unsupported
 *	functions that are exported by the Tcl library.  These
 *	interfaces are not guaranteed to remain the same between
 *	versions.  Use at your own risk.
 *
 * Copyright (c) 1998-1999 by Scriptics Corporation.
 *
 * See the file "license.terms" for information on usage and redistribution
 * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 *
 * RCS: @(#) $Id: tclIntDecls.h,v 1.2.2.2 1999/03/09 02:37:16 stanton Exp $
 */

#ifndef _TCLINTDECLS
#define _TCLINTDECLS

/*
 * WARNING: This file is automatically generated by the tools/genStubs.tcl

				Tcl_Interp * interp, char * name));
/* 131 */
EXTERN void		Tcl_SetNamespaceResolvers _ANSI_ARGS_((
				Tcl_Namespace * namespacePtr, 
				Tcl_ResolveCmdProc * cmdProc, 
				Tcl_ResolveVarProc * varProc, 
				Tcl_ResolveCompiledVarProc * compiledVarProc));
/* Slot 132 is reserved */
/* Slot 133 is reserved */
/* Slot 134 is reserved */
/* Slot 135 is reserved */
/* Slot 136 is reserved */
/* Slot 137 is reserved */
/* Slot 138 is reserved */
/* Slot 139 is reserved */
/* Slot 140 is reserved */
/* Slot 141 is reserved */
/* 142 */
EXTERN int		TclpHasSockets _ANSI_ARGS_((Tcl_Interp * interp));
/* 143 */
EXTERN struct tm *	TclpGetDate _ANSI_ARGS_((TclpTime_t time, int useGMT));
/* 144 */
EXTERN size_t		TclpStrftime _ANSI_ARGS_((char * s, size_t maxsize, 
				const char * format, const struct tm * t));
/* 145 */
EXTERN int		TclpCheckStackSpace _ANSI_ARGS_((void));
/* 146 */
EXTERN char *		Tcl_GetString _ANSI_ARGS_((Tcl_Obj * objPtr));
/* 147 */
EXTERN int		TclpChdir _ANSI_ARGS_((CONST char * dirName));
/* 148 */
EXTERN char *		TclGetEnv _ANSI_ARGS_((CONST char * name, 
				Tcl_DString * valuePtr));
/* 149 */
EXTERN int		TclpLoadFile _ANSI_ARGS_((Tcl_Interp * interp, 
				char * fileName, char * sym1, char * sym2, 
				Tcl_PackageInitProc ** proc1Ptr, 
				Tcl_PackageInitProc ** proc2Ptr, 
				ClientData * clientDataPtr));
/* 150 */
EXTERN int		TclLooksLikeInt _ANSI_ARGS_((char * bytes, 
				int length));

typedef struct TclIntStubs {
    int magic;
    struct TclIntStubHooks *hooks;

    Tcl_Namespace * (*tcl_GetGlobalNamespace) _ANSI_ARGS_((Tcl_Interp * interp)); /* 125 */
    void (*tcl_GetVariableFullName) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Var variable, Tcl_Obj * objPtr)); /* 126 */
    int (*tcl_Import) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Namespace * nsPtr, char * pattern, int allowOverwrite)); /* 127 */
    void (*tcl_PopCallFrame) _ANSI_ARGS_((Tcl_Interp* interp)); /* 128 */
    int (*tcl_PushCallFrame) _ANSI_ARGS_((Tcl_Interp* interp, Tcl_CallFrame * framePtr, Tcl_Namespace * nsPtr, int isProcCallFrame)); /* 129 */
    int (*tcl_RemoveInterpResolvers) _ANSI_ARGS_((Tcl_Interp * interp, char * name)); /* 130 */
    void (*tcl_SetNamespaceResolvers) _ANSI_ARGS_((Tcl_Namespace * namespacePtr, Tcl_ResolveCmdProc * cmdProc, Tcl_ResolveVarProc * varProc, Tcl_ResolveCompiledVarProc * compiledVarProc)); /* 131 */
    void *reserved132;
    void *reserved133;
    void *reserved134;
    void *reserved135;
    void *reserved136;
    void *reserved137;
    void *reserved138;
    void *reserved139;
    void *reserved140;
    void *reserved141;
    int (*tclpHasSockets) _ANSI_ARGS_((Tcl_Interp * interp)); /* 142 */
    struct tm * (*tclpGetDate) _ANSI_ARGS_((TclpTime_t time, int useGMT)); /* 143 */
    size_t (*tclpStrftime) _ANSI_ARGS_((char * s, size_t maxsize, const char * format, const struct tm * t)); /* 144 */
    int (*tclpCheckStackSpace) _ANSI_ARGS_((void)); /* 145 */
    char * (*tcl_GetString) _ANSI_ARGS_((Tcl_Obj * objPtr)); /* 146 */
    int (*tclpChdir) _ANSI_ARGS_((CONST char * dirName)); /* 147 */
    char * (*tclGetEnv) _ANSI_ARGS_((CONST char * name, Tcl_DString * valuePtr)); /* 148 */
    int (*tclpLoadFile) _ANSI_ARGS_((Tcl_Interp * interp, char * fileName, char * sym1, char * sym2, Tcl_PackageInitProc ** proc1Ptr, Tcl_PackageInitProc ** proc2Ptr, ClientData * clientDataPtr)); /* 149 */
    int (*tclLooksLikeInt) _ANSI_ARGS_((char * bytes, int length)); /* 150 */
} TclIntStubs;

extern TclIntStubs *tclIntStubsPtr;

#if defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS)

/*

#define Tcl_RemoveInterpResolvers(interp, name) \
	(tclIntStubsPtr->tcl_RemoveInterpResolvers)(interp, name) /* 130 */
#endif
#ifndef Tcl_SetNamespaceResolvers
#define Tcl_SetNamespaceResolvers(namespacePtr, cmdProc, varProc, compiledVarProc) \
	(tclIntStubsPtr->tcl_SetNamespaceResolvers)(namespacePtr, cmdProc, varProc, compiledVarProc) /* 131 */
#endif
/* Slot 132 is reserved */
/* Slot 133 is reserved */
/* Slot 134 is reserved */
/* Slot 135 is reserved */
/* Slot 136 is reserved */
/* Slot 137 is reserved */
/* Slot 138 is reserved */
/* Slot 139 is reserved */
/* Slot 140 is reserved */
/* Slot 141 is reserved */
#ifndef TclpHasSockets
#define TclpHasSockets(interp) \
	(tclIntStubsPtr->tclpHasSockets)(interp) /* 142 */
#endif
#ifndef TclpGetDate
#define TclpGetDate(time, useGMT) \
	(tclIntStubsPtr->tclpGetDate)(time, useGMT) /* 143 */
#endif
#ifndef TclpStrftime
#define TclpStrftime(s, maxsize, format, t) \
	(tclIntStubsPtr->tclpStrftime)(s, maxsize, format, t) /* 144 */
#endif
#ifndef TclpCheckStackSpace
#define TclpCheckStackSpace() \
	(tclIntStubsPtr->tclpCheckStackSpace)() /* 145 */
#endif
#ifndef Tcl_GetString
#define Tcl_GetString(objPtr) \
	(tclIntStubsPtr->tcl_GetString)(objPtr) /* 146 */
#endif
#ifndef TclpChdir
#define TclpChdir(dirName) \
	(tclIntStubsPtr->tclpChdir)(dirName) /* 147 */
#endif
#ifndef TclGetEnv
#define TclGetEnv(name, valuePtr) \
	(tclIntStubsPtr->tclGetEnv)(name, valuePtr) /* 148 */
#endif
#ifndef TclpLoadFile
#define TclpLoadFile(interp, fileName, sym1, sym2, proc1Ptr, proc2Ptr, clientDataPtr) \
	(tclIntStubsPtr->tclpLoadFile)(interp, fileName, sym1, sym2, proc1Ptr, proc2Ptr, clientDataPtr) /* 149 */
#endif
#ifndef TclLooksLikeInt
#define TclLooksLikeInt(bytes, length) \
	(tclIntStubsPtr->tclLooksLikeInt)(bytes, length) /* 150 */
#endif

#endif /* defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) */

/* !END!: Do not edit above this line. */

#endif /* _TCLINTDECLS */