os/persistentdata/persistentstorage/sqlite3api/TEST/TCL/tcldistribution/mac/tclMacOSA.r
1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
1.2 +++ b/os/persistentdata/persistentstorage/sqlite3api/TEST/TCL/tcldistribution/mac/tclMacOSA.r Fri Jun 15 03:10:57 2012 +0200
1.3 @@ -0,0 +1,78 @@
1.4 +/*
1.5 + * tkMacOSA.r --
1.6 + *
1.7 + * This file creates resources used by the AppleScript package.
1.8 + *
1.9 + * Copyright (c) 1997 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: tclMacOSA.r,v 1.5 2001/12/27 22:46:24 das Exp $
1.15 + */
1.16 +
1.17 +#include <Types.r>
1.18 +#include <SysTypes.r>
1.19 +
1.20 +/*
1.21 + * The folowing include and defines help construct
1.22 + * the version string for Tcl.
1.23 + */
1.24 +
1.25 +#define SCRIPT_MAJOR_VERSION 1 /* Major number */
1.26 +#define SCRIPT_MINOR_VERSION 1 /* Minor number */
1.27 +#define SCRIPT_RELEASE_SERIAL 0 /* Really minor number! */
1.28 +#define RELEASE_LEVEL final /* alpha, beta, or final */
1.29 +#define SCRIPT_VERSION "1.1"
1.30 +#define SCRIPT_PATCH_LEVEL "1.1.0"
1.31 +#define FINAL 1 /* Change to 1 if final version. */
1.32 +
1.33 +#if FINAL
1.34 +# define MINOR_VERSION (SCRIPT_MINOR_VERSION * 16) + SCRIPT_RELEASE_SERIAL
1.35 +# define RELEASE_CODE 0x00
1.36 +#else
1.37 +# define MINOR_VERSION SCRIPT_MINOR_VERSION * 16
1.38 +# define RELEASE_CODE SCRIPT_RELEASE_SERIAL
1.39 +#endif
1.40 +
1.41 +#define RELEASE_CODE 0x00
1.42 +
1.43 +resource 'vers' (1) {
1.44 + SCRIPT_MAJOR_VERSION, MINOR_VERSION,
1.45 + RELEASE_LEVEL, RELEASE_CODE, verUS,
1.46 + SCRIPT_PATCH_LEVEL,
1.47 + SCRIPT_PATCH_LEVEL ", by Jim Ingham © Cygnus Solutions" "\n" "© 2001 Tcl Core Team"
1.48 +};
1.49 +
1.50 +resource 'vers' (2) {
1.51 + SCRIPT_MAJOR_VERSION, MINOR_VERSION,
1.52 + RELEASE_LEVEL, RELEASE_CODE, verUS,
1.53 + SCRIPT_PATCH_LEVEL,
1.54 + "Tclapplescript " SCRIPT_PATCH_LEVEL " © 1996-2001"
1.55 +};
1.56 +
1.57 +/*
1.58 + * The -16397 string will be displayed by Finder when a user
1.59 + * tries to open the shared library. The string should
1.60 + * give the user a little detail about the library's capabilities
1.61 + * and enough information to install the library in the correct location.
1.62 + * A similar string should be placed in all shared libraries.
1.63 + */
1.64 +resource 'STR ' (-16397, purgeable) {
1.65 + "TclAppleScript Library\n\n"
1.66 + "This library provides the ability to run AppleScript "
1.67 + " commands from Tcl/Tk programs. To work properly, it "
1.68 + "should be placed in the ŒTool Command Language¹ folder "
1.69 + "within the Extensions folder."
1.70 +};
1.71 +
1.72 +
1.73 +/*
1.74 + * We now load the Tk library into the resource fork of the library.
1.75 + */
1.76 +
1.77 +data 'TEXT' (4000,"pkgIndex",purgeable, preload) {
1.78 + "# Tcl package index file, version 1.0\n"
1.79 + "package ifneeded Tclapplescript 1.1 [list tclPkgSetup $dir Tclapplescript 1.1 {{Tclapplescript"
1.80 + ".shlb load AppleScript}}]\n"
1.81 +};