Mercurial
view third_party/sqlite3/autosetup/find_tclconfig.tcl @ 258:60a876c4587a
[ui] Add semantic primitive ownership
Build a layered Zenbu token and sizing system, make authored controls use native-underneath primitives, migrate mrjunejune without imposing visual surfaces, and document/enforce HTML ownership in the catalog and wiki.
Co-authored-by: Copilot <[email protected]>
| author | MrJuneJune <me@mrjunejune.com> |
|---|---|
| date | Wed, 05 Aug 2026 05:25:40 -0700 |
| 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