[PATCH #2] Re: [perl #22181] goto undefines my() variables

[p5sagit/p5-mst-13.2.git] / ext / B / typemap

diff --git a/ext/B/typemap b/ext/B/typemap
index bafba1c..ccbcd90 100644 (file)
--- a/ext/B/typemap
+++ b/ext/B/typemap
@@ -29,7 +29,7 @@ B::IO         T_SV_OBJ
 
 B::MAGIC       T_MG_OBJ
 SSize_t                T_IV
-STRLEN         T_IV
+STRLEN         T_UV
 PADOFFSET      T_UV
 
 INPUT