diff options
Diffstat (limited to 'prepare_vms.com')
-rw-r--r-- | prepare_vms.com | 28 |
1 files changed, 16 insertions, 12 deletions
diff --git a/prepare_vms.com b/prepare_vms.com index 04f581f5..16ccbc3c 100644 --- a/prepare_vms.com +++ b/prepare_vms.com @@ -4,28 +4,27 @@ $! $! This is used for building off the master instead of a release tarball. $! $! -$! $! First try ODS-5, Pathworks V6 or UNZIP name. $! -$ config_template = f$search("sys$disk:[]config*h-vms.template") +$ config_template = f$search("sys$disk:[.src]mkconfig*h.in") $ if config_template .eqs. "" $ then $! $! Try NFS, VMStar, or Pathworks V5 ODS-2 encoded name. $! -$ config_template = f$search("sys$disk:[]config.h-vms*template") +$ config_template = f$search("sys$disk:[.src]mkconfig.h*in") $ if config_template .eqs. "" $ then -$ write sys$output "Could not find config.h-vms*template!" +$ write sys$output "Could not find mkconfig.h.in!" $ exit 44 $ endif $ endif $ config_template_file = f$parse(config_template,,,"name") $ config_template_type = f$parse(config_template,,,"type") -$ config_template = "sys$disk:[]" + config_template_file + config_template_type +$ config_template = "sys$disk:[.src]" + config_template_file + config_template_type $! $! -$! Pull the package and version from configure.ac +$! Pull the version from configure.ac $! $ open/read ac_file sys$disk:[]configure.ac $ac_read_loop: @@ -39,21 +38,26 @@ $ version = f$element (0,"]",version) $ac_read_loop_end: $ close ac_file $! -$ if (package .eqs. "") .or. (version .eqs. "") +$ if (version .eqs. "") $ then -$ write sys$output "Unable to determine package and/or version!" +$ write sys$output "Unable to determine version!" $ exit 44 $ endif $! $! -$ outfile = "sys$disk:[]config.h-vms" +$ outfile = "sys$disk:[.src]mkconfig.h" $! $! Note the pipe command is close to the length of 255, which is the $! maximum token length prior to VMS V8.2: $! %DCL-W-TKNOVF, command element is too long - shorten -$ pipe (write sys$output "sub/%PACKAGE%/''package'/WHOLE/NOTYPE" ;- - write sys$output "sub/%VERSION%/''version'/WHOLE/NOTYPE" ;- +$! PDS: Blown out; someone else will have to figure this out +$ pipe (write sys$output "sub,@PACKAGE@,make,WHOLE/NOTYPE" ;- + write sys$output "sub,@PACKAGE_BUGREPORT@,bug-make@gnu.org,WHOLE/NOTYPE" ;- + write sys$output "sub,@PACKAGE_NAME@,GNU Make,WHOLE/NOTYPE" ;- + write sys$output "sub,@PACKAGE_TARNAME@,make,WHOLE/NOTYPE" ;- + write sys$output "sub,@PACKAGE_URL@,https://www.gnu.org/software/make/,WHOLE/NOTYPE" ;- + write sys$output "sub,@PACKAGE_VERSION@,''version',WHOLE/NOTYPE" ;- write sys$output "exit") |- edit/edt 'config_template'/out='outfile'/command=sys$pipe >nla0: $! -$ write sys$output package, ", version: ", version, " prepared for VMS" +$ write sys$output "GNU Make version: ", version, " prepared for VMS" |