Mercurial
view third_party/sqlite3/autosetup/find_tclconfig.tcl @ 186:8cf4ec5e2191 hg-web
Fixed merge conflict.
| author | MrJuneJune <me@mrjunejune.com> |
|---|---|
| date | Fri, 23 Jan 2026 22:38:59 -0800 |
| parents | 589bab390fb4 |
| children |
line wrap: on
line source
# # Run this TCL script to find and print the pathname for the tclConfig.sh # file. Used by ../configure # if {[catch { set libdir [tcl::pkgconfig get libdir,install] }]} { puts stderr "tclsh too old: does not support tcl::pkgconfig" exit 1 } if {![file exists $libdir]} { puts stderr "tclsh reported library directory \"$libdir\" does not exist" exit 1 } if {![file exists $libdir/tclConfig.sh]} { set n1 $libdir/tcl$::tcl_version if {[file exists $n1/tclConfig.sh]} { set libdir $n1 } else { puts stderr "cannot find tclConfig.sh in either $libdir or $n1" exit 1 } } puts $libdir