This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
VMSCMD missing
authorMichael G. Schwern <schwern@pobox.com>
Thu, 15 Nov 2001 16:24:11 +0000 (11:24 -0500)
committerAbhijit Menon-Sen <ams@wiw.org>
Thu, 15 Nov 2001 20:46:22 +0000 (20:46 +0000)
Message-Id: <20011115162411.M31399@blackrider>

p4raw-id: //depot/perl@13025

vms/vms.c

index 28dfa70..a82625d 100644 (file)
--- a/vms/vms.c
+++ b/vms/vms.c
@@ -127,6 +127,9 @@ static bool will_taint = FALSE;  /* tainting active, but no PL_curinterp yet */
 /* munching */ 
 static int no_translate_barewords;
 
 /* munching */ 
 static int no_translate_barewords;
 
+/* Temp for subprocess commands */
+static struct dsc$descriptor_s VMSCMD = {0,DSC$K_DTYPE_T,DSC$K_CLASS_S,Nullch};
+
 #ifndef RTL_USES_UTC
 static int tz_updated = 1;
 #endif
 #ifndef RTL_USES_UTC
 static int tz_updated = 1;
 #endif