Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Change the error messages so that they can be grepped using '^!' instead of '^ '. There are far too many extraneous outputs that begin with a space. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
367ec0db49607559960d58891771113c |
| User & Date: | drh 2015-11-13 00:03:14 |
| Original Comment: | Change the error messages so that they begin can be grepped using '^!' instead of '^ '. There are far too many extraneous outputs that being with a space. |
Context
|
2015-11-13
| ||
| 12:32 | Disable two PRAGMA cache_spill tests when MEMORY_MANAGEMENT is enabled. check-in: ebda77aa user: drh tags: trunk | |
| 02:13 | Merge fixes from trunk. check-in: f9060b2a user: drh tags: apple-osx | |
| 00:03 | Change the error messages so that they can be grepped using '^!' instead of '^ '. There are far too many extraneous outputs that begin with a space. check-in: 367ec0db user: drh tags: trunk | |
|
2015-11-12
| ||
| 23:48 | Update the SQLLOG logic so that to builds in accordance with the instructions in the header comment. check-in: ee6f2fee user: drh tags: trunk | |
Changes
Changes to test/tester.tcl.
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
....
1027
1028
1029
1030
1031
1032
1033
1034
1035
1036
1037
1038
1039
1040
1041
|
set ok [expr {[string compare $result $expected]==0}]
}
if {!$ok} {
# if {![info exists ::testprefix] || $::testprefix eq ""} {
# error "no test prefix"
# }
output1 ""
output2 " $name expected: \[$expected\]\n $name got: \[$result\]"
fail_test $name
} else {
output1 " Ok"
}
}
} else {
output1 " Omitted"
................................................................................
if {$nKnown>0} {
output2 "[expr {$nErr-$nKnown}] new errors and $nKnown known errors\
out of $nTest tests"
} else {
output2 "$nErr errors out of $nTest tests"
}
if {$nErr>$nKnown} {
output2 -nonewline "Failures on these tests:"
foreach x [set_test_counter fail_list] {
if {![info exists known_error($x)]} {output2 -nonewline " $x"}
}
output2 ""
}
foreach warning [set_test_counter warn_list] {
output2 "Warning: $warning"
|
|
|
|
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
....
1027
1028
1029
1030
1031
1032
1033
1034
1035
1036
1037
1038
1039
1040
1041
|
set ok [expr {[string compare $result $expected]==0}]
}
if {!$ok} {
# if {![info exists ::testprefix] || $::testprefix eq ""} {
# error "no test prefix"
# }
output1 ""
output2 "! $name expected: \[$expected\]\n! $name got: \[$result\]"
fail_test $name
} else {
output1 " Ok"
}
}
} else {
output1 " Omitted"
................................................................................
if {$nKnown>0} {
output2 "[expr {$nErr-$nKnown}] new errors and $nKnown known errors\
out of $nTest tests"
} else {
output2 "$nErr errors out of $nTest tests"
}
if {$nErr>$nKnown} {
output2 -nonewline "!Failures on these tests:"
foreach x [set_test_counter fail_list] {
if {![info exists known_error($x)]} {output2 -nonewline " $x"}
}
output2 ""
}
foreach warning [set_test_counter warn_list] {
output2 "Warning: $warning"
|