]> git.vpit.fr Git - perl/modules/Test-Valgrind.git/blob - lib/Test/Valgrind/Carp.pm
Make sure $version is not set when no suitable valgrind was found
[perl/modules/Test-Valgrind.git] / lib / Test / Valgrind / Carp.pm
1 package Test::Valgrind::Carp;
2
3 use strict;
4 use warnings;
5
6 =head1 NAME
7
8 Test::Valgrind::Carp - Carp-like private methods for Test::Valgrind objects.
9
10 =head1 VERSION
11
12 Version 1.17
13
14 =cut
15
16 our $VERSION = '1.17';
17
18 =head1 DESCRIPTION
19
20 This class only provides a C<_croak> method that lazily requires L<Carp> and then croaks with the supplied message.
21
22 The class should not be used outside from L<Test::Valgrind> and may be removed without notice.
23
24 =cut
25
26 sub _croak {
27  shift;
28  require Carp;
29  local $Carp::CarpLevel = ($Carp::CarpLevel || 0) + 1;
30  Carp::croak(@_);
31 }
32
33 =head1 SEE ALSO
34
35 L<Test::Valgrind>.
36
37 =head1 AUTHOR
38
39 Vincent Pit, C<< <perl at profvince.com> >>, L<http://www.profvince.com>.
40
41 You can contact me by mail or on C<irc.perl.org> (vincent).
42
43 =head1 BUGS
44
45 Please report any bugs or feature requests to C<bug-test-valgrind at rt.cpan.org>, or through the web interface at L<http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Test-Valgrind>.
46 I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.
47
48 =head1 SUPPORT
49
50 You can find documentation for this module with the perldoc command.
51
52     perldoc Test::Valgrind::Carp
53
54 =head1 COPYRIGHT & LICENSE
55
56 Copyright 2009,2010,2011,2013,2015 Vincent Pit, all rights reserved.
57
58 This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
59
60 =cut
61
62 1; # End of Test::Valgrind::Carp