Subject: | Teach MM_Any.pm to deal with VOS keep files (== core files) |
This is a bug report / suggestion against ExtUtils-MakeMaker version 6.64, encountered while qualifying perl 5.14.2 for inclusion with OpenVOS Release 17.2.
On the Stratus VOS (aka OpenVOS) operating system, what *nix-lang calls a core file is instead called a keep file, and it begins with the name of the program, may include the hex form of the process ID, and ends with the suffix ".kp". So, the code in the clean function in MM_Any.pm needs to know of these differences. The attached patch takes care of it. These changes have been tested by me on OpenVOS Release 17.1 and 17.2 and the proposed changes produce the correct behavior. Since the changes are conditioned on the 'vos' operating system tag, they will not affect any other OS. If you have any questions or concerns, please let me know. Thanks in advance.
Subject: | mm_any.vos.core.diff |
diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Any.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Any.pm
index 73ce249..be4cccc 100644
--- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Any.pm
+++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Any.pm
@@ -556,7 +556,13 @@ clean :: clean_subdirs
push(@files, $self->catfile('$(INST_ARCHAUTODIR)','extralibs.ld'));
# core files
- push(@files, qw[core core.*perl.*.? *perl.core]);
+ if ($^O eq 'vos') {
+ push(@files, qw[perl*.kp]);
+ }
+ else {
+ push(@files, qw[core core.*perl.*.? *perl.core]);
+ }
+
push(@files, map { "core." . "[0-9]"x$_ } (1..5));
# OS specific things to clean up. Use @dirs since we don't know