summaryrefslogtreecommitdiff
path: root/pp_sys.c
diff options
context:
space:
mode:
authorIlya Zakharevich <ilya@math.ohio-state.edu>1996-02-08 03:02:19 -0500
committerAndy Dougherty <doughera@lafcol.lafayette.edu>1996-02-08 03:02:19 -0500
commitc3293030fd1b7489d0a695e05cf3ba7e846dfc11 (patch)
tree9e479c3b713d8fc604591651768a74e27646e578 /pp_sys.c
parent02a9e96851dcb81d50f6e6c61f7be3c108215ef5 (diff)
downloadperl-c3293030fd1b7489d0a695e05cf3ba7e846dfc11.tar.gz
Patch to use sh under OS/2
Diffstat (limited to 'pp_sys.c')
-rw-r--r--pp_sys.c12
1 files changed, 6 insertions, 6 deletions
diff --git a/pp_sys.c b/pp_sys.c
index 4608a2aaef..f0c9d1d564 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -2771,7 +2771,7 @@ PP(pp_system)
Signal_t (*ihand)(); /* place to save signal during system() */
Signal_t (*qhand)(); /* place to save signal during system() */
-#if defined(HAS_FORK) && !defined(VMS)
+#if defined(HAS_FORK) && !defined(VMS) && !defined(OS2)
if (SP - MARK == 1) {
if (tainting) {
char *junk = SvPV(TOPs, na);
@@ -2817,7 +2817,7 @@ PP(pp_system)
value = (I32)do_exec(SvPVx(sv_mortalcopy(*SP), na));
}
_exit(-1);
-#else /* ! FORK or VMS */
+#else /* ! FORK or VMS or OS/2 */
if (op->op_flags & OPf_STACKED) {
SV *really = *++MARK;
value = (I32)do_aspawn(really, MARK, SP);
@@ -2903,8 +2903,8 @@ PP(pp_getpgrp)
pid = 0;
else
pid = SvIVx(POPs);
-#ifdef USE_BSDPGRP
- value = (I32)getpgrp(pid);
+#ifdef BSD_GETPGRP
+ value = (I32)BSD_GETPGRP(pid);
#else
if (pid != 0)
DIE("POSIX getpgrp can't take an argument");
@@ -2933,8 +2933,8 @@ PP(pp_setpgrp)
}
TAINT_PROPER("setpgrp");
-#ifdef USE_BSDPGRP
- SETi( setpgrp(pid, pgrp) >= 0 );
+#ifdef BSD_SETPGRP
+ SETi( BSD_SETPGRP(pid, pgrp) >= 0 );
#else
if ((pgrp != 0) || (pid != 0)) {
DIE("POSIX setpgrp can't take an argument");