diff options
Diffstat (limited to 'vms/build_gawk_pcsi_desc.com')
| -rw-r--r-- | vms/build_gawk_pcsi_desc.com | 18 |
1 files changed, 15 insertions, 3 deletions
diff --git a/vms/build_gawk_pcsi_desc.com b/vms/build_gawk_pcsi_desc.com index 63d149e6..298d0ea0 100644 --- a/vms/build_gawk_pcsi_desc.com +++ b/vms/build_gawk_pcsi_desc.com @@ -96,8 +96,8 @@ $! Required product dependencies. $!---------------------------------- $ vmsprd = "DEC" $ if base .eqs. "I64VMS" then vmsprd = "HP" +$ vsiprd = "VSI" $! -$ write pdsc " software ''vmsprd' ''base' VMS ;" $ arch_type = f$getsyi("ARCH_NAME") $ node_swvers = f$getsyi("node_swvers") $ vernum = f$extract(1, f$length(node_swvers), node_swvers) @@ -109,8 +109,20 @@ $ if dashver .eqs. "-" then dashver = "" $ vmstag = majver + minver + dashver $ code = f$extract(0, 1, arch_type) $ arch_code = f$extract(0, 1, arch_type) -$ write pdsc - - " if (not <software ''vmsprd' ''base' VMS version minimum ''node_swvers'>) ;" +$ line_out = - + " if ((<software ''vmsprd' ''base' VMS> and" +$ write pdsc line_out +$ line_out = - + " (not <software ''vmsprd' ''base' VMS version minimum" + - + " ''node_swvers'>)) or" +$ write pdsc line_out +$ line_out = - + " (<software ''vsiprd' ''base' VMS>" +$ write pdsc line_out +$ line_out = - + " and (not <software ''vsiprd' ''base' VMS version minimum" + - + " ''node_swvers'>))) ;" +$ write pdsc line_out $ write pdsc " error NEED_VMS''vmstag';" $ write pdsc " end if;" $! |