Small bugs in the test scripts removed.
authorRichard Levitte <levitte@openssl.org>
Sat, 18 Mar 2000 09:11:00 +0000 (09:11 +0000)
committerRichard Levitte <levitte@openssl.org>
Sat, 18 Mar 2000 09:11:00 +0000 (09:11 +0000)
test/testenc.com
test/testssl.com

index 829b8da..3b66f2e 100644 (file)
@@ -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
index 8781dca..785f262 100644 (file)
@@ -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'