Fix the parameterized HashRef constraint routine
gfx [Fri, 4 Dec 2009 04:15:06 +0000 (13:15 +0900)]
xs-src/MouseTypeConstraints.xs

index 8818186..5260d88 100644 (file)
@@ -261,6 +261,7 @@ mouse_parameterized_HashRef(pTHX_ SV* const param, SV* const sv) {
             SV* const value = hv_iterval(hv, he);
             SvGETMAGIC(value);
             if(!mouse_tc_check(aTHX_ param, value)){
+                hv_iterinit(hv); /* reset */
                 return FALSE;
             }
         }