Add a usage scenario and common use pattern to perldoc -f quotemeta

[perl5.git] / embed.fnc

diff --git a/embed.fnc b/embed.fnc
index ee37dc0..17089ff 100644 (file)
--- a/embed.fnc
+++ b/embed.fnc
@@ -502,6 +502,16 @@ ApR        |bool   |is_utf8_print  |NN const U8 *p
 ApR    |bool   |is_utf8_punct  |NN const U8 *p
 ApR    |bool   |is_utf8_xdigit |NN const U8 *p
 ApR    |bool   |is_utf8_mark   |NN const U8 *p
+ApR    |bool   |is_utf8_X_begin        |NN const U8 *p
+ApR    |bool   |is_utf8_X_extend       |NN const U8 *p
+ApR    |bool   |is_utf8_X_prepend      |NN const U8 *p
+ApR    |bool   |is_utf8_X_non_hangul   |NN const U8 *p
+ApR    |bool   |is_utf8_X_L            |NN const U8 *p
+ApR    |bool   |is_utf8_X_LV           |NN const U8 *p
+ApR    |bool   |is_utf8_X_LVT          |NN const U8 *p
+ApR    |bool   |is_utf8_X_LV_LVT_V     |NN const U8 *p
+ApR    |bool   |is_utf8_X_T            |NN const U8 *p
+ApR    |bool   |is_utf8_X_V            |NN const U8 *p
 : Used in perly.y
 p      |OP*    |jmaybe         |NN OP *o
 : Used in pp.c 
@@ -1378,7 +1388,7 @@ s |HV*    |require_tie_mod|NN GV *gv|NN const char *varpv|NN SV* namesv \
 
 : #if defined(PERL_IN_HV_C) || defined(PERL_IN_SV_C) || defined(PERL_DECL_PROT)
 : Used in hv.c
-paRxo  |void*  |get_arena      |const size_t svtype|const U32 misc
+paRxoM |void*  |get_arena      |const size_t arenasize |const svtype bodytype
 : #endif
 
 #if defined(PERL_IN_HV_C) || defined(PERL_DECL_PROT)