1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/os/persistentdata/persistentstorage/sqlite3api/TEST/TCL/tcldistribution/mac/tclMacInt.h	Fri Jun 15 03:10:57 2012 +0200
     1.3 @@ -0,0 +1,77 @@
     1.4 +/*
     1.5 + * tclMacInt.h --
     1.6 + *
     1.7 + *	Declarations of Macintosh specific shared variables and procedures.
     1.8 + *
     1.9 + * Copyright (c) 1996-1998 Sun Microsystems, Inc.
    1.10 + *
    1.11 + * See the file "license.terms" for information on usage and redistribution
    1.12 + * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
    1.13 + *
    1.14 + * RCS: @(#) $Id: tclMacInt.h,v 1.7 2001/11/23 01:27:36 das Exp $
    1.15 + */
    1.16 +
    1.17 +#ifndef _TCLMACINT
    1.18 +#define _TCLMACINT
    1.19 +
    1.20 +#ifndef _TCLINT
    1.21 +#include "tclInt.h"
    1.22 +#endif
    1.23 +#ifndef _TCLPORT
    1.24 +#include "tclPort.h"
    1.25 +#endif
    1.26 +
    1.27 +#include <Events.h>
    1.28 +#include <Files.h>
    1.29 +
    1.30 +/*
    1.31 + * Defines to control stack behavior.
    1.32 + *
    1.33 + * The Tcl8.2 regexp code is highly recursive for patterns with many
    1.34 + * subexpressions.  So we have to increase the stack space to accomodate.
    1.35 + * 512 K is good enough for ordinary work, but you need 768 to pass the Tcl
    1.36 + * regexp testsuite.
    1.37 + *
    1.38 + * For the PPC, you need to set the stack space in the Project file.
    1.39 + *
    1.40 + */
    1.41 +
    1.42 +#ifdef TCL_TEST
    1.43 +#	define TCL_MAC_68K_STACK_GROWTH (768*1024)
    1.44 +#else
    1.45 +#	define TCL_MAC_68K_STACK_GROWTH (512*1024)
    1.46 +#endif
    1.47 +
    1.48 +#define TCL_MAC_STACK_THRESHOLD 16384
    1.49 +
    1.50 +#ifdef BUILD_tcl
    1.51 +# undef TCL_STORAGE_CLASS
    1.52 +# define TCL_STORAGE_CLASS DLLEXPORT
    1.53 +#endif
    1.54 +
    1.55 +/*
    1.56 + * This flag is passed to TclMacRegisterResourceFork
    1.57 + * by a file (usually a library) whose resource fork
    1.58 + * should not be closed by the resource command.
    1.59 + */
    1.60 + 
    1.61 +#define TCL_RESOURCE_DONT_CLOSE  2
    1.62 +
    1.63 +/*
    1.64 + * Typedefs used by Macintosh parts of Tcl.
    1.65 + */
    1.66 +
    1.67 +/*
    1.68 + * Prototypes of Mac only internal functions.
    1.69 + */
    1.70 +
    1.71 +EXTERN char *	TclMacGetFontEncoding _ANSI_ARGS_((int fontId));
    1.72 +EXTERN int		TclMacHaveThreads _ANSI_ARGS_((void));
    1.73 +EXTERN long		TclpGetGMTOffset _ANSI_ARGS_((void));
    1.74 +
    1.75 +# undef TCL_STORAGE_CLASS
    1.76 +# define TCL_STORAGE_CLASS DLLIMPORT
    1.77 +
    1.78 +#include "tclIntPlatDecls.h"
    1.79 +    
    1.80 +#endif /* _TCLMACINT */