52
52
$ IF F$PARSE("WRK_SSLROOT:[VMS]") .EQS. "" THEN -
53
53
CREATE/DIR/LOG WRK_SSLROOT:[VMS]
55
$ DIRS := CRYPTO,FIPS,SSL,APPS,VMS!,RSAREF,TEST,TOOLS
55
$ SDIRS := CRYPTO,SSL,APPS,VMS!,RSAREF,TEST,TOOLS
58
58
$ COPY 'EXHEADER' WRK_SSLINCLUDE: /LOG
59
59
$ SET FILE/PROT=WORLD:RE WRK_SSLINCLUDE:'EXHEADER'
63
$ D = F$ELEMENT(I, ",", DIRS)
63
$ D = F$ELEMENT(I, ",", SDIRS)
66
66
$ WRITE SYS$OUTPUT "Installing ",D," files."