diff options
| author | das <das> | 2001-12-27 22:46:12 (GMT) |
|---|---|---|
| committer | das <das> | 2001-12-27 22:46:12 (GMT) |
| commit | d279f3a31ab8738baedcb41295db291eb30ab96d (patch) | |
| tree | a7d7b1a3c9226183e19b18f421be4f6a4e15a52c /mac/tclMacOSA.r | |
| parent | 275fcdde3fa7cacfabb89aaa4b4f6e9c513f217b (diff) | |
| download | tcl-d279f3a31ab8738baedcb41295db291eb30ab96d.zip tcl-d279f3a31ab8738baedcb41295db291eb30ab96d.tar.gz tcl-d279f3a31ab8738baedcb41295db291eb30ab96d.tar.bz2 | |
* mac/tclMacInit.c:
* mac/tclMacTclCode.r: synced up tclInit features to unix/win:
implemented TclSetPreInitScript support, use of existing tclInit
proc if defined, check of default encoding dir if set. Changed
script library resource names to lowercase (i.e. same as
corresponding files). Used Tcl_JoinPath instead of string append.
Check that system encoding could be loaded before utf translating
the LibraryPath.
* mac/tclMacApplication.r:
* mac/tclMacLibrary.r:
* mac/tclMacOSA.r:
* mac/tclMacResource.r: minor version resources cleanup
Diffstat (limited to 'mac/tclMacOSA.r')
| -rw-r--r-- | mac/tclMacOSA.r | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/mac/tclMacOSA.r b/mac/tclMacOSA.r index ebbb0de..c994e60 100644 --- a/mac/tclMacOSA.r +++ b/mac/tclMacOSA.r @@ -8,7 +8,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclMacOSA.r,v 1.4 2001/11/23 01:28:04 das Exp $ + * RCS: @(#) $Id: tclMacOSA.r,v 1.5 2001/12/27 22:46:24 das Exp $ */ #include <Types.r> @@ -29,22 +29,24 @@ #if FINAL # define MINOR_VERSION (SCRIPT_MINOR_VERSION * 16) + SCRIPT_RELEASE_SERIAL +# define RELEASE_CODE 0x00 #else # define MINOR_VERSION SCRIPT_MINOR_VERSION * 16 +# define RELEASE_CODE SCRIPT_RELEASE_SERIAL #endif #define RELEASE_CODE 0x00 resource 'vers' (1) { SCRIPT_MAJOR_VERSION, MINOR_VERSION, - RELEASE_LEVEL, 0x00, verUS, + RELEASE_LEVEL, RELEASE_CODE, verUS, SCRIPT_PATCH_LEVEL, SCRIPT_PATCH_LEVEL ", by Jim Ingham © Cygnus Solutions" "\n" "© 2001 Tcl Core Team" }; resource 'vers' (2) { SCRIPT_MAJOR_VERSION, MINOR_VERSION, - RELEASE_LEVEL, 0x00, verUS, + RELEASE_LEVEL, RELEASE_CODE, verUS, SCRIPT_PATCH_LEVEL, "Tclapplescript " SCRIPT_PATCH_LEVEL " © 1996-2001" }; |