diff options
| author | Craig A. Berry <craigberry@mac.com> | 2012-05-24 17:13:13 -0500 |
|---|---|---|
| committer | Craig A. Berry <craigberry@mac.com> | 2012-05-24 17:13:13 -0500 |
| commit | 25bbd8263003a49c3f7afdc1cd082f6f66e76ce4 (patch) | |
| tree | c8bd69cd71d0f5095fc9e90ce045107b75df879b /perl.c | |
| parent | 929df5ffc08c253ffd629a57e960a554868f4551 (diff) | |
| download | perl-25bbd8263003a49c3f7afdc1cd082f6f66e76ce4.tar.gz | |
File scope for VMS-specific #includes.
C++ requires #include directives to be at file scope, but we've
been lazy and haven't been doing that.
Diffstat (limited to 'perl.c')
| -rw-r--r-- | perl.c | 5 |
1 files changed, 4 insertions, 1 deletions
@@ -3506,6 +3506,10 @@ Internet, point your browser at http://www.perl.org/, the Perl Home Page.\n\n"); /* unexec() can be found in the Gnu emacs distribution */ /* Known to work with -DUNEXEC and using unexelf.c from GNU emacs-20.2 */ +#ifdef VMS +#include <lib$routines.h> +#endif + void Perl_my_unexec(pTHX) { @@ -3524,7 +3528,6 @@ Perl_my_unexec(pTHX) PerlProc_exit(status); #else # ifdef VMS -# include <lib$routines.h> lib$signal(SS$_DEBUG); /* ssdef.h #included from vmsish.h */ # elif defined(WIN32) || defined(__CYGWIN__) Perl_croak(aTHX_ "dump is not supported"); |