Index: tests/contains.test
===================================================================
diff -u -r7d197d8e8a9ad6229c2aa8a11111118f5cab26b6 -re67f194e31b8e0fb4f1312a3257088a94e598b0d
--- tests/contains.test	(.../contains.test)	(revision 7d197d8e8a9ad6229c2aa8a11111118f5cab26b6)
+++ tests/contains.test	(.../contains.test)	(revision e67f194e31b8e0fb4f1312a3257088a94e598b0d)
@@ -55,6 +55,11 @@
   Tree create 1.3 -label 1.3
 }]
 
+set x [Tree create t -contains {
+  ? {Tree create branch} ::t::branch
+  ? {Tree new} ::t::__#1
+}]
+
 #
 # Test resolving next without namespace import/path
 #