diff options
| author | Jan Dubois <jand@activestate.com> | 1998-11-23 01:48:11 +0100 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-11-27 14:20:12 +0000 |
| commit | 3967c732803d47eb9e3dd99812f099d7f15ec379 (patch) | |
| tree | 14328844c7ff6ef1b97bc430c33484228b95855e /sv.h | |
| parent | 73f0cc2d7df5b14dbea315ed9c6a2e3ae1fb82e6 (diff) | |
| download | perl-3967c732803d47eb9e3dd99812f099d7f15ec379.tar.gz | |
add ext/Devel/Peek
Message-ID: <36589ec9.49964585@smtp1.ibm.net>
Subject: [PATCH 5.005_53] Devel::Peek integration
p4raw-id: //depot/perl@2322
Diffstat (limited to 'sv.h')
| -rw-r--r-- | sv.h | 4 |
1 files changed, 4 insertions, 0 deletions
@@ -650,7 +650,11 @@ struct xpvio { #define SvSetMagicSV_nosteal(dst,src) \ SvSetSV_nosteal_and(dst,src,SvSETMAGIC(dst)) +#ifdef DEBUGGING #define SvPEEK(sv) sv_peek(sv) +#else +#define SvPEEK(sv) "" +#endif #define SvIMMORTAL(sv) ((sv)==&PL_sv_undef || (sv)==&PL_sv_yes || (sv)==&PL_sv_no) |