sl@0: /*
sl@0:  * tclMacInt.h --
sl@0:  *
sl@0:  *	Declarations of Macintosh specific shared variables and procedures.
sl@0:  *
sl@0:  * Copyright (c) 1996-1998 Sun Microsystems, Inc.
sl@0:  *
sl@0:  * See the file "license.terms" for information on usage and redistribution
sl@0:  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
sl@0:  *
sl@0:  * RCS: @(#) $Id: tclMacInt.h,v 1.7 2001/11/23 01:27:36 das Exp $
sl@0:  */
sl@0: 
sl@0: #ifndef _TCLMACINT
sl@0: #define _TCLMACINT
sl@0: 
sl@0: #ifndef _TCLINT
sl@0: #include "tclInt.h"
sl@0: #endif
sl@0: #ifndef _TCLPORT
sl@0: #include "tclPort.h"
sl@0: #endif
sl@0: 
sl@0: #include <Events.h>
sl@0: #include <Files.h>
sl@0: 
sl@0: /*
sl@0:  * Defines to control stack behavior.
sl@0:  *
sl@0:  * The Tcl8.2 regexp code is highly recursive for patterns with many
sl@0:  * subexpressions.  So we have to increase the stack space to accomodate.
sl@0:  * 512 K is good enough for ordinary work, but you need 768 to pass the Tcl
sl@0:  * regexp testsuite.
sl@0:  *
sl@0:  * For the PPC, you need to set the stack space in the Project file.
sl@0:  *
sl@0:  */
sl@0: 
sl@0: #ifdef TCL_TEST
sl@0: #	define TCL_MAC_68K_STACK_GROWTH (768*1024)
sl@0: #else
sl@0: #	define TCL_MAC_68K_STACK_GROWTH (512*1024)
sl@0: #endif
sl@0: 
sl@0: #define TCL_MAC_STACK_THRESHOLD 16384
sl@0: 
sl@0: #ifdef BUILD_tcl
sl@0: # undef TCL_STORAGE_CLASS
sl@0: # define TCL_STORAGE_CLASS DLLEXPORT
sl@0: #endif
sl@0: 
sl@0: /*
sl@0:  * This flag is passed to TclMacRegisterResourceFork
sl@0:  * by a file (usually a library) whose resource fork
sl@0:  * should not be closed by the resource command.
sl@0:  */
sl@0:  
sl@0: #define TCL_RESOURCE_DONT_CLOSE  2
sl@0: 
sl@0: /*
sl@0:  * Typedefs used by Macintosh parts of Tcl.
sl@0:  */
sl@0: 
sl@0: /*
sl@0:  * Prototypes of Mac only internal functions.
sl@0:  */
sl@0: 
sl@0: EXTERN char *	TclMacGetFontEncoding _ANSI_ARGS_((int fontId));
sl@0: EXTERN int		TclMacHaveThreads _ANSI_ARGS_((void));
sl@0: EXTERN long		TclpGetGMTOffset _ANSI_ARGS_((void));
sl@0: 
sl@0: # undef TCL_STORAGE_CLASS
sl@0: # define TCL_STORAGE_CLASS DLLIMPORT
sl@0: 
sl@0: #include "tclIntPlatDecls.h"
sl@0:     
sl@0: #endif /* _TCLMACINT */