diff options
| author | Nicholas Clark <nick@ccl4.org> | 2008-11-30 23:16:09 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2008-11-30 23:16:09 +0000 |
| commit | e22024d3cff7db1071a80c1941fd213f9e45cd7c (patch) | |
| tree | 521ff51ff836bab4cca5aba08a238b7cf9d6fe00 /embed.fnc | |
| parent | 2fd8beea017eccf05d12bfa6e4db7c5340ce637b (diff) | |
| download | perl-e22024d3cff7db1071a80c1941fd213f9e45cd7c.tar.gz | |
Refactor all of the code of the form
SSCHECK(3);
SSPUSHPTR(ptr1);
SSPUSHPTR(ptr2);
SSPUSHINT(type);
into a static function S_save_pushptrptr().
It might be possible to make some of its callers trivial macros, and
so eliminate them as functions. But start with the easy part.
p4raw-id: //depot/perl@34957
Diffstat (limited to 'embed.fnc')
| -rw-r--r-- | embed.fnc | 4 |
1 files changed, 4 insertions, 0 deletions
@@ -923,6 +923,10 @@ Ap |void |save_padsv_and_mortalize|PADOFFSET off Ap |void |save_sptr |NN SV** sptr Ap |SV* |save_svref |NN SV** sptr Ap |void |save_pushptr |NULLOK void *const ptr|const int type +#if defined(PERL_IN_SCOPE_C) +s |void |save_pushptrptr|NULLOK void *const ptr1 \ + |NULLOK void *const ptr2|const int type +#endif : Used in perly.y p |OP* |sawparens |NULLOK OP* o : Used in perly.y |