Small bugs in the test scripts removed.

diff --git a/test/testenc.com b/test/testenc.com
index 829b8da512327a2d8e261e211b45f1f4d762b883..3b66f2e0d0614f5de4ac0a88b01094c8d69eda03 100644 (file)
--- a/test/testenc.com
+++ b/test/testenc.com
@@ -28,9 +28,9 @@ $     backup/compare 'test' 'test'-clear
 $      if $severity .ne. 1 then exit 3
 $      delete 'test'-cipher;*,'test'-clear;*
 $
-$      define/user sys$output 'test'-cipher-commands.
+$      define/user sys$output 'test'-cipher-commands
 $      'cmd' list-cipher-commands
-$      open/read f 'test'-cipher-commands.
+$      open/read f 'test'-cipher-commands
 $ loop_cipher_commands:
 $      read/end=loop_cipher_commands_end f i
 $      write sys$output i

diff --git a/test/testssl.com b/test/testssl.com
index 8781dcabcf8673b427f6313ba83b4ada02f63d0e..785f262f5ad5c889dec02eead9346f9fef70e823 100644 (file)
--- a/test/testssl.com
+++ b/test/testssl.com
@@ -19,12 +19,12 @@ $       cert=p2
 $      endif
 $      ssltest := mcr 'texe_dir'ssltest -key 'key' -cert 'cert' -c_key 'key' -c_cert 'cert'
 $
-$      define/user sys$output test-ssltest-output.
+$      define/user sys$output testssl-x509-output.
 $      define/user sys$error nla0:
 $      mcr 'exe_dir'openssl x509 -in 'cert' -text -noout
 $      set noon
 $      define/user sys$error nla0:
-$      search/output=nla0: testssl-ssltest-output. "DSA Public Key"/exact
+$      search/output=nla0: testssl-x509-output. "DSA Public Key"/exact
 $      if $severity .eq. 1
 $      then
 $          dsa_cert := YES
@@ -32,7 +32,7 @@ $     else
 $          dsa_cert := NO
 $      endif
 $      set on
-$      delete testssl-ssltest-output.;*
+$      delete testssl-x509-output.;*
 $
 $      if p3 .eqs. ""
 $      then
@@ -186,5 +186,5 @@ $   goto exit
 $ exit3:
 $      RET = 3
 $ exit:
-$      delete certs.tmp;*
+$      if p3 .eqs. "" then delete certs.tmp;*
 $      exit 'RET'