X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/91e945c051cfcdf499d5b43aa5ac0a5681cdd595..4258cf903c752ec19a3aeee9b93020533d923e1a:/embed.fnc?ds=sidebyside

diff --git a/embed.fnc b/embed.fnc
index fb2c1ac..7ae61a7 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -814,8 +814,8 @@ EMsPR	|char*|form_short_octal_warning|NN const char * const s  \
 #endif
 Apd	|UV	|grok_hex	|NN const char* start|NN STRLEN* len_p|NN I32* flags|NULLOK NV *result
 Apd	|int	|grok_infnan	|NN const char** sp|NN const char *send|NULLOK NV *nvp
-Apd	|const char *|grok_nan	|NN const char* s|NN const char *send|NN int *flags|NULLOK NV *nvp
-Apd	|const char *|grok_nan_payload|NN const char* s|NN const char *send|bool signaling|NN int *flags|NULLOK NV *nvp
+Apd	|const char *|grok_nan	|NN const char* s|NN const char *send|NN int *flags|NULLOK NV *nvp|NULLOK SV* svp
+Apd	|const char *|grok_nan_payload|NN const char* s|NN const char *send|bool signaling|NN int *flags|NULLOK NV *nvp|NULLOK SV *svp
 Apd	|int	|grok_number	|NN const char *pv|STRLEN len|NULLOK UV *valuep
 Apd	|int	|grok_number_flags|NN const char *pv|STRLEN len|NULLOK UV *valuep|U32 flags
 Apd	|int	|grok_number2_flags|NN const char *pv|STRLEN len|NULLOK UV *valuep|NULLOK NV* nvp|U32 flags
@@ -825,7 +825,7 @@ Apdn	|UV	|grok_atou	|NN const char* pv|NULLOK const char** endptr
 Apdn	|U8*	|nan_hibyte|NN NV *nvp|NN U8* mask
 Apd	|void	|nan_signaling_set|NN NV *nvp|bool signaling
 Apdn	|int	|nan_is_signaling|NV nv
-Apd	|void	|nan_payload_set|NN NV *nvp|NN const void *bytes|STRLEN byten|bool signaling
+Apd	|void	|nan_payload_set|NN NV *nvp|NULLOK SV *svp|NN const void *bytes|STRLEN byten|bool signaling
 : These are all indirectly referenced by globals.c. This is somewhat annoying.
 p	|int	|magic_clearenv	|NN SV* sv|NN MAGIC* mg
 p	|int	|magic_clear_all_env|NN SV* sv|NN MAGIC* mg