1 files changed, 5 insertions, 1 deletions
diff --git a/tests/all.tcl b/tests/all.tcl
index 0a6f57f..8c0425d 100644
--- a/tests/all.tcl
+++ b/tests/all.tcl
@@ -18,5 +18,9 @@ configure {*}$argv -testdir [file dir [info script]]
 if {[singleProcess]} {
     interp debug {} -frame 1
 }
-runAllTests
+if {[info exists ::env(TCLTEST_SHELL_OPTIONS)]} {
+    exit [runAllTests [interpreter] $::env(TCLTEST_SHELL_OPTIONS)]
+} else {
+    exit [runAllTests]
+}
 proc exit args {}