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

Modify the new shell test case to work on non-Windows platforms as well.

FossilOrigin-Name: f362c5d9d17a04404a0407a556202d101fde84ee
This commit is contained in:
mistachkin
2015-01-18 09:02:57 +00:00
parent f21979df76
commit 46a6b99492
3 changed files with 12 additions and 14 deletions

View File

@ -824,11 +824,12 @@ do_test shell1-5.0 {
#
for {set i 1} {$i < 256} {incr i} {
#
# NOTE: Due to how the Tcl [exec] command works on Windows (i.e. where
# it treats command channels opened for it as textual ones), the
# carriage-return and end-of-file characters cannot be used here.
# NOTE: Due to how the Tcl [exec] command works (i.e. where it treats
# command channels opened for it as textual ones), the carriage
# return character (and on Windows, the end-of-file character)
# cannot be used here.
#
if {$tcl_platform(platform)=="windows" && ($i == 0x0D || $i == 0x1A)} {
if {$i==0x0D || ($tcl_platform(platform)=="windows" && $i==0x1A)} {
continue
}
set hex [format %02X $i]