summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
Diffstat (limited to 'tests')
-rw-r--r--tests/package.test10
1 files changed, 7 insertions, 3 deletions
diff --git a/tests/package.test b/tests/package.test
index 99f9f06..8e36763 100644
--- a/tests/package.test
+++ b/tests/package.test
@@ -117,6 +117,10 @@ test package-2.6 {Tcl_PkgProvide procedure} {
package forget t
package provide t 2.3a1
} {}
+test package-2.6 {Tcl_PkgProvide procedure} {
+ package forget t
+ package provide t 2.3.0-alpha.1
+} {}
set n 0
foreach v {
@@ -579,7 +583,7 @@ test package-3.50 {Tcl_PkgRequire procedure, picking best stable version} -const
package forget t
set x xxx
} -body {
- foreach i {1.4 3.4 4.0a1 2.3 2.4 2.2} {
+ foreach i {1.4 3.4 4.0a1 4.0.0-alpha.1 2.3 2.4 2.2} {
package ifneeded t $i "set x $i; package provide t $i"
}
package require t
@@ -589,7 +593,7 @@ test package-3.51 {Tcl_PkgRequire procedure, picking best stable version} -setup
package forget t
set x xxx
} -body {
- foreach i {1.2b1 1.2 1.3a2 1.3} {
+ foreach i {1.2b1 1.2.0-beta.1 1.2 1.3a2 1.3.0-alpha.2 1.3} {
package ifneeded t $i "set x $i; package provide t $i"
}
package require t
@@ -599,7 +603,7 @@ test package-3.52 {Tcl_PkgRequire procedure, picking best stable version} -setup
package forget t
set x xxx
} -body {
- foreach i {1.2b1 1.2 1.3 1.3a2} {
+ foreach i {1.2b1 1.2.0-beta.1 1.2 1.3 1.3a2 1.3.0-alpha.2} {
package ifneeded t $i "set x $i; package provide t $i"
}
package require t