# ---------------------------------------------------------------------- # RapptureLibrary - Tcl extensions to C++ core Rappture Library # ---------------------------------------------------------------------- # This file initializes the package when it is loaded by "package # require". It loads the dynamic library and sets up autoloading # for other scripts. # ====================================================================== # AUTHOR: Derrick Kearney, Purdue University # Copyright (c) 2005-2006 Purdue Research Foundation # # See the file "license.terms" for information on usage and # redistribution of this file, and for a DISCLAIMER OF ALL WARRANTIES. # ====================================================================== proc Rappture_init {} { global auto_path global rappture_library package require BLT set dir [file dirname [info script]] set rappture_library [file join $dir scripts] lappend auto_path $rappture_library set suffix [info sharedlibextension] set library [file join $dir @PKG_LIB_FILE@] load $library @PACKAGE_NAME@ namespace eval Rappture { variable version @EXACT_VERSION@ variable patchlevel @PATCHLEVEL@ } namespace eval Rappture::LibraryObj {} package provide Rappture @PACKAGE_VERSION@ rename Rappture_init "" } Rappture_init