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 /doio.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 'doio.c')
| -rw-r--r-- | doio.c | 5 |
1 files changed, 4 insertions, 1 deletions
@@ -1562,6 +1562,10 @@ Perl_do_exec3(pTHX_ const char *incmd, int fd, int do_report) #endif /* OS2 || WIN32 */ +#ifdef VMS +#include <starlet.h> /* for sys$delprc */ +#endif + I32 Perl_apply(pTHX_ I32 type, register SV **mark, register SV **sp) { @@ -1698,7 +1702,6 @@ nothing in the core. /* kill() doesn't do process groups (job trees?) under VMS */ if (val < 0) val = -val; if (val == SIGKILL) { -# include <starlet.h> /* Use native sys$delprc() to insure that target process is * deleted; supervisor-mode images don't pay attention to * CRTL's emulation of Unix-style signals and kill() |