diff options
author | Ilya Zakharevich <ilya@math.berkeley.edu> | 1999-11-15 20:50:31 -0500 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-12-03 04:47:03 +0000 |
commit | 9426adcd48655815b65cea5a9f1eebbe7e23a9df (patch) | |
tree | d9707481a6d1bd26c1d688da99bbd3b0273c0aaa /ext/Devel/Peek/Peek.pm | |
parent | 34baa6c30415f54e9b8c2e622de1e229cf36d781 (diff) | |
download | perl-9426adcd48655815b65cea5a9f1eebbe7e23a9df.tar.gz |
applied suggested patch; removed $VERSION = $VERSION hack
(change#4043 fixed the need for that)
Message-Id: <199911160650.BAA18874@monk.mps.ohio-state.edu>
Subject: [PATCH 5.005_62] XSLoader.pm
p4raw-link: @4043 on //depot/cfgperl: 09bef84370e90d727656ea11ba5ee8be80e361d3
p4raw-id: //depot/perl@4623
Diffstat (limited to 'ext/Devel/Peek/Peek.pm')
-rw-r--r-- | ext/Devel/Peek/Peek.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/ext/Devel/Peek/Peek.pm b/ext/Devel/Peek/Peek.pm index 2e990b0a3a..4b472ad8a8 100644 --- a/ext/Devel/Peek/Peek.pm +++ b/ext/Devel/Peek/Peek.pm @@ -3,17 +3,17 @@ package Devel::Peek; -$VERSION = $VERSION = 0.95; +$VERSION = 0.95; require Exporter; -require DynaLoader; +use XSLoader (); -@ISA = qw(Exporter DynaLoader); +@ISA = qw(Exporter); @EXPORT = qw(Dump mstat DeadCode DumpArray DumpWithOP DumpProg); @EXPORT_OK = qw(SvREFCNT SvREFCNT_inc SvREFCNT_dec); %EXPORT_TAGS = ('ALL' => [@EXPORT, @EXPORT_OK]); -bootstrap Devel::Peek; +XSLoader::load 'Devel::Peek'; sub DumpWithOP ($;$) { local($Devel::Peek::dump_ops)=1; |