mirror/perl
1
0
Fork 0
mirror of https://github.com/Perl/perl5.git synced 2026-01-26 08:38:23 +00:00
Code Issues Packages Projects Releases Wiki Activity

embed.fnc: Add string assertions for dump_exec_pos

Browse Source 
This internal function takes a string argument with beginning and
ending positions.  It is called all the time with an empty string,
This commit is contained in:
Karl Williamson 2025-12-16 10:59:14 -07:00 committed by Karl Williamson
parent 0a0ad01f4f
commit fc3b1a70c0
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
embed.fnc
View File

@ -5940,9 +5940,9 @@ ES |void |debug_start_match \
|SPTR const char *start \
|EPTRge const char *end \
|NN const char *blurb
ES |void |dump_exec_pos |NN const char *locinput \
ES |void |dump_exec_pos |SPTR const char *locinput \
|NN const regnode *scan \
|NN const char *loc_regeol \
|EPTRge const char *loc_regeol \
|NN const char *loc_bostr \
|NN const char *loc_reg_starttry \
|const bool do_utf8 \

2
proto.h generated
View File

@ -8917,7 +8917,7 @@ S_unwind_scan_frames(pTHX_ void *p);
# define PERL_ARGS_ASSERT_DUMP_EXEC_POS \
assert(locinput); assert(scan); assert(loc_regeol); assert(loc_bostr); \
assert(loc_reg_starttry)
assert(loc_reg_starttry); assert(locinput <= loc_regeol)
# define PERL_ARGS_ASSERT_RE_EXEC_INDENTF \
assert(fmt)