Home
last modified time | relevance | path

Searched refs:fieldmap (Results 1 – 1 of 1) sorted by relevance

/openbsd/gnu/usr.bin/perl/
H A Dclass.c870 AV *fieldmap = newAV(); in Perl_class_wrap_method_body() local
872 SAVEFREESV((SV *)fieldmap); in Perl_class_wrap_method_body()
884 av_push_simple(fieldmap, newSVuv(padix)); in Perl_class_wrap_method_body()
885 av_push_simple(fieldmap, newSVuv(fieldix)); in Perl_class_wrap_method_body()
890 if(av_count(fieldmap)) { in Perl_class_wrap_method_body()
893 * (2 + av_count(fieldmap)) in Perl_class_wrap_method_body()
898 (ap++)->uv = av_count(fieldmap) / 2; in Perl_class_wrap_method_body()
901 for(Size_t i = 0; i < av_count(fieldmap); i++) in Perl_class_wrap_method_body()
902 (ap++)->uv = SvUV(AvARRAY(fieldmap)[i]); in Perl_class_wrap_method_body()