mirror of
https://github.com/sqlite/sqlite.git
synced 2025-07-30 19:03:16 +03:00
Fix build break in [e2bd23f251359e7a].
FossilOrigin-Name: 6ed84211033ee0ff00c8fd088979fe06d3a264e4f935162f36a62c00af135c63
This commit is contained in:
@ -696,7 +696,9 @@ proc trd_test_script_properties {path} {
|
||||
# If file $bin exists, return $bin. Else if ${bin}.exe
|
||||
# exists, return that. Else error out.
|
||||
proc trd_get_bin_name {bin} {
|
||||
global tcl_platform
|
||||
if {[file exists $bin]} {return $bin}
|
||||
if {[file exists $bin.exe]} {return $bin.exe}
|
||||
error "Cannot find binary named $bin"
|
||||
if {$tcl_platform(platform)=="Windows"} {return $bin.exe}
|
||||
return $bin
|
||||
}
|
||||
|
Reference in New Issue
Block a user