Try to define the tests and their respective directories in a way that

$ GOSUB CHECK_OPT_FILE

$!

$! Define The TEST Files.

$!

T_D_1  = "[-.crypto.bf]"

T_F_1  = "bftest"

T_D_2  = "[-.crypto.bn]

T_F_2  = "bntest,exptest" ! "divtest"

T_D_3  = "[-.crypto.cast]"

T_F_3  = "casttest"

T_D_4  = "[-.crypto.conf]"

T_F_4  = "" ! "test"

T_D_5  = "[-.crypto.des]"

T_F_5  = "destest"

T_D_6  = "[-.crypto.dh]"

T_F_6  = "dhtest"

T_D_7  = "[-.crypto.dsa]"

T_F_7  = "dsatest"

T_D_8  = "[-.crypto.ec]"

T_F_8  = "ectest"

T_D_9  = "[-.crypto.ecdh]"

T_F_9  = "ecdhtest"

T_D_10 = "[-.crypto.ecdsa]"

T_F_10 = "ecdsatest"

T_D_11 = "[-.crypto.engine]"

T_F_11 = "enginetest"

T_D_12 = "[-.crypto.evp]"

T_F_12 = "evp_test"

T_D_13 = "[-.crypto.hmac]"

T_F_13 = "hmactest"

T_D_14 = "[-.crypto.idea]"

T_F_14 = "ideatest"

T_D_15 = "[-.crypto.jpake]"

T_F_15 = "jpaketest"

T_D_16 = "[-.crypto.lhash]"

T_F_16 = "" ! "lh_test"

T_D_17 = "[-.crypto.md2]"

T_F_17 = "md2test"

T_D_18 = "[-.crypto.md4]"

T_F_18 = "md4test"

T_D_19 = "[-.crypto.md5]"

T_F_19 = "md5test"

T_D_20 = "[-.crypto.mdc2]"

T_F_20 = "mdc2test"

T_D_21 = "[-.crypto.pqueue]"

T_F_21 = "" ! "pq_test"

T_D_22 = "[-.crypto.rand]"

T_F_22 = "randtest"

T_D_23 = "[-.crypto.rc2]"

T_F_23 = "rc2test"

T_D_24 = "[-.crypto.rc4]"

T_F_24 = "rc4test"

T_D_25 = "[-.crypto.rc5]"

T_F_25 = "rc5test"

T_D_26 = "[-.crypto.ripemd]"

T_F_26 = "rmdtest"

T_D_27 = "[-.crypto.rsa]"

T_F_27 = "rsa_test"

T_D_28 = "[-.crypto.sha]

T_F_28 = "sha1test,sha256t,sha512t,shatest"

T_D_29 = "[-.crypto.threads]

T_F_29 = "" !"mttest"

T_D_30 = "[-.crypto.x509v3]

T_F_30 = "" ! "tabtest"

T_D_31 = "[-.ssl]"

T_F_31 = "ssltest"

T_D_32 = "[-.test]"

T_F_32 = "igetest"

$! NOTE: Some might think this list ugly.  However, it's made this way to

$! reflect the EXE variable in Makefile as closely as possible,

$! thereby making it fairly easy to verify that the lists are the same.

$!

$ TEST_FILES = "BNTEST,ECTEST,ECDSATEST,ECDHTEST,IDEATEST,"+ -

	       "MD2TEST,MD4TEST,MD5TEST,HMACTEST,WP_TEST,"+ -

	       "RC2TEST,RC4TEST,RC5TEST,"+ -

	       "DESTEST,SHATEST,SHA1TEST,SHA256T,SHA512T,"+ -

	       "MDC2TEST,RMDTEST,"+ -

	       "RANDTEST,DHTEST,ENGINETEST,"+ -

	       "BFTEST,CASTTEST,SSLTEST,EXPTEST,DSATEST,RSA_TEST,"+ -

	       "EVP_TEST,JPAKETEST,IGETEST"

$! Should we add MTTEST,PQ_TEST,LH_TEST,DIVTEST,TABTEST as well?

$

$! Additional directory information.

$ T_D_BNTEST     := [-.crypto.bn]

$ T_D_ECTEST     := [-.crypto.ec]

$ T_D_ECDSATEST  := [-.crypto.ecdsa]

$ T_D_ECDHTEST   := [-.crypto.ecdh]

$ T_D_IDEATEST   := [-.crypto.idea]

$ T_D_MD2TEST    := [-.crypto.md2]

$ T_D_MD4TEST    := [-.crypto.md4]

$ T_D_MD5TEST    := [-.crypto.md5]

$ T_D_HMACTEST   := [-.crypto.hmac]

$ T_D_WP_TEST    := [-.crypto.whrlpool]

$ T_D_RC2TEST    := [-.crypto.rc2]

$ T_D_RC4TEST    := [-.crypto.rc4]

$ T_D_RC5TEST    := [-.crypto.rc5]

$ T_D_DESTEST    := [-.crypto.des]

$ T_D_SHATEST    := [-.crypto.sha]

$ T_D_SHA1TEST   := [-.crypto.sha]

$ T_D_SHA256T    := [-.crypto.sha]

$ T_D_SHA512T    := [-.crypto.sha]

$ T_D_MDC2TEST   := [-.crypto.mdc2]

$ T_D_RMDTEST    := [-.crypto.ripemd]

$ T_D_RANDTEST   := [-.crypto.rand]

$ T_D_DHTEST     := [-.crypto.dh]

$ T_D_ENGINETEST := [-.crypto.engine]

$ T_D_BFTEST     := [-.crypto.bf]

$ T_D_CASTTEST   := [-.crypto.cast]

$ T_D_SSLTEST    := [-.ssl]

$ T_D_EXPTEST    := [-.crypto.bn]

$ T_D_DSATEST    := [-.crypto.dsa]

$ T_D_RSA_TEST   := [-.crypto.rsa]

$ T_D_EVP_TEST   := [-.crypto.evp]

$ T_D_JPAKETEST  := [-.crypto.jpake]

$ T_D_IGETEST    := [-.test]

$!

$ TCPIP_PROGRAMS = ",,"

$ IF COMPILER .EQS. "VAXC" THEN -

     TCPIP_PROGRAMS = ",SSLTEST,"

$!

$! Define and initialize Test Directory Counter.

$!

$ T_D_N = 0

$!

$! Increment directory counter.  Exit the directory loop, if done.

$!

$ NEXT_DIR:

$!

$ T_D_N = T_D_N+ 1

$ IF (F$TYPE( T_D_'T_D_N') .EQS. "") THEN GOTO DIR_DONE

$!

$!  Skip empty directory or file name list.

$!

$   TEST_DIR = T_D_'T_D_N'

$   TEST_FILES = T_F_'T_D_N'

$   IF ((TEST_DIR .EQS. "") .OR. (TEST_FILES .EQS. "")) THEN GOTO NEXT_DIR

$!

$! Define A File Counter And Set It To "0".

$!

$ FILE_COUNTER = 0

$!

$! Create The Source File Name.

$!

$   SOURCE_FILE = "SYS$DISK:''TEST_DIR'" + FILE_NAME + ".C"

$ SOURCE_FILE = "SYS$DISK:" + T_D_'FILE_NAME' + FILE_NAME + ".C"

$!

$! Create The Object File Name.

$!

$! All Done With This Library Part.

$!

$ FILE_DONE:

$ GOTO NEXT_DIR

$!

$ DIR_DONE:

$!

$! All Done, Time To Exit.

$!