Index: tests/contains.test
===================================================================
diff -u -N -r9e281d5110f397a9e9b8317325d0675f1793246d -re48161ab167236344f7d23da3e855c31d1a1ebc7
--- tests/contains.test	(.../contains.test)	(revision 9e281d5110f397a9e9b8317325d0675f1793246d)
+++ tests/contains.test	(.../contains.test)	(revision e48161ab167236344f7d23da3e855c31d1a1ebc7)
@@ -3,6 +3,7 @@
 package require nx
 
 set ::tcl86 [package vsatisfies [package req Tcl] 8.6]
+set ::tcl90 [package vsatisfies [package req Tcl] 9.0]
 
 #
 # Intentionally, we do not want to make a "namespace import" in this
@@ -183,7 +184,7 @@
 set ::errorcode $::errorCode
 ? {set ::errorMsg} {somethingwrong}
 
-if {$::tcl86} {
+if {$::tcl86 || $::tcl90} {
   set r {somethingwrong
     while executing
 "o contains { return -code error -errorcode {FOO bar baz} somethingwrong}"} 
@@ -193,6 +194,7 @@
     invoked from within
 "o contains { return -code error -errorcode {FOO bar baz} somethingwrong}"}
 }
+
 ? {set ::errorinfo} $r
 ? {set ::errorcode} {FOO bar baz}