X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=NetWare%2Fnetware.h;h=18089d58d589626bfb833817a045c1ff3da0aa85;hb=6fc9eaaa1c82b700ac8c8f6b5db3fbfde694d9e7;hp=bd1a4c2cd361ab255ff2a57ce9e1bc4dd1d7fe48;hpb=2986a63f7e513cf37f46db9f211b77071260031f;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/NetWare/netware.h b/NetWare/netware.h
index bd1a4c2..18089d5 100644
--- a/NetWare/netware.h
+++ b/NetWare/netware.h
@@ -48,6 +48,10 @@ struct tms {
 #define HAVE_INTERP_INTERN
 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
 };
 
 /*
@@ -66,9 +70,15 @@ typedef u_int           SOCKET;
 #endif
 
 #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
+
 /*
  * This provides a layer of functions and macros to ensure extensions will
  * get to use the same RTL functions as the core.