From 3790a1ab40e5274f20e00f2c1709e7f8fec9319f Mon Sep 17 00:00:00 2001 From: "jan.nijtmans" Date: Wed, 25 May 2022 22:26:49 +0000 Subject: See [https://github.com/tcltk/tcl/pull/14] --- .github/dependabot.yml | 6 ++++++ 1 file changed, 6 insertions(+) create mode 100644 .github/dependabot.yml diff --git a/.github/dependabot.yml b/.github/dependabot.yml new file mode 100644 index 0000000..203f3c8 --- /dev/null +++ b/.github/dependabot.yml @@ -0,0 +1,6 @@ +version: 2 +updates: +- package-ecosystem: "github-actions" + directory: "/" + schedule: + interval: "weekly" -- cgit v0.12 From fea7919329d937f72dfed48c38134d49c8dfa64b Mon Sep 17 00:00:00 2001 From: "jan.nijtmans" Date: Thu, 26 May 2022 12:47:42 +0000 Subject: Revert part of [0381fc9b91]: testcases get-1.8 and get-1.9 are meant for longIs64bit only --- tests/get.test | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/tests/get.test b/tests/get.test index 8232a9a..079166e 100644 --- a/tests/get.test +++ b/tests/get.test @@ -20,6 +20,7 @@ catch [list package require -exact tcl::test [info patchlevel]] testConstraint testgetint [llength [info commands testgetint]] testConstraint testdoubleobj [llength [info commands testdoubleobj]] +testConstraint longIs64bit [expr {$tcl_platform(wordSize) == 8}] test get-1.1 {Tcl_GetInt procedure} testgetint { testgetint 44 { 22} @@ -42,10 +43,10 @@ test get-1.6 {Tcl_GetInt procedure} testgetint { test get-1.7 {Tcl_GetInt procedure} testgetint { list [catch {testgetint 44 18446744073709551616} msg] $msg $errorCode } {1 {integer value too large to represent} {ARITH IOVERFLOW {integer value too large to represent}}} -test get-1.8 {Tcl_GetInt procedure} testgetint { +test get-1.8 {Tcl_GetInt procedure} {testgetint longIs64bit} { testgetint 18446744073709551614 } {-2} -test get-1.9 {Tcl_GetInt procedure} testgetint { +test get-1.9 {Tcl_GetInt procedure} {testgetint longIs64bit} { testgetint +18446744073709551614 } {-2} test get-1.10 {Tcl_GetInt procedure} testgetint { -- cgit v0.12