This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
embed.fnc: Silence 'no docs' message
[perl5.git] / embed.fnc
index 3a4774c..1b97c0b 100644 (file)
--- a/embed.fnc
+++ b/embed.fnc
@@ -1314,7 +1314,7 @@ ApMd      |U8*    |bytes_from_utf8|NN const U8 *s|NN STRLEN *len|NULLOK bool *is_utf8
 ApMd   |U8*    |bytes_to_utf8  |NN const U8 *s|NN STRLEN *len
 Apd    |UV     |utf8_to_uvchr  |NN const U8 *s|NULLOK STRLEN *retlen
 Apd    |UV     |utf8_to_uvuni  |NN const U8 *s|NULLOK STRLEN *retlen
-pMd    |bool   |check_utf8_print       |NN const U8 *s|const STRLEN len
+pM     |bool   |check_utf8_print       |NN const U8 *s|const STRLEN len
 
 #ifdef EBCDIC
 Adp    |UV     |utf8n_to_uvchr |NN const U8 *s|STRLEN curlen|NULLOK STRLEN *retlen|U32 flags