database/sqlite
1
0
Fork 0
mirror of https://github.com/sqlite/sqlite.git synced 2025-07-29 08:01:23 +03:00
Code Activity

More ==/!= => eq/ne fixes

Browse Source 
FossilOrigin-Name: 2aa6c4fa6c9c47c7a8548ac3493bfb9ed4e4dec1b6dc4f3599a0373086b3e917
This commit is contained in:
jan.nijtmans
2025-03-27 14:37:07 +00:00
parent 87b90921b6
commit 1588d3de37
6 changed files with 22 additions and 22 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
test/tester.tcl
View File

@ -813,7 +813,7 @@ proc do_test {name cmd expected} {
# on Windows because of issues with ANSI and UTF8 I/O on Win11.
#
proc do_test_with_ansi_output {name cmd expected} {
if {![info exists ::SLAVE] || $::tcl_platform(platform)!="windows"} {
if {![info exists ::SLAVE] || $::tcl_platform(platform) ne "windows"} {
uplevel 1 [list do_test $name $cmd $expected]
}
}
@ -872,7 +872,7 @@ proc catchcmdex {db {cmd ""}} {
proc filepath_normalize {p} {
# test cases should be written to assume "unix"-like file paths
if {$::tcl_platform(platform)!="unix"} {
if {$::tcl_platform(platform) ne "unix"} {
string map [list \\ / \{/ / .db\} .db] \
[regsub -nocase -all {[a-z]:[/\\]+} $p {/}]
} {
@ -1832,7 +1832,7 @@ proc crashsql {args} {
# error message. We map that to the expected message
# so that we don't have to change all of the test
# cases.
if {$::tcl_platform(platform)=="windows"} {
if {$::tcl_platform(platform) eq "windows"} {
if {$msg=="child killed: unknown signal"} {
set msg "child process exited abnormally"
}
@ -1883,7 +1883,7 @@ proc crash_on_write {args} {
# error message. We map that to the expected message
# so that we don't have to change all of the test
# cases.
if {$::tcl_platform(platform)=="windows"} {
if {$::tcl_platform(platform) eq "windows"} {
if {$msg=="child killed: unknown signal"} {
set msg "child process exited abnormally"
}
@ -2532,7 +2532,7 @@ proc test_restore_config_pagecache {} {
}
proc test_binary_name {nm} {
if {$::tcl_platform(platform)=="windows"} {
if {$::tcl_platform(platform) eq "windows"} {
set ret "$nm.exe"
} else {
set ret $nm