This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
make sv_clear() iterate over AVs
[perl5.git] / embed.fnc
index fe70aa9..5741ef0 100644 (file)
--- a/embed.fnc
+++ b/embed.fnc
@@ -1160,7 +1160,7 @@ Apd       |void   |sv_chop        |NN SV *const sv|NULLOK const char *const ptr
 pd     |I32    |sv_clean_all
 : Used only in perl.c
 pd     |void   |sv_clean_objs
-Apd    |void   |sv_clear       |NN SV *const sv
+Apd    |void   |sv_clear       |NN SV *const orig_sv
 Apd    |I32    |sv_cmp         |NULLOK SV *const sv1|NULLOK SV *const sv2
 Apd    |I32    |sv_cmp_flags   |NULLOK SV *const sv1|NULLOK SV *const sv2|const I32 flags
 Apd    |I32    |sv_cmp_locale  |NULLOK SV *const sv1|NULLOK SV *const sv2