diff options
Diffstat (limited to 'dev-tcltk/tcllib/files/tcllib-1.16-test.patch')
-rw-r--r-- | dev-tcltk/tcllib/files/tcllib-1.16-test.patch | 81 |
1 files changed, 0 insertions, 81 deletions
diff --git a/dev-tcltk/tcllib/files/tcllib-1.16-test.patch b/dev-tcltk/tcllib/files/tcllib-1.16-test.patch deleted file mode 100644 index 8b3c8ca25905..000000000000 --- a/dev-tcltk/tcllib/files/tcllib-1.16-test.patch +++ /dev/null @@ -1,81 +0,0 @@ - modules/clock/iso8601.test | 2 +- - modules/multiplexer/multiplexer.test | 2 +- - modules/snit/snit.test | 4 ++-- - modules/struct/sets.testsuite | 2 +- - modules/uev/uevent.test | 2 +- - 5 files changed, 6 insertions(+), 6 deletions(-) - -diff --git a/modules/clock/iso8601.test b/modules/clock/iso8601.test -index 6fce938..a9db5b0 100644 ---- a/modules/clock/iso8601.test -+++ b/modules/clock/iso8601.test -@@ -26,7 +26,7 @@ test clock-iso8601-1.0.1 {parse_date wrong\#args} -constraints {tcl8.6plus} -bod - - test clock-iso8601-1.1 {parse_date, bad option} -body { - clock::iso8601 parse_date 1994-11-05 -foo x --} -returnCodes error -result {bad switch "-foo", must be -base, -format, -gmt, -locale or -timezone} -+} -returnCodes error -result {bad option "-foo", must be -base, -format, -gmt, -locale or -timezone} - - # NOTE: While listed as legal, -format is NOT. This is because the - # command simply hands off to clock scan, and we are seeing its error -diff --git a/modules/multiplexer/multiplexer.test b/modules/multiplexer/multiplexer.test -index d778253..e5dfeff 100644 ---- a/modules/multiplexer/multiplexer.test -+++ b/modules/multiplexer/multiplexer.test -@@ -189,7 +189,7 @@ proc DenyAccessFilter {chan clientaddress clientport} { - return -1 - } - --test multiplexer-5.2 {add access filter which denies access} { -+test multiplexer-5.2 {add access filter which denies access} {broken without network} { - set ::forever {} - set mp [multiplexer::create] - ${mp}::Init 37465 -diff --git a/modules/snit/snit.test b/modules/snit/snit.test -index 66d7bd1..00c0769 100644 ---- a/modules/snit/snit.test -+++ b/modules/snit/snit.test -@@ -783,7 +783,7 @@ test dtypemethod-1.6a {delegating unknown typemethod to existing typecomponent w - snit2 - } -returnCodes { - error --} -result {unknown or ambiguous subcommand "foo": must be bytelength, compare, equal, first, index, is, last, length, map, match, range, repeat, replace, reverse, tolower, totitle, toupper, trim, trimleft, trimright, wordend, or wordstart} -+} -result {unknown or ambiguous subcommand "foo": must be bytelength, cat, compare, equal, first, index, is, last, length, map, match, range, repeat, replace, reverse, tolower, totitle, toupper, trim, trimleft, trimright, wordend, or wordstart} - - test dtypemethod-1.7 {can't delegate local typemethod: order 1} -body { - type dog { -@@ -3339,7 +3339,7 @@ test dmethod-1.6a {delegating unknown method to existing component with error} - - error - } -cleanup { - dog destroy --} -result {unknown or ambiguous subcommand "foo": must be bytelength, compare, equal, first, index, is, last, length, map, match, range, repeat, replace, reverse, tolower, totitle, toupper, trim, trimleft, trimright, wordend, or wordstart} -+} -result {unknown or ambiguous subcommand "foo": must be bytelength, cat, compare, equal, first, index, is, last, length, map, match, range, repeat, replace, reverse, tolower, totitle, toupper, trim, trimleft, trimright, wordend, or wordstart} - - test dmethod-1.7 {can't delegate local method: order 1} -body { - type cat { -diff --git a/modules/struct/sets.testsuite b/modules/struct/sets.testsuite -index 29fd3ef..28a9dd6 100644 ---- a/modules/struct/sets.testsuite -+++ b/modules/struct/sets.testsuite -@@ -13,7 +13,7 @@ - test set-${impl}-1.0 {nothing} { - catch {setop} msg - set msg --} [Nothing] -+} {wrong # args: should be "::struct::set cmd ?arg ...?"} - - test set-${impl}-1.1 {bogus} { - catch {setop foo} msg -diff --git a/modules/uev/uevent.test b/modules/uev/uevent.test -index 91754a7..6544112 100644 ---- a/modules/uev/uevent.test -+++ b/modules/uev/uevent.test -@@ -453,7 +453,7 @@ test uevent-10.3 {watch events, watch after bind, glob} { - ::uevent::unbind $t4 - ::uevent::watch::event::remove $tw - set res --} {bound TAG EX bound TAGX EX bound TAG E bound TAGX E unbound TAGX E unbound TAG E unbound TAGX EX unbound TAG EX} -+} {bound TAGX E bound TAGX EX bound TAG E bound TAG EX unbound TAGX E unbound TAG E unbound TAGX EX unbound TAG EX} - - # ------------------------------------------------------------------------- - rename EVENT {} |