diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 1999-02-16 04:09:47 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-02-16 04:09:47 +0000 |
commit | cceca5ed003bac658cb0392a14bb2f26d434bd78 (patch) | |
tree | 286c2340276a7cbefe1899f0f01767791bb31ea4 /ext/DB_File | |
parent | a9fb271febef206f32659f8abc5f9029ae2f7a25 (diff) | |
download | perl-cceca5ed003bac658cb0392a14bb2f26d434bd78.tar.gz |
propagate PERL_VERSION everywhere, add to pod
p4raw-id: //depot/perl@2957
Diffstat (limited to 'ext/DB_File')
-rw-r--r-- | ext/DB_File/DB_File.xs | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/ext/DB_File/DB_File.xs b/ext/DB_File/DB_File.xs index 723454eea4..33f4b690f3 100644 --- a/ext/DB_File/DB_File.xs +++ b/ext/DB_File/DB_File.xs @@ -70,6 +70,11 @@ #include "perl.h" #include "XSUB.h" +#ifndef PERL_VERSION +#include "patchlevel.h" +#define PERL_VERSION PATCHLEVEL +#endif + /* Being the Berkeley DB we prefer the <sys/cdefs.h> (which will be * shortly #included by the <db.h>) __attribute__ to the possibly * already defined __attribute__, for example by GNUC or by Perl. */ @@ -335,7 +340,7 @@ GetVersionInfo() croak("DB_File needs Berkeley DB 2.0.5 or greater, you have %d.%d.%d\n", Major, Minor, Patch) ; -#if PATCHLEVEL > 3 +#if PERL_VERSION > 3 sv_setpvf(ver_sv, "%d.%d", Major, Minor) ; #else { |