/* * tclMacCommonPch.h -- * * Macintosh Tcl must be compiled with certain compiler options to * ensure that it will work correctly. The following pragmas are * used to ensure that those options are set correctly. An error * will occur at compile time if they are not set correctly. * * Copyright (c) 1998 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: tclMacCommonPch.h,v 1.3 2001/11/23 01:27:24 das Exp $ */ #if !__option(enumsalwaysint) #error Tcl requires the Metrowerks setting "Enums always ints". #endif #if !defined(__POWERPC__) #if !__option(far_data) #error Tcl requires the Metrowerks setting "Far data". #endif #endif #if !defined(__POWERPC__) #if !__option(fourbyteints) #error Tcl requires the Metrowerks setting "4 byte ints". #endif #endif #if !defined(__POWERPC__) #if !__option(IEEEdoubles) #error Tcl requires the Metrowerks setting "8 byte doubles". #endif #endif /* * The define is used most everywhere to tell Tcl (or any Tcl * extensions) that we are compiling for the Macintosh platform. */ #define MAC_TCL /* * Define the following symbol if you want * comprehensive debugging turned on. */ /* #define TCL_DEBUG */ #ifdef TCL_DEBUG # define TCL_MEM_DEBUG # define TCL_TEST #endif /* * for Metrowerks Pro 6 MSL */ #include