diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 1999-08-19 12:49:41 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 1999-08-19 12:49:41 +0000 |
| commit | 81e118e078828ea41cd654ee18f4193484a89cf3 (patch) | |
| tree | 62637e08be5499f11f20df252b484d835c58e171 /objXSUB.h | |
| parent | 41bd693c38b93b50972065296573f26c13cc43d1 (diff) | |
| download | perl-81e118e078828ea41cd654ee18f4193484a89cf3.tar.gz | |
Removed duplicated code (in pp.c and mg.c) by introducing
do_vecget(). NOTE: the calling convention of do_vecset()
changes, too: the `offset' that is assigned to LvTARGOFF(TARG)
in pp_vec() is no more multiplied by `size' in pp_vec(),
the multiplication is now done in do_vecset().
Also fix a cpp thinko in change #4002.
p4raw-link: @4002 on //depot/cfgperl: 24db6c0d56fddf85ee587fc1cb1dbce678fa6a8c
p4raw-id: //depot/cfgperl@4004
Diffstat (limited to 'objXSUB.h')
| -rw-r--r-- | objXSUB.h | 4 |
1 files changed, 4 insertions, 0 deletions
@@ -1265,6 +1265,10 @@ #define Perl_do_trans pPerl->Perl_do_trans #undef do_trans #define do_trans Perl_do_trans +#undef Perl_do_vecget +#define Perl_do_vecget pPerl->Perl_do_vecget +#undef do_vecget +#define do_vecget Perl_do_vecget #undef Perl_do_vecset #define Perl_do_vecset pPerl->Perl_do_vecset #undef do_vecset |