diff options
| author | Nicholas Clark <nick@ccl4.org> | 2008-04-06 20:27:34 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2008-04-06 20:27:34 +0000 |
| commit | 06f53df5b0108ea5ee08faa93bb51ff77c7be7e6 (patch) | |
| tree | b44e2ce273fe3d0a5a3fcdec61332fa0888f3365 /scope.h | |
| parent | 4b65a9196162b345e7cbe8a43eca838c2e79e41b (diff) | |
| download | perl-06f53df5b0108ea5ee08faa93bb51ff77c7be7e6.tar.gz | |
A macro used only once isn't a typing saving, and 3 macro definitions
never used are more obfuscation than clarification, so inline the only
use of SAVECOPLABEL_FREE(), and remove the unthreaded variant and
both SAVECOPLABEL()s. Exterminate! Exterminate! Exterminate!
p4raw-id: //depot/perl@33654
Diffstat (limited to 'scope.h')
| -rw-r--r-- | scope.h | 4 |
1 files changed, 0 insertions, 4 deletions
@@ -227,15 +227,11 @@ Closing bracket on a callback. See C<ENTER> and L<perlcall>. # define SAVECOPSTASH_FREE(c) SAVESHAREDPV(CopSTASHPV(c)) # define SAVECOPFILE(c) SAVEPPTR(CopFILE(c)) # define SAVECOPFILE_FREE(c) SAVESHAREDPV(CopFILE(c)) -# define SAVECOPLABEL(c) SAVEPPTR(CopLABEL(c)) -# define SAVECOPLABEL_FREE(c) SAVESHAREDPV(CopLABEL(c)) #else # define SAVECOPSTASH(c) SAVESPTR(CopSTASH(c)) # define SAVECOPSTASH_FREE(c) SAVECOPSTASH(c) /* XXX not refcounted */ # define SAVECOPFILE(c) SAVESPTR(CopFILEGV(c)) # define SAVECOPFILE_FREE(c) SAVEGENERICSV(CopFILEGV(c)) -# define SAVECOPLABEL(c) SAVEPPTR(CopLABEL(c)) -# define SAVECOPLABEL_FREE(c) SAVEPPTR(CopLABEL(c)) #endif #define SAVECOPLINE(c) SAVEI32(CopLINE(c)) |