X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=perlvars.h;h=025f7c49abec73ac9dd46a7cca2bbfb4c54997c2;hb=e91177edb0beae74fd07fb1ec08a528ab1fb63c2;hp=69206a5d7a37fbad5bd240c512c0cf955555b1e7;hpb=dce16143c60882f40eb787063b9483c00bb82139;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/perlvars.h b/perlvars.h
index 69206a5..025f7c4 100644
--- a/perlvars.h
+++ b/perlvars.h
@@ -54,7 +54,11 @@ PERLVAR(Ghe_root,	HE *)		/* free he list--shared by interpreters */
 PERLVAR(Gnice_chunk,	char *)		/* a nice chunk of memory to reuse */
 PERLVAR(Gnice_chunk_size,	U32)		/* how nice the chunk of memory is */
 
+#ifdef PERL_OBJECT
+PERLVARI(Grunops,	runops_proc_t,	FUNC_NAME_TO_PTR(RUNOPS_DEFAULT))	
+#else
 PERLVARI(Grunops,	runops_proc_t *,	RUNOPS_DEFAULT)	
+#endif
 
 PERLVAR(Gtokenbuf[256],	char)		
 PERLVAR(Gna,	STRLEN)		/* for use in SvPV when length is Not Applicable */
@@ -164,3 +168,5 @@ PERLVARIC(GNo,		char *, "")
 PERLVARIC(Ghexdigit,	char *, "0123456789abcdef0123456789ABCDEFx")
 PERLVARIC(Gpatleave,	char *, "\\.^$@dDwWsSbB+*?|()-nrtfeaxc0123456789[{]}")
 
+PERLVAR(Gspecialsv_list[4], SV *)		/* from byterun.h */
+