Use PERL_VERSION_GE/PERL_VERSION_LT

Leont · Leont · commit 7a9d6dc5d715 · 2020-08-02T14:19:32.000+02:00
diff --git a/vutil/vxs.inc b/vutil/vxs.inc
@@ -139,7 +139,7 @@ VXS(universal_version)
 			   HEKfARG(name), HEKfARG(name));
 	    }
 	    else {
-#if PERL_VERSION >= 8
+#if PERL_VERSION_GE(5,8,0)
 		Perl_croak(aTHX_
 			     "%" SVf " defines neither package nor VERSION--"
                              "version check failed",
diff --git a/vutil/vxs.xs b/vutil/vxs.xs
@@ -43,7 +43,7 @@ VERSIONCHECK: DISABLE
 
 BOOT:
     {
-#if (PERL_REVISION == 5 && PERL_VERSION < 9)
+#if PERL_VERSION_LT(5,9,0)
 	char* file = __FILE__;
 #else
 	const char* file = __FILE__;

Original file line number	Diff line number	Diff line change
`@@ -139,7 +139,7 @@ VXS(universal_version)`
`139`	`139`	`HEKfARG(name), HEKfARG(name));`
`140`	`140`	`}`
`141`	`141`	`else {`
`142`		`-#if PERL_VERSION >= 8`
	`142`	`+#if PERL_VERSION_GE(5,8,0)`
`143`	`143`	`Perl_croak(aTHX_`
`144`	`144`	`"%" SVf " defines neither package nor VERSION--"`
`145`	`145`	`"version check failed",`
Original file line number	Diff line number	Diff line change
`@@ -43,7 +43,7 @@ VERSIONCHECK: DISABLE`
`43`	`43`
`44`	`44`	`BOOT:`
`45`	`45`	`{`
`46`		`-#if (PERL_REVISION == 5 && PERL_VERSION < 9)`
	`46`	`+#if PERL_VERSION_LT(5,9,0)`
`47`	`47`	`char* file = __FILE__;`
`48`	`48`	`#else`
`49`	`49`	`const char* file = __FILE__;`