pkgIndex.tcl 832 B

1234567891011121314151617181920212223242526
  1. # -*- tcl -*-
  2. # Tcl package index file, version 1.1
  3. #
  4. # Make sure that TDBC is running in a compatible version of Tcl, and
  5. # that TclOO is available.
  6. if {![package vsatisfies [package provide Tcl] 8.6-]} {
  7. return
  8. }
  9. apply {{dir} {
  10. set libraryfile [file join $dir tdbc.tcl]
  11. if {![file exists $libraryfile] && [info exists ::env(TDBC_LIBRARY)]} {
  12. set libraryfile [file join $::env(TDBC_LIBRARY) tdbc.tcl]
  13. }
  14. if {[package vsatisfies [package provide Tcl] 9.0-]} {
  15. package ifneeded tdbc 1.1.3 \
  16. "package require TclOO;\
  17. [list load [file join $dir libtcl9tdbc1.1.3.so] [string totitle tdbc]]\;\
  18. [list source $libraryfile]"
  19. } else {
  20. package ifneeded tdbc 1.1.3 \
  21. "package require TclOO;\
  22. [list load [file join $dir libtdbc1.1.3.so] [string totitle tdbc]]\;\
  23. [list source $libraryfile]"
  24. }
  25. }} $dir