[asperl] fixups to make it build and pass tests under both compilers

[p5sagit/p5-mst-13.2.git] / perlvars.h

diff --git a/perlvars.h b/perlvars.h
index a141c35..9f801fb 100644 (file)
--- a/perlvars.h
+++ b/perlvars.h
@@ -60,7 +60,7 @@ 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,  RUNOPS_DEFAULT) 
+PERLVARI(Grunops,      runops_proc_t,  FUNC_NAME_TO_PTR(RUNOPS_DEFAULT))       
 #else
 PERLVARI(Grunops,      runops_proc_t *,        RUNOPS_DEFAULT) 
 #endif