#include #include /* * The folowing include and defines help construct * the version string for Tcl. */ #define SCRIPT_MAJOR_VERSION 2 /* Major number */ #define SCRIPT_MINOR_VERSION 0 /* Minor number */ #define SCRIPT_RELEASE_SERIAL 0 /* Really minor number! */ #define RELEASE_LEVEL final /* alpha, beta, or final */ #define SCRIPT_VERSION "2.0" #define SCRIPT_PATCH_LEVEL "2.0" #define FINAL 1 /* Change to 1 if final version. */ #if FINAL # define MINOR_VERSION (SCRIPT_MINOR_VERSION * 16) + SCRIPT_RELEASE_SERIAL #else # define MINOR_VERSION SCRIPT_MINOR_VERSION * 16 #endif #define RELEASE_CODE 0x00 resource 'vers' (1) { SCRIPT_MAJOR_VERSION, MINOR_VERSION, RELEASE_LEVEL, 0x00, verUS, SCRIPT_PATCH_LEVEL, SCRIPT_PATCH_LEVEL ", by Jean-Claude Wippler\n© 2000 Equi4 Software" }; resource 'vers' (2) { SCRIPT_MAJOR_VERSION, MINOR_VERSION, RELEASE_LEVEL, 0x00, verUS, SCRIPT_PATCH_LEVEL, "Metakit for Tcl " SCRIPT_VERSION }; /* * The -16397 string will be displayed by Finder when a user * tries to open the shared library. The string should * give the user a little detail about the library's capabilities * and enough information to install the library in the correct location. * A similar string should be placed in all shared libraries. */ resource 'STR ' (-16397, purgeable) { "Metakit for Tcl\n\n" "This library implements the Metakit database for Tcl/Tk programs." "To work properly, it should be placed in the ÔTool Command LanguageÕ " "folder within the Extensions folder." }; /* * Set up the pkgIndex in the resource fork of the library. */ #if defined(__POWERPC__) #define TARGET "PPC" #else #define TARGET "CFM68K" #endif data 'TEXT' (4000,"pkgIndex",purgeable, preload) { "# Tcl package index file, version 1.0\n" "if {[catch {package require Tcl 8.2}]} return\n" "package ifneeded Mk4tcl " SCRIPT_VERSION " [list load [file join $dir Mk4tcl." TARGET ".shlb] Mk4tcl]\n" };