summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2016-02-15 20:59:10 -0700
committerKarl Williamson <khw@cpan.org>2016-02-18 20:26:50 -0700
commit768f8d987cfefb34c0b9c1a2e5c65b4448b4b937 (patch)
treeafd51788d9335202a1a0305bba6718ef847e1dae
parentb271ede139c499b0a38fbeff3a5a032adcb54955 (diff)
downloadperl-768f8d987cfefb34c0b9c1a2e5c65b4448b4b937.tar.gz
perlapi: Hide the swash functions
These should be internal only, and we may want to get rid of them someday. Hide their existence so that people who don't already know about them won't be tempted to try to use them.
-rw-r--r--embed.fnc6
1 files changed, 3 insertions, 3 deletions
diff --git a/embed.fnc b/embed.fnc
index a0c7285172..f5ace28a04 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -1164,7 +1164,7 @@ Amb |OP* |ref |NULLOK OP* o|I32 type
s |OP* |refkids |NULLOK OP* o|I32 type
#endif
Ap |void |regdump |NN const regexp* r
-Ap |SV* |regclass_swash |NULLOK const regexp *prog \
+ApM |SV* |regclass_swash |NULLOK const regexp *prog \
|NN const struct regnode *node|bool doinit \
|NULLOK SV **listsvp|NULLOK SV **altsvp
#if defined(PERL_IN_REGCOMP_C) || defined(PERL_IN_PERL_C) || defined(PERL_IN_UTF8_C)
@@ -1517,8 +1517,8 @@ Apd |void |sv_vsetpvfn |NN SV *const sv|NN const char *const pat|const STRLEN pa
|NULLOK va_list *const args|NULLOK SV **const svargs \
|const I32 svmax|NULLOK bool *const maybe_tainted
ApR |NV |str_to_version |NN SV *sv
-ApR |SV* |swash_init |NN const char* pkg|NN const char* name|NN SV* listsv|I32 minbits|I32 none
-Ap |UV |swash_fetch |NN SV *swash|NN const U8 *ptr|bool do_utf8
+ApRM |SV* |swash_init |NN const char* pkg|NN const char* name|NN SV* listsv|I32 minbits|I32 none
+ApM |UV |swash_fetch |NN SV *swash|NN const U8 *ptr|bool do_utf8
#ifdef PERL_IN_REGCOMP_C
EiMR |SV* |add_cp_to_invlist |NULLOK SV* invlist|const UV cp
EsM |void |_append_range_to_invlist |NN SV* const invlist|const UV start|const UV end