perldelta: note the perlopentut rewrite

[perl5.git] / NetWare / netware.h

diff --git a/NetWare/netware.h b/NetWare/netware.h
index 6f65560..c106476 100644 (file)
--- a/NetWare/netware.h
+++ b/NetWare/netware.h
@@ -1,6 +1,6 @@
 
 /*
- * Copyright © 2001 Novell, Inc. All Rights Reserved.
+ * Copyright © 2001 Novell, Inc. All Rights Reserved.
  *
  * You may distribute under the terms of either the GNU General Public
  * License or the Artistic License, as specified in the README file.
@@ -49,6 +49,9 @@ struct tms {
 struct interp_intern {
     void *     internal_host;
     long       perlshell_items;        // For system() ;  Ananth, 3 Sept 2001
+
+    char *     perlshell_tokens;       // For system() ; From Win32 of Perl 5.8 on 24 June 2002
+    char **    perlshell_vec;  // For system() ; From Win32 of Perl 5.8 on 24 June 2002
 };
 
 /*
@@ -69,6 +72,9 @@ typedef u_int           SOCKET;
 #define nw_internal_host               (PL_sys_intern.internal_host)
 #define nw_perlshell_items     (PL_sys_intern.perlshell_items)         // For system() ;  Ananth, 3 Sept 2001
 
+#define nw_perlshell_tokens    (PL_sys_intern.perlshell_tokens)        // For system() ; From Win32 of Perl 5.8 on 24 June 2002
+#define nw_perlshell_vec       (PL_sys_intern.perlshell_vec)   // For system() ; From Win32 of Perl 5.8 on 24 June 2002
+
 EXTERN_C void  Perl_nw5_init(int *argcp, char ***argvp);
 
 #define PTHREAD_ATFORK(prepare,parent,child)   NOOP