diff options
author | jan.nijtmans <jan.nijtmans@noemail.net> | 2025-03-27 14:37:07 +0000 |
---|---|---|
committer | jan.nijtmans <jan.nijtmans@noemail.net> | 2025-03-27 14:37:07 +0000 |
commit | 1588d3de37aa5cbf172077780370d56fc3612a3d (patch) | |
tree | f74d82509c10297d6c573102addb79fbacb2ffd9 | |
parent | 87b90921b6e0bd0c415bd6723a9d90b50bfd2747 (diff) | |
download | sqlite-1588d3de37aa5cbf172077780370d56fc3612a3d.tar.gz sqlite-1588d3de37aa5cbf172077780370d56fc3612a3d.zip |
More ==/!= => eq/ne fixes
FossilOrigin-Name: 2aa6c4fa6c9c47c7a8548ac3493bfb9ed4e4dec1b6dc4f3599a0373086b3e917
-rw-r--r-- | manifest | 18 | ||||
-rw-r--r-- | manifest.uuid | 2 | ||||
-rw-r--r-- | test/bc_common.tcl | 2 | ||||
-rw-r--r-- | test/tester.tcl | 10 | ||||
-rwxr-xr-x | test/testrunner.tcl | 8 | ||||
-rw-r--r-- | test/testrunner_data.tcl | 4 |
6 files changed, 22 insertions, 22 deletions
@@ -1,5 +1,5 @@ -C In\sTcl,\salways\suse\seq/ne\sfor\scomparing\sstrings,\snot\s==/!= -D 2025-03-27T14:32:57.504 +C More\s==/!=\s=>\seq/ne\sfixes +D 2025-03-27T14:37:07.271 F .fossil-settings/binary-glob 61195414528fb3ea9693577e1980230d78a1f8b0a54c78cf1b9b24d0a409ed6a x F .fossil-settings/empty-dirs dbb81e8fc0401ac46a1491ab34a7f2c7c0452f2f06b54ebb845d024ca8283ef1 F .fossil-settings/ignore-glob 35175cdfcf539b2318cb04a9901442804be81cd677d8b889fcc9149c21f239ea @@ -952,7 +952,7 @@ F test/backup_malloc.test 0c9abdf74c51e7bedb66d504cd684f28d4bd4027 F test/badutf.test d5360fc31f643d37a973ab0d8b4fb85799c3169f F test/badutf2.test f310fd3b24a491b6b77bccdf14923b85d6ebcce751068c180d93a6b8ff854399 F test/basexx1.test d8a50f0744b93dca656625597bcd3499ff4b9a4ea2a82432b119b7d46e3e0c08 -F test/bc_common.tcl b5e42d80305be95697e6370e015af571e5333a1c +F test/bc_common.tcl c70b896d1d4ce72f769d2c7c1fc15b2cb07559eb2093f2736c8ca51664b29ff5 F test/bestindex1.test 856a453dff8c68b4568601eed5a8b5e20b4763af9229f3947c215729ed878db0 F test/bestindex2.test 394ff8fbf34703391247116d6a44e1c50ee7282236ee77909044573cefc37bc0 F test/bestindex3.test 34bea272b0e0f835651b16a3931dbe7ac927039be6b2e1cb617bbe1d584b492b @@ -1733,9 +1733,9 @@ F test/temptable.test d2c9b87a54147161bcd1822e30c1d1cd891e5b30 F test/temptable2.test 76821347810ecc88203e6ef0dd6897b6036ac788e9dd3e6b04fd4d1631311a16 F test/temptable3.test d11a0974e52b347e45ee54ef1923c91ed91e4637 F test/temptrigger.test 38f0ca479b1822d3117069e014daabcaacefffcc -F test/tester.tcl e7f0c903b2d9dcaa44e707db183d22a5fe17b3f9a3c05a5eed1f4cb5c8fe63bc -F test/testrunner.tcl 331e5babe5ffff8adb4be91439e698f12aed80d4b137d2f40346ac84e0b3c03f x -F test/testrunner_data.tcl 6d7e7824bb36278ea65c33f7da6dd3ca101fc7d6f7a765b807dce0aa68c52521 +F test/tester.tcl 463ae33b8bf75ac77451df19bd65e7c415c2e9891227c7c9e657d0a2d8e1074a +F test/testrunner.tcl 228732ca62ea60e97785e13528bd36627cf3c115d59364a5181ed7f85fd0031d x +F test/testrunner_data.tcl 07f2d36a6321bfd196975aca237db6bba1991032809264a1abeb62e697196d20 F test/thread001.test a0985c117eab62c0c65526e9fa5d1360dd1cac5b03bde223902763274ce21899 F test/thread002.test c24c83408e35ba5a952a3638b7ac03ccdf1ce4409289c54a050ac4c5f1de7502 F test/thread003.test ee4c9efc3b86a6a2767516a37bd64251272560a7 @@ -2216,8 +2216,8 @@ F tool/version-info.c 3b36468a90faf1bbd59c65fd0eb66522d9f941eedd364fabccd7227350 F tool/warnings-clang.sh bbf6a1e685e534c92ec2bfba5b1745f34fb6f0bc2a362850723a9ee87c1b31a7 F tool/warnings.sh 49a486c5069de041aedcbde4de178293e0463ae9918ecad7539eedf0ec77a139 F tool/win/sqlite.vsix deb315d026cc8400325c5863eef847784a219a2f -P b36adadfa202fb8951149561471c3e01085d31e1837c99806f308f234cd24a8e -R 87363f71f72b250581db8a9b120ecc74 +P f96a5346e3e890adfdc94a682688c2c15893e50fbaf2a26e5ef39cda8b331ee4 +R 3a061abeb81e61c88ca5615acd1ca53a U jan.nijtmans -Z 4377057af14450d647f3a3daa5be55b0 +Z c5ae25499ec7925175f7ce3442c79e26 # Remove this line to create a well-formed Fossil manifest. diff --git a/manifest.uuid b/manifest.uuid index d61a4b759..b6f644352 100644 --- a/manifest.uuid +++ b/manifest.uuid @@ -1 +1 @@ -f96a5346e3e890adfdc94a682688c2c15893e50fbaf2a26e5ef39cda8b331ee4 +2aa6c4fa6c9c47c7a8548ac3493bfb9ed4e4dec1b6dc4f3599a0373086b3e917 diff --git a/test/bc_common.tcl b/test/bc_common.tcl index c47f99681..953ce6262 100644 --- a/test/bc_common.tcl +++ b/test/bc_common.tcl @@ -9,7 +9,7 @@ proc bc_find_binaries {zCaption} { set binaries [list] set self [info nameofexec] set pattern "$self?*" - if {$::tcl_platform(platform)=="windows"} { + if {$::tcl_platform(platform) eq "windows"} { set pattern [string map {\.exe {}} $pattern] } foreach file [glob -nocomplain $pattern] { diff --git a/test/tester.tcl b/test/tester.tcl index 444a9d843..3fad39668 100644 --- a/test/tester.tcl +++ b/test/tester.tcl @@ -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 diff --git a/test/testrunner.tcl b/test/testrunner.tcl index 2c7a9f891..60c4627f9 100755 --- a/test/testrunner.tcl +++ b/test/testrunner.tcl @@ -38,7 +38,7 @@ proc find_interpreter {} { } if {$rc} { puts "Cannot find tcl package sqlite3: Trying to build it now..." - if {$::tcl_platform(platform)=="windows"} { + if {$::tcl_platform(platform) eq "windows"} { set bat [open make-tcl-extension.bat w] puts $bat "nmake /f Makefile.msc tclextension" close $bat @@ -170,7 +170,7 @@ proc guess_number_of_cores {} { if {[catch {number_of_cores} ret]} { set ret 4 - if {$::tcl_platform(platform)=="windows"} { + if {$::tcl_platform(platform) eq "windows"} { catch { set ret $::env(NUMBER_OF_PROCESSORS) } } else { if {$::tcl_platform(os)=="Darwin"} { @@ -817,7 +817,7 @@ for {set ii 0} {$ii < [llength $argv]} {incr ii} { } elseif {[string match "$a*" --stop-on-coredump]} { set TRG(stopOnCore) 1 } elseif {[string match "$a*" --status]} { - if {$tcl_platform(platform)=="windows"} { + if {$tcl_platform(platform) eq "windows"} { puts stdout \ "The --status option is not available on Windows. A suggested work-around" puts stdout \ @@ -1500,7 +1500,7 @@ proc progress_report {} { global TRG if {$TRG(fullstatus)} { - if {$::tcl_platform(platform)=="windows"} { + if {$::tcl_platform(platform) eq "windows"} { exec [info nameofexe] $::argv0 status --cls } else { show_status trdb 1 diff --git a/test/testrunner_data.tcl b/test/testrunner_data.tcl index 2597cbe47..ade126a64 100644 --- a/test/testrunner_data.tcl +++ b/test/testrunner_data.tcl @@ -455,7 +455,7 @@ proc trd_fuzztest_data {} { set lFuzzDb [glob [file join $::testdir fuzzdata*.db]] set lSessionDb [glob [file join $::testdir sessionfuzz-data*.db]] - if {$::tcl_platform(platform)=="windows"} { + if {$::tcl_platform(platform) eq "windows"} { return [list fuzzcheck.exe $lFuzzDb] } @@ -527,7 +527,7 @@ proc make_script {cfg srcdir bMsvc} { set configOpts [list] ;# Extra args for [configure] # Define either SQLITE_OS_WIN or SQLITE_OS_UNIX, as appropriate. - if {$::tcl_platform(platform)=="windows"} { + if {$::tcl_platform(os) eq "Windows NT"} { lappend opts -DSQLITE_OS_WIN=1 } else { lappend opts -DSQLITE_OS_UNIX=1 |