jpayne@69: # -*- tcl -*- jpayne@69: # Tcl package index file, version 1.1 jpayne@69: # jpayne@69: # Make sure that TDBC is running in a compatible version of Tcl, and jpayne@69: # that TclOO is available. jpayne@69: jpayne@69: if {![package vsatisfies [package provide Tcl] 8.6-]} { jpayne@69: return jpayne@69: } jpayne@69: apply {{dir} { jpayne@69: set libraryfile [file join $dir tdbc.tcl] jpayne@69: if {![file exists $libraryfile] && [info exists ::env(TDBC_LIBRARY)]} { jpayne@69: set libraryfile [file join $::env(TDBC_LIBRARY) tdbc.tcl] jpayne@69: } jpayne@69: if {[package vsatisfies [package provide Tcl] 9.0-]} { jpayne@69: package ifneeded tdbc 1.1.5 \ jpayne@69: "package require TclOO;\ jpayne@69: [list load [file join $dir libtcl9tdbc1.1.5.so] [string totitle tdbc]]\;\ jpayne@69: [list source $libraryfile]" jpayne@69: } else { jpayne@69: package ifneeded tdbc 1.1.5 \ jpayne@69: "package require TclOO;\ jpayne@69: [list load [file join $dir libtdbc1.1.5.so] [string totitle tdbc]]\;\ jpayne@69: [list source $libraryfile]" jpayne@69: } jpayne@69: }} $dir