tests: move garabage collection test to ref.test

bootstrap jimsh doesn't have garbage collection, so move
such tests into ref.test

Signed-off-by: Steve Bennett <steveb@workware.net.au>

2 files changed, 24 insertions, 17 deletions

diff --git a/tests/alias.test b/tests/alias.test
index 9ad2dfd..00870d1 100644
--- a/tests/alias.test
+++ b/tests/alias.test
@@ -265,21 +265,4 @@ test upcall-1.6 {delete local command with upcall} -body {
 	rename a c
 } -returnCodes error -result {can't rename local command "a"}
 
-test collect-1.1 {ensure globally scoped references are deleted} {
-	collect
-	set result {}
-
-	# Create a globally scoped reference as a function name
-	set a ::[ref testfunction -]
-	proc $a {} { return 3 }
-	lappend result [$a]
-	# It shouldn't be collected
-	lappend result [collect]
-	lappend result [$a]
-	unset a
-	# Now it should be collected
-	lappend result [collect]
-	set result
-} {3 0 3 1}
-
 testreport
diff --git a/tests/ref.test b/tests/ref.test
new file mode 100644
index 0000000..7a38142
--- /dev/null
+++ b/tests/ref.test
@@ -0,0 +1,24 @@
+source [file dirname [info script]]/testing.tcl
+
+needs constraint jim
+needs cmd ref
+needs cmd collect
+
+test collect-1.1 {ensure globally scoped references are deleted} {
+	collect
+	set result {}
+
+	# Create a globally scoped reference as a function name
+	set a ::[ref testfunction -]
+	proc $a {} { return 3 }
+	lappend result [$a]
+	# It shouldn't be collected
+	lappend result [collect]
+	lappend result [$a]
+	unset a
+	# Now it should be collected
+	lappend result [collect]
+	set result
+} {3 0 3 1}
+
+testreport