diff --git a/lib/modules/SSL.pmod/testsuite.in b/lib/modules/SSL.pmod/testsuite.in
index 8286447f51b4f0cfe0b4a61957cfc28c1c5bf087..95e8d342498c7ece436bfc5e0d80cee74ede20b1 100644
--- a/lib/modules/SSL.pmod/testsuite.in
+++ b/lib/modules/SSL.pmod/testsuite.in
@@ -230,6 +230,18 @@ test_do([[
   add_constant("parse_fields");
 ]])
 
+define(run_sub_test, [[
+  test_tests([[
+    array a() {return Tools.Testsuite.run_script ($1);}
+  ]])
+]])
+
+dnl Displaced tests for SSL.sslfile.
+run_sub_test(({"SRCDIR../../../src/modules/_Stdio/async_tls_close_test.pike", "0", "0"}))
+run_sub_test(({"SRCDIR../../../src/modules/_Stdio/async_tls_close_test.pike", "0", "1"}))
+run_sub_test(({"SRCDIR../../../src/modules/_Stdio/async_tls_close_test.pike", "1", "0"}))
+run_sub_test(({"SRCDIR../../../src/modules/_Stdio/async_tls_close_test.pike", "1", "1"}))
+
 test_do([[
 #define ASSERT(X) if(!(X)) error("Assertion failed.\n")
 
diff --git a/src/modules/_Stdio/testsuite.in b/src/modules/_Stdio/testsuite.in
index 9fdc1068d1d18a8aa204c1a025400a951e169383..5cc1df93772a14a77ff186ce62139dedd97d24c0 100644
--- a/src/modules/_Stdio/testsuite.in
+++ b/src/modules/_Stdio/testsuite.in
@@ -379,10 +379,4 @@ cond_begin([[ Pike["PollDeviceBackend"] && Pike["PollDeviceBackend"]["HAVE_KQUEU
 cond_end
 
 
-dnl Displaced tests for SSL.sslfile.
-run_sub_test(({"SRCDIR/async_tls_close_test.pike", "0", "0"}))
-run_sub_test(({"SRCDIR/async_tls_close_test.pike", "0", "1"}))
-run_sub_test(({"SRCDIR/async_tls_close_test.pike", "1", "0"}))
-run_sub_test(({"SRCDIR/async_tls_close_test.pike", "1", "1"}))
-
 END_MARKER