From 9ec7171b93c2f7e007fcbb49144b664695f0d21b Mon Sep 17 00:00:00 2001 From: "Craig A. Berry" Date: Fri, 22 Feb 2008 00:20:45 +0000 Subject: Following 33291, on VMS we need to use the same prototypes other platforms use in order to get the do_spawn-related assert macros defined. Based on suggestions by John Malmberg. p4raw-id: //depot/perl@33343 --- pp_sys.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'pp_sys.c') diff --git a/pp_sys.c b/pp_sys.c index 75c832f63a..fc57695112 100644 --- a/pp_sys.c +++ b/pp_sys.c @@ -4165,14 +4165,14 @@ PP(pp_system) result = 0; if (PL_op->op_flags & OPf_STACKED) { SV * const really = *++MARK; -# if defined(WIN32) || defined(OS2) || defined(__SYMBIAN32__) +# if defined(WIN32) || defined(OS2) || defined(__SYMBIAN32__) || defined(__VMS) value = (I32)do_aspawn(really, MARK, SP); # else value = (I32)do_aspawn(really, (void **)MARK, (void **)SP); # endif } else if (SP - MARK != 1) { -# if defined(WIN32) || defined(OS2) || defined(__SYMBIAN32__) +# if defined(WIN32) || defined(OS2) || defined(__SYMBIAN32__) || defined(__VMS) value = (I32)do_aspawn(NULL, MARK, SP); # else value = (I32)do_aspawn(NULL, (void **)MARK, (void **)SP); -- cgit v1.2.1