diff --git a/test/testtsa.com b/test/testtsa.com
index b6bd8c67b052faae8b4dd01270991947322c7dde..7963e85259198ffe2e455adda02f9e95447f157b 100644
--- a/test/testtsa.com
+++ b/test/testtsa.com
@@ -6,7 +6,7 @@ $	__arch := VAX
 $	if f$getsyi("cpu") .ge. 128 then __arch := AXP
 $	exe_dir := sys$disk:[-.'__arch'.exe.apps]
 $
-$	openssl := mcr 'exe_dir'openssl
+$	openssl := mcr 'f$parse(exe_dir+"openssl.exe")'
 $	OPENSSL_CONF := [-]CAtsa.cnf
 $
 $ error: