Skip to content

Commit

Permalink
Remove mathoms stub Perl_gv_SVadd()
Browse files Browse the repository at this point in the history
  • Loading branch information
khwilliamson committed Oct 28, 2024
1 parent 36f56cd commit 5664167
Show file tree
Hide file tree
Showing 5 changed files with 10 additions and 16 deletions.
2 changes: 1 addition & 1 deletion embed.fnc
Original file line number Diff line number Diff line change
Expand Up @@ -4089,7 +4089,7 @@ Mp |bool |do_exec |NN const char *cmd
p |bool |do_exec |NN const char *cmd
#endif
#if defined(PERL_DONT_CREATE_GVSV)
AMbdp |GV * |gv_SVadd |NULLOK GV *gv
Admp |GV * |gv_SVadd |NULLOK GV *gv
#endif
#if defined(PERL_IMPLICIT_SYS)
CTo |PerlInterpreter *|perl_alloc_using \
Expand Down
3 changes: 3 additions & 0 deletions embed.h
Original file line number Diff line number Diff line change
Expand Up @@ -2018,6 +2018,9 @@
# define finalize_optree(a) Perl_finalize_optree(aTHX_ a)
# define optimize_optree(a) Perl_optimize_optree(aTHX_ a)
# endif
# if defined(PERL_DONT_CREATE_GVSV)
# define gv_SVadd(a) Perl_gv_SVadd(aTHX,a)
# endif
# if !defined(PERL_IMPLICIT_SYS)
# define my_pclose(a) Perl_my_pclose(aTHX_ a)
# define my_popen(a,b) Perl_my_popen(aTHX_ a,b)
Expand Down
2 changes: 1 addition & 1 deletion gv.h
Original file line number Diff line number Diff line change
Expand Up @@ -346,7 +346,7 @@ Make sure there is a slot of the given type (AV, HV, IO, SV) in the GV C<gv>.
#define gv_AVadd(gv) gv_add_by_type((gv), SVt_PVAV)
#define gv_HVadd(gv) gv_add_by_type((gv), SVt_PVHV)
#define gv_IOadd(gv) gv_add_by_type((gv), SVt_PVIO)
#define gv_SVadd(gv) gv_add_by_type((gv), SVt_NULL)
#define Perl_gv_SVadd(mTHX, gv) Perl_gv_add_by_type(aTHX_ (gv), SVt_NULL)

/*
* ex: set ts=8 sts=4 sw=4 et:
Expand Down
8 changes: 0 additions & 8 deletions mathoms.c
Original file line number Diff line number Diff line change
Expand Up @@ -666,14 +666,6 @@ Perl_save_op(pTHX)
save_op();
}

#ifdef PERL_DONT_CREATE_GVSV
GV *
Perl_gv_SVadd(pTHX_ GV *gv)
{
return gv_SVadd(gv);
}
#endif

GV *
Perl_gv_AVadd(pTHX_ GV *gv)
{
Expand Down
11 changes: 5 additions & 6 deletions proto.h

Some generated files are not rendered by default. Learn more about how customized files appear on GitHub.

0 comments on commit 5664167

Please sign in to comment.