https://perl5.git.perl.org / perl5.git / blame
| Commit | Line | Data |
|---|---|---|
| 2ff28616 GB |
1 | package List::Util::XS; |
| 2 | use strict; | |
| 3 | use vars qw($VERSION); | |
| 4 | ||
| 5 | $VERSION = undef; | |
| 6 | ||
| 7 | sub VERSION { | |
| 8 | require Carp; | |
| 9 | Carp::croak("You need to install Scalar-List-Utils with a C compiler to ensure the XS is compiled") | |
| 10 | if defined $_[1]; | |
| 11 | $VERSION; | |
| 12 | } | |
| 13 | ||
| 14 | 1; | |
| 15 | __END__ | |
| 16 | ||
| 17 | =head1 NAME | |
| 18 | ||
| 19 | List::Util::XS - Indicate if List::Util was compiled with a C compiler | |
| 20 | ||
| 21 | =head1 SYNOPSIS | |
| 22 | ||
| 23 | use List::Util::XS 1.20; | |
| 24 | ||
| 25 | =head1 DESCRIPTION | |
| 26 | ||
| 27 | B<*** This instalation does not have XS installed ***> | |
| 28 | ||
| 29 | C<List::Util::XS> can be used as a dependency to ensure List::Util was | |
| 30 | installed using a C compiler and that the XS version is installed. | |
| 31 | ||
| 32 | During installation C<$List::Util::XS::VERSION> will be set to | |
| 33 | C<undef> if the XS was not compiled. | |
| 34 | ||
| 35 | =head1 SEE ALSO | |
| 36 | ||
| 37 | L<Scalar::Util>, L<List::Util>, L<List::MoreUtils> | |
| 38 | ||
| 39 | =head1 COPYRIGHT | |
| 40 | ||
| 41 | Copyright (c) 2008 Graham Barr <gbarr@pobox.com>. All rights reserved. | |
| 42 | This program is free software; you can redistribute it and/or | |
| 43 | modify it under the same terms as Perl itself. | |
| 44 | ||
| 45 | =cut |