/*  * tclMacApplication.r -- * *	This file creates resources for use Tcl Shell application. *	It should be viewed as an example of how to create a new *	Tcl application using the shared Tcl libraries. * * Copyright (c) 1996-1997 Sun Microsystems, Inc. * * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * * RCS: @(#) $Id: tclMacApplication.r,v 1.6 2002/09/12 17:33:20 das Exp $ */#include <Types.r>#include <SysTypes.r>/* * The folowing include and defines help construct * the version string for Tcl. */#define RC_INVOKED#include "tcl.h"#if (TCL_RELEASE_LEVEL == 0)#   define RELEASE_LEVEL alpha#elif (TCL_RELEASE_LEVEL == 1)#   define RELEASE_LEVEL beta#elif (TCL_RELEASE_LEVEL == 2)#   define RELEASE_LEVEL final#endif#if (TCL_RELEASE_LEVEL == 2)#   define MINOR_VERSION (TCL_MINOR_VERSION * 16) + TCL_RELEASE_SERIAL#   define RELEASE_CODE 0x00#else#   define MINOR_VERSION TCL_MINOR_VERSION * 16#   define RELEASE_CODE TCL_RELEASE_SERIAL#endifresource 'vers' (1) {	TCL_MAJOR_VERSION, MINOR_VERSION,	RELEASE_LEVEL, RELEASE_CODE, verUS,	TCL_PATCH_LEVEL,	TCL_PATCH_LEVEL ", by Ray Johnson & Jim Ingham" "\n" "