summaryrefslogtreecommitdiff
path: root/embed.fnc
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2010-07-12 13:39:19 +0100
committerNicholas Clark <nick@ccl4.org>2010-07-12 13:46:23 +0100
commit9df83ffded21f5c1d01d1ef847c3447b6553810f (patch)
tree1991f07e53136227c824cb719a2c14fdd74a4a27 /embed.fnc
parent6ef2ab89d2567e144b289574a2e087dd7eec7894 (diff)
downloadperl-9df83ffded21f5c1d01d1ef847c3447b6553810f.tar.gz
Create S_assert_uft8_cache_coherent() with one copy of the cache panic code.
Replacing 4 copies of this debugging-only routine with 1 reduces source and object code size.
Diffstat (limited to 'embed.fnc')
-rw-r--r--embed.fnc2
1 files changed, 2 insertions, 0 deletions
diff --git a/embed.fnc b/embed.fnc
index 31de4ce7fa..85beec1a1e 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -1897,6 +1897,8 @@ s |void |utf8_mg_pos_cache_update|NN SV *const sv|NN MAGIC **const mgp \
|const STRLEN byte|const STRLEN utf8|const STRLEN blen
s |STRLEN |sv_pos_b2u_midway|NN const U8 *const s|NN const U8 *const target \
|NN const U8 *end|STRLEN endu
+s |void |assert_uft8_cache_coherent|NN const char *const func \
+ |STRLEN from_cache|STRLEN real|NN SV *const sv
sn |char * |F0convert |NV nv|NN char *const endbuf|NN STRLEN *const len
# if defined(PERL_OLD_COPY_ON_WRITE)
sM |void |sv_release_COW |NN SV *sv|NN const char *pvx|NN SV *after