Symaptic: os/persistentdata/persistentstorage/sqlite3api/TEST/TCL/tcldistribution/mac/tclMacApplication.r@260cb5ec6c19

     1 /*

     2  * tclMacApplication.r --

     3  *

     4  *	This file creates resources for use Tcl Shell application.

     5  *	It should be viewed as an example of how to create a new

     6  *	Tcl application using the shared Tcl libraries.

     7  *

     8  * Copyright (c) 1996-1997 Sun Microsystems, Inc.

     9  *

    10  * See the file "license.terms" for information on usage and redistribution

    11  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.

    12  *

    13  * RCS: @(#) $Id: tclMacApplication.r,v 1.6 2002/09/12 17:33:20 das Exp $

    14  */

    16 #include <Types.r>

    17 #include <SysTypes.r>

    19 /*

    20  * The folowing include and defines help construct

    21  * the version string for Tcl.

    22  */

    24 #define RC_INVOKED

    25 #include "tcl.h"

    27 #if (TCL_RELEASE_LEVEL == 0)

    28 #   define RELEASE_LEVEL alpha

    29 #elif (TCL_RELEASE_LEVEL == 1)

    30 #   define RELEASE_LEVEL beta

    31 #elif (TCL_RELEASE_LEVEL == 2)

    32 #   define RELEASE_LEVEL final

    33 #endif

    35 #if (TCL_RELEASE_LEVEL == 2)

    36 #   define MINOR_VERSION (TCL_MINOR_VERSION * 16) + TCL_RELEASE_SERIAL

    37 #   define RELEASE_CODE 0x00

    38 #else

    39 #   define MINOR_VERSION TCL_MINOR_VERSION * 16

    40 #   define RELEASE_CODE TCL_RELEASE_SERIAL

    41 #endif

    43 resource 'vers' (1) {

    44 	TCL_MAJOR_VERSION, MINOR_VERSION,

    45 	RELEASE_LEVEL, RELEASE_CODE, verUS,

    46 	TCL_PATCH_LEVEL,

    47 	TCL_PATCH_LEVEL ", by Ray Johnson & Jim Ingham" "\n" "© 2001 Tcl Core Team"

    48 };

    50 resource 'vers' (2) {

    51 	TCL_MAJOR_VERSION, MINOR_VERSION,

    52 	RELEASE_LEVEL, RELEASE_CODE, verUS,

    53 	TCL_PATCH_LEVEL,

    54 	"Tcl Shell " TCL_PATCH_LEVEL " © 1993-2001"

    55 };

    57 #define TCL_APP_CREATOR 'Tcl '

    59 type TCL_APP_CREATOR as 'STR ';

    60 resource TCL_APP_CREATOR (0, purgeable) {

    61 	"Tcl Shell " TCL_PATCH_LEVEL " © 1993-2001"

    62 };

    64 /*

    65  * The 'kind' resource works with a 'BNDL' in Macintosh Easy Open

    66  * to affect the text the Finder displays in the "kind" column and

    67  * file info dialog.  This information will be applied to all files

    68  * with the listed creator and type.

    69  */

    71 resource 'kind' (128, "Tcl kind", purgeable) {

    72 	TCL_APP_CREATOR,

    73 	0, /* region = USA */

    74 	{

    75 		'APPL', "Tcl Shell",

    76 	}

    77 };

    79 /*

    80  * The following resource is used when creating the 'env' variable in

    81  * the Macintosh environment.  The creation mechanisim looks for the

    82  * 'STR#' resource named "Tcl Environment Variables" rather than a

    83  * specific resource number.  (In other words, feel free to change the

    84  * resource id if it conflicts with your application.)  Each string in

    85  * the resource must be of the form "KEYWORD=SOME STRING".  See Tcl

    86  * documentation for futher information about the env variable.

    87  *

    88  * A good example of something you may want to set is: "TCL_LIBRARY=My

    89  * disk:etc."

    90  */

    92 resource 'STR#' (128, "Tcl Environment Variables") {

    93 	{

    94 		/*

    95 		"SCHEDULE_NAME=Agent Controller Schedule",

    96 		"SCHEDULE_PATH=Lozoya:System Folder:Tcl Lib:Tcl-Scheduler"

    97 		*/

    98 	};

    99 };

   101 data 'alis' (1000, "Library Folder") {

   102 	$"0000 0000 00BA 0002 0001 012F 0000 0000"            /* .....†...../.... */

   103 	$"0000 0000 0000 0000 0000 0000 0000 0000"            /* ................ */

   104 	$"0000 0000 0000 985C FB00 4244 0000 0000"            /* ......ò\š.BD.... */

   105 	$"0002 1328 5375 7070 6F72 7420 4C69 6272"            /* ...(Support Libr */

   106 	$"6172 6965 7329 0000 0000 0000 0000 0000"            /* aries).......... */

   107 	$"0000 0000 0000 0000 0000 0000 0000 0000"            /* ................ */

   108 	$"0000 0000 0000 0000 0000 0000 0000 0000"            /* ................ */

   109 	$"0000 0076 8504 B617 A796 003D 0027 025B"            /* ...vÖ..ßñ.=.'.[ */

   110 	$"01E4 0001 0001 0000 0000 0000 0000 0000"            /* .”.............. */

   111 	$"0000 0000 0000 0000 0001 2F00 0002 0015"            /* ........../..... */

   112 	$"2F3A 2853 7570 706F 7274 204C 6962 7261"            /* /:(Support Libra */

   113 	$"7269 6573 2900 FFFF 0000"                           /* ries)... */

   114 };

author	sl
	Tue, 10 Jun 2014 14:32:02 +0200
changeset 1	260cb5ec6c19
permissions	-rw-r--r--