mirror of
https://salsa.debian.org/srivasta/make-dfsg.git
synced 2024-12-27 06:27:57 +00:00
Set up for running tests on VMS.
* run_make_tests.pl: set $port_type to be 'VMS-DCL' when the test are run from the VMS DCL Interpreter. When the tests are run from GNV on VMS, the $port_type will be 'UNIX'. * run_make_tests.com: VMS search list support. This is needed for using a search list such as prj_root = lcl_root:,vms_root:,src_root: for building and testing.
This commit is contained in:
parent
d1df4b21f3
commit
e75662bc6a
2 changed files with 10 additions and 3 deletions
|
@ -238,18 +238,18 @@ $!
|
|||
$ if no_gnv .or. no_perl then exit 44
|
||||
$!
|
||||
$!
|
||||
$ make := $bin:make.exe
|
||||
$ default = f$environment("DEFAULT")
|
||||
$ default_dev = f$element(0, ":", default) + ":"
|
||||
$ this = f$environment("PROCEDURE")
|
||||
$ on error then goto all_error
|
||||
$ set default 'f$parse(this,,,"DEVICE")''f$parse(this,,,"DIRECTORY")'
|
||||
$ set default 'default_dev''f$parse(this,,,"DIRECTORY")'
|
||||
$!
|
||||
$! Need to make sure that the config-flags.pm exists.
|
||||
$ if f$search("config-flags.pm") .eqs. ""
|
||||
$ then
|
||||
$ @config_flags_pm.com
|
||||
$ endif
|
||||
$ define/user bin 'default',gnv$gnu:[bin]
|
||||
$ define/user bin 'default_dev'[-],gnv$gnu:[bin]
|
||||
$ define/user decc$filename_unix_noversion enable
|
||||
$ define/user decc$filename_unix_report enable
|
||||
$ define/user decc$readdir_dropdotnotype enable
|
||||
|
|
|
@ -359,6 +359,12 @@ sub set_more_defaults
|
|||
elsif ($osname =~ m%OS/2%) {
|
||||
$port_type = 'OS/2';
|
||||
}
|
||||
|
||||
# VMS has a GNV Unix mode or a DCL mode.
|
||||
# The SHELL environment variable should not be defined in VMS-DCL mode.
|
||||
elsif ($osname eq 'VMS' && !defined $ENV{"SHELL"}) {
|
||||
$port_type = 'VMS-DCL';
|
||||
}
|
||||
# Everything else, right now, is UNIX. Note that we should integrate
|
||||
# the VOS support into this as well and get rid of $vos; we'll do
|
||||
# that next time.
|
||||
|
@ -377,6 +383,7 @@ sub set_more_defaults
|
|||
# Find the full pathname of Make. For DOS systems this is more
|
||||
# complicated, so we ask make itself.
|
||||
if ($osname eq 'VMS') {
|
||||
$port_type = 'VMS-DCL' unless defined $ENV{"SHELL"};
|
||||
# On VMS pre-setup make to be found with simply 'make'.
|
||||
$make_path = 'make';
|
||||
} else {
|
||||
|
|
Loading…
Reference in a new issue