X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=embed.fnc;h=d5014c49c90bebf202317c6b79a88c022318deb1;hb=2977d345acaba2d25f549b813e6f840a0d225b16;hp=7dbdd58e9ee71200e1d19ca70b534817a6036230;hpb=6407bf3bededaf57267b14aadbfe114045362404;p=p5sagit%2Fp5-mst-13.2.git diff --git a/embed.fnc b/embed.fnc index 7dbdd58..d5014c4 100644 --- a/embed.fnc +++ b/embed.fnc @@ -1353,13 +1353,18 @@ s |int |sv_2iuv_non_preserve |NN SV *sv|I32 numtype # endif sR |I32 |expect_number |NN char** pattern # -s |bool |utf8_mg_pos |NN SV *sv|NN MAGIC **mgp|NN STRLEN **cachep \ - |I32 i|NN I32 *offsetp|I32 uoff \ - |NN const U8 **sp|NN const U8 *start \ - |NN const U8 *send -s |bool |utf8_mg_pos_init |NN SV *sv|NN MAGIC **mgp \ - |NN STRLEN **cachep|I32 i|I32 offsetp \ - |NN const U8 *s|NN const U8 *start +s |STRLEN |sv_pos_u2b_forwards|NN const U8 *const start \ + |NN const U8 *const send|STRLEN uoffset +s |STRLEN |sv_pos_u2b_midway|NN const U8 *const start \ + |NN const U8 *const send|STRLEN uoffset|STRLEN uend +s |STRLEN |sv_pos_u2b_cached|NN SV *sv|NN MAGIC **mgp \ + |NN const U8 *const start|NN const U8 *const send \ + |STRLEN uoffset|STRLEN uoffset0|STRLEN boffset0 +s |void |utf8_mg_pos_cache_update|NN SV *sv|NN MAGIC **mgp \ + |STRLEN byte|STRLEN utf8|STRLEN blen +s |STRLEN |sv_pos_b2u_forwards|NN const U8 *s|NN const U8 *const target +s |STRLEN |sv_pos_b2u_midway|NN const U8 *s|NN const U8 *const target \ + |NN const U8 *end|STRLEN endu s |char * |stringify_regexp|NN SV *sv|NN MAGIC *mg|NULLOK STRLEN *lp sn |char * |F0convert |NV nv|NN char *endbuf|NN STRLEN *len # if defined(PERL_OLD_COPY_ON_WRITE) @@ -1431,7 +1436,7 @@ s |int |tokereport |I32 rv #endif #if defined(PERL_IN_UNIVERSAL_C) || defined(PERL_DECL_PROT) -s |SV*|isa_lookup |NULLOK HV *stash|NN const char *name|NULLOK HV *name_stash|int len|int level +s |bool|isa_lookup |NULLOK HV *stash|NN const char *name|NULLOK HV *name_stash|int len|int level #endif #if defined(PERL_IN_LOCALE_C) || defined(PERL_DECL_PROT)