Skip to content

Commit 6558f00

Browse files
committed
Don't redefine PERL_VERSION_GE/LT
1 parent 7a9d6dc commit 6558f00

File tree

1 file changed

+2
-0
lines changed

1 file changed

+2
-0
lines changed

vutil/vutil.h

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -75,13 +75,15 @@ Perl_ck_warner(pTHX_ U32 err, const char* pat, ...)
7575
# endif
7676
#endif
7777

78+
#ifndef PERL_VERSION_GE
7879
#define PERL_VERSION_DECIMAL(r,v,s) (r*1000000 + v*1000 + s)
7980
#define PERL_DECIMAL_VERSION \
8081
PERL_VERSION_DECIMAL(PERL_REVISION,PERL_VERSION,PERL_SUBVERSION)
8182
#define PERL_VERSION_LT(r,v,s) \
8283
(PERL_DECIMAL_VERSION < PERL_VERSION_DECIMAL(r,v,s))
8384
#define PERL_VERSION_GE(r,v,s) \
8485
(PERL_DECIMAL_VERSION >= PERL_VERSION_DECIMAL(r,v,s))
86+
#endif
8587

8688
#if PERL_VERSION_LT(5,15,4)
8789
# define ISA_VERSION_OBJ(v) (sv_isobject(v) && sv_derived_from(v,"version"))

0 commit comments

Comments
 (0)