diff options
-rw-r--r-- | op.c | 2 | ||||
-rw-r--r-- | pp_hot.c | 2 |
2 files changed, 2 insertions, 2 deletions
@@ -7302,7 +7302,7 @@ Perl_ck_join(pTHX_ OP *o) const STRLEN len = re ? re->prelen : 6; Perl_warner(aTHX_ packWARN(WARN_SYNTAX), "/%.*s/ should probably be written as \"%.*s\"", - len, pmstr, len, pmstr); + (int)len, pmstr, (int)len, pmstr); } } return ck_fun(o); @@ -788,7 +788,7 @@ PP(pp_rv2av) static const char an_array[] = "an ARRAY"; static const char a_hash[] = "a HASH"; const bool is_pp_rv2av = PL_op->op_type == OP_RV2AV; - const U32 type = is_pp_rv2av ? SVt_PVAV : SVt_PVHV; + const svtype type = is_pp_rv2av ? SVt_PVAV : SVt_PVHV; if (SvROK(sv)) { wasref: |