1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/os/persistentdata/persistentstorage/sqlite3api/TEST/TCL/tcldistribution/mac/tclMacApplication.r	Fri Jun 15 03:10:57 2012 +0200
     1.3 @@ -0,0 +1,115 @@
     1.4 +/* 
     1.5 + * tclMacApplication.r --
     1.6 + *
     1.7 + *	This file creates resources for use Tcl Shell application.
     1.8 + *	It should be viewed as an example of how to create a new
     1.9 + *	Tcl application using the shared Tcl libraries.
    1.10 + *
    1.11 + * Copyright (c) 1996-1997 Sun Microsystems, Inc.
    1.12 + *
    1.13 + * See the file "license.terms" for information on usage and redistribution
    1.14 + * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
    1.15 + *
    1.16 + * RCS: @(#) $Id: tclMacApplication.r,v 1.6 2002/09/12 17:33:20 das Exp $
    1.17 + */
    1.18 +
    1.19 +#include <Types.r>
    1.20 +#include <SysTypes.r>
    1.21 +
    1.22 +/*
    1.23 + * The folowing include and defines help construct
    1.24 + * the version string for Tcl.
    1.25 + */
    1.26 +
    1.27 +#define RC_INVOKED
    1.28 +#include "tcl.h"
    1.29 +
    1.30 +#if (TCL_RELEASE_LEVEL == 0)
    1.31 +#   define RELEASE_LEVEL alpha
    1.32 +#elif (TCL_RELEASE_LEVEL == 1)
    1.33 +#   define RELEASE_LEVEL beta
    1.34 +#elif (TCL_RELEASE_LEVEL == 2)
    1.35 +#   define RELEASE_LEVEL final
    1.36 +#endif
    1.37 +
    1.38 +#if (TCL_RELEASE_LEVEL == 2)
    1.39 +#   define MINOR_VERSION (TCL_MINOR_VERSION * 16) + TCL_RELEASE_SERIAL
    1.40 +#   define RELEASE_CODE 0x00
    1.41 +#else
    1.42 +#   define MINOR_VERSION TCL_MINOR_VERSION * 16
    1.43 +#   define RELEASE_CODE TCL_RELEASE_SERIAL
    1.44 +#endif
    1.45 +
    1.46 +resource 'vers' (1) {
    1.47 +	TCL_MAJOR_VERSION, MINOR_VERSION,
    1.48 +	RELEASE_LEVEL, RELEASE_CODE, verUS,
    1.49 +	TCL_PATCH_LEVEL,
    1.50 +	TCL_PATCH_LEVEL ", by Ray Johnson & Jim Ingham" "\n" "© 2001 Tcl Core Team"
    1.51 +};
    1.52 +
    1.53 +resource 'vers' (2) {
    1.54 +	TCL_MAJOR_VERSION, MINOR_VERSION,
    1.55 +	RELEASE_LEVEL, RELEASE_CODE, verUS,
    1.56 +	TCL_PATCH_LEVEL,
    1.57 +	"Tcl Shell " TCL_PATCH_LEVEL " © 1993-2001"
    1.58 +};
    1.59 +
    1.60 +#define TCL_APP_CREATOR 'Tcl '
    1.61 +
    1.62 +type TCL_APP_CREATOR as 'STR ';
    1.63 +resource TCL_APP_CREATOR (0, purgeable) {
    1.64 +	"Tcl Shell " TCL_PATCH_LEVEL " © 1993-2001"
    1.65 +};
    1.66 +
    1.67 +/*
    1.68 + * The 'kind' resource works with a 'BNDL' in Macintosh Easy Open
    1.69 + * to affect the text the Finder displays in the "kind" column and
    1.70 + * file info dialog.  This information will be applied to all files
    1.71 + * with the listed creator and type.
    1.72 + */
    1.73 +
    1.74 +resource 'kind' (128, "Tcl kind", purgeable) {
    1.75 +	TCL_APP_CREATOR,
    1.76 +	0, /* region = USA */
    1.77 +	{
    1.78 +		'APPL', "Tcl Shell",
    1.79 +	}
    1.80 +};
    1.81 +
    1.82 +/*
    1.83 + * The following resource is used when creating the 'env' variable in
    1.84 + * the Macintosh environment.  The creation mechanisim looks for the
    1.85 + * 'STR#' resource named "Tcl Environment Variables" rather than a
    1.86 + * specific resource number.  (In other words, feel free to change the
    1.87 + * resource id if it conflicts with your application.)  Each string in
    1.88 + * the resource must be of the form "KEYWORD=SOME STRING".  See Tcl
    1.89 + * documentation for futher information about the env variable.
    1.90 + *
    1.91 + * A good example of something you may want to set is: "TCL_LIBRARY=My
    1.92 + * disk:etc."
    1.93 + */
    1.94 + 
    1.95 +resource 'STR#' (128, "Tcl Environment Variables") {
    1.96 +	{	
    1.97 +		/*		
    1.98 +		"SCHEDULE_NAME=Agent Controller Schedule",
    1.99 +		"SCHEDULE_PATH=Lozoya:System Folder:Tcl Lib:Tcl-Scheduler"
   1.100 +		*/
   1.101 +	};
   1.102 +};
   1.103 +
   1.104 +data 'alis' (1000, "Library Folder") {
   1.105 +	$"0000 0000 00BA 0002 0001 012F 0000 0000"            /* .....†...../.... */
   1.106 +	$"0000 0000 0000 0000 0000 0000 0000 0000"            /* ................ */
   1.107 +	$"0000 0000 0000 985C FB00 4244 0000 0000"            /* ......ς\š.BD.... */
   1.108 +	$"0002 1328 5375 7070 6F72 7420 4C69 6272"            /* ...(Support Libr */
   1.109 +	$"6172 6965 7329 0000 0000 0000 0000 0000"            /* aries).......... */
   1.110 +	$"0000 0000 0000 0000 0000 0000 0000 0000"            /* ................ */
   1.111 +	$"0000 0000 0000 0000 0000 0000 0000 0000"            /* ................ */
   1.112 +	$"0000 0076 8504 B617 A796 003D 0027 025B"            /* ...vΦ..ίρ.=.'.[ */
   1.113 +	$"01E4 0001 0001 0000 0000 0000 0000 0000"            /* .”.............. */
   1.114 +	$"0000 0000 0000 0000 0001 2F00 0002 0015"            /* ........../..... */
   1.115 +	$"2F3A 2853 7570 706F 7274 204C 6962 7261"            /* /:(Support Libra */
   1.116 +	$"7269 6573 2900 FFFF 0000"                           /* ries)... */
   1.117 +};
   1.118 +