Changeset 808 for openssl/trunk/test/trsa.com

Timestamp:

Aug 7, 2014, 8:25:37 PM (11 years ago)

Author:

dmik

Message:

openssl: Merge version 1.0.0n from vendor to trunk.

Location:

openssl/trunk

Files:

• . (modified) (1 prop)
• test/trsa.com (modified) (2 diffs)

openssl/trunk/test/trsa.com ¶

@@ -1 +1 @@
 $! TRSA.COM  --  Tests rsa keys
 $
-$       __arch := VAX
+$       __arch = "VAX"
 $       if f$getsyi("cpu") .ge. 128 then -
            __arch = f$edit( f$getsyi( "ARCH_NAME"), "UPCASE")
-$       if __arch .eqs. "" then __arch := UNK
-$       exe_dir := sys$disk:[-.'__arch'.exe.apps]
+$       if __arch .eqs. "" then __arch = "UNK"
+$!
+$       if (p2 .eqs. "64") then __arch = __arch+ "_64"
+$!
+$       exe_dir = "sys$disk:[-.''__arch'.exe.apps]"
 $
 $       set noon
@@ -18 +21 @@
 $       endif
 $
-$       cmd := mcr 'exe_dir'openssl rsa
+$       cmd = "mcr ''exe_dir'openssl rsa"
 $
-$       t := testrsa.pem
+$       t = "testrsa.pem"
 $       if p1 .nes. "" then t = p1
 $