mirror of
https://github.com/sqlite/sqlite.git
synced 2025-07-29 08:01:23 +03:00
Experimentally add the SQLite expert functionality to the shell tool.
FossilOrigin-Name: 51068dbaeaef13bb80af8126b8c4f3a454dee63de5127d706db50bf789533e60
This commit is contained in:
@ -2271,13 +2271,17 @@ proc test_restore_config_pagecache {} {
|
||||
sqlite3 db test.db
|
||||
}
|
||||
|
||||
proc test_find_binary {nm} {
|
||||
proc test_binary_name {nm} {
|
||||
if {$::tcl_platform(platform)=="windows"} {
|
||||
set ret "$nm.exe"
|
||||
} else {
|
||||
set ret $nm
|
||||
}
|
||||
set ret [file normalize [file join $::cmdlinearg(TESTFIXTURE_HOME) $ret]]
|
||||
file normalize [file join $::cmdlinearg(TESTFIXTURE_HOME) $ret]
|
||||
}
|
||||
|
||||
proc test_find_binary {nm} {
|
||||
set ret [test_binary_name $nm]
|
||||
if {![file executable $ret]} {
|
||||
finish_test
|
||||
return ""
|
||||
|
Reference in New Issue
Block a user