Reenable numeric first argument of system() on VMS.
authorCraig A. Berry <craigberry@mac.com>
Mon, 1 Jan 2018 16:10:33 +0000 (10:10 -0600)
committerCraig A. Berry <craigberry@mac.com>
Mon, 1 Jan 2018 21:51:16 +0000 (15:51 -0600)
This was broken in 64def2aeaeb63f92dadc6dfa334, and fixed for Win32
only in 8fe3452cc6ac7af8c08.  But VMS also uses a numeric first
argument to system() as a flag indicating spawn without waiting for
completion.

pp_sys.c

index 0c9147b..5154b9b 100644 (file)
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -4375,7 +4375,7 @@ PP(pp_system)
        STRLEN len;
        char *pv;
        SvGETMAGIC(origsv);
-#ifdef WIN32
+#if defined(WIN32) || defined(__VMS)
        /*
         * Because of a nasty platform-specific variation on the meaning
         * of arguments to this op, we must preserve numeric arguments