diff options
Diffstat (limited to 'x2p')
| -rw-r--r-- | x2p/a2p.h | 14 | ||||
| -rw-r--r-- | x2p/find2perl.PL | 1 | ||||
| -rw-r--r-- | x2p/s2p.PL | 1 |
3 files changed, 13 insertions, 3 deletions
@@ -9,7 +9,11 @@ */ #define VOIDUSED 1 -#include "../config.h" +#ifdef VMS +# include "config.h" +#else +# include "../config.h" +#endif #if defined(__STDC__) || defined(vax11c) || defined(_AIX) || defined(__stdc__) || defined(__cplusplus) # define STANDARD_C 1 @@ -101,7 +105,7 @@ #else # if defined(VMS) # define NO_PERL_TYPEDEFS -# include "[-]vmsish.h" +# include "vmsish.h" # endif #endif @@ -113,7 +117,11 @@ char *strchr(), *strrchr(); char *strcpy(), *strcat(); #endif /* ! STANDARD_C */ -#include "../handy.h" +#ifdef VMS +# include "handy.h" +#else +# include "../handy.h" +#endif #undef Nullfp #define Nullfp Null(FILE*) diff --git a/x2p/find2perl.PL b/x2p/find2perl.PL index 2ffc338075..c23fc923a8 100644 --- a/x2p/find2perl.PL +++ b/x2p/find2perl.PL @@ -14,6 +14,7 @@ use File::Basename qw(&basename &dirname); # This is so that make depend always knows where to find PL derivatives. chdir dirname($0); $file = basename($0, '.PL'); +$file .= '.com' if $^O eq 'VMS'; open OUT,">$file" or die "Can't create $file: $!"; diff --git a/x2p/s2p.PL b/x2p/s2p.PL index 7564d51d99..73f67872de 100644 --- a/x2p/s2p.PL +++ b/x2p/s2p.PL @@ -14,6 +14,7 @@ use File::Basename qw(&basename &dirname); # This is so that make depend always knows where to find PL derivatives. chdir dirname($0); $file = basename($0, '.PL'); +$file .= '.com' if $^O eq 'VMS'; open OUT,">$file" or die "Can't create $file: $!"; |