tweaks to enable PERL_OBJECT to build & test on win32

p4raw-id: //depot/perl@1879

1 files changed, 2 insertions, 2 deletions

diff --git a/mg.c b/mg.c
index e7472a6ec7..90bea2bc12 100644
--- a/mg.c
+++ b/mg.c
@@ -307,7 +307,7 @@ mg_free(SV *sv)
 #include <signal.h>
 #endif
 
-int
+U32
 magic_regdata_cnt(SV *sv, MAGIC *mg)
 {
     dTHR;
@@ -318,7 +318,7 @@ magic_regdata_cnt(SV *sv, MAGIC *mg)
 
     if (PL_curpm && (rx = PL_curpm->op_pmregexp))
 	return rx->lastparen;
-    return -1;
+    return (U32)-1;
 }
 
 int