end_point= HOP3(strend, -srch_end_shift, strbeg);
}
DEBUG_OPTIMISE_r({
- PerlIO_printf(Perl_debug_log, "fbm_instr len=%"IVdf" str=<%.*s>\n",
+ PerlIO_printf(Perl_debug_log, "fbm_instr len=%d str=<%.*s>\n",
(int)(end_point - start_point),
(int)(end_point - start_point),
start_point);
}
- t= HOP3( s, -prog->check_offset_max, (prog->check_offset_max<0) ? strend : strpos);
+ t= (char*)HOP3( s, -prog->check_offset_max, (prog->check_offset_max<0) ? strend : strpos);
DEBUG_OPTIMISE_r(
PerlIO_printf(Perl_debug_log,
if (s - strpos > prog->check_offset_max /* signed-corrected t > strpos */
&& (!do_utf8
- || ((t = (char*)reghopmaybe3((U8*)s, -prog->check_offset_max, (prog->check_offset_max<0) ? strend : strpos))
+ || ((t = (char*)reghopmaybe3((U8*)s, -prog->check_offset_max, (U8*) ((prog->check_offset_max<0) ? strend : strpos)))
&& t > strpos)))
{
/* Fixed substring is found far enough so that the match
else
endpos= strend;
- DEBUG_EXECUTE_r(PerlIO_printf(Perl_debug_log, "start_shift: %"IVdf" check_at: %"IVdf" s: %"IVdf" endpos: %"IVdf"\n",
+ DEBUG_EXECUTE_r(PerlIO_printf(Perl_debug_log, "start_shift: %"IVdf" check_at: %d s: %d endpos: %d\n",
start_shift,check_at-strbeg,s-strbeg,endpos-strbeg));
t = s;