It seems like sslroot: needs to be defined for some tests to work.

Submitted by Steven M. Schweda <sms@antinode.info>

diff --git a/test/tests.com b/test/tests.com
index 702d087107ae68b8ecaefb7b57e4317ad4292c9e..7fd99937d871184b1aa6912d595921c39d3db0e8 100644 (file)
--- a/test/tests.com
+++ b/test/tests.com
@@ -12,6 +12,9 @@ $     if __arch .eqs. "" then __arch := UNK
 $      texe_dir := sys$disk:[-.'__arch'.exe.test]
 $      exe_dir := sys$disk:[-.'__arch'.exe.apps]
 $
+$      sslroot = f$parse("sys$disk:[-.apps];",,,,"syntax_only") - "].;"+ ".]"
+$      define /translation_attributes = concealed sslroot 'sslroot'
+$
 $      set default '__here'
 $      on control_y then goto exit
 $      on error then goto exit
@@ -287,4 +290,5 @@ $
 $
 $ exit:
 $      set default '__save_default'
+$      deassign sslroot
 $      exit