File tree Expand file tree Collapse file tree 1 file changed +0
-18
lines changed Expand file tree Collapse file tree 1 file changed +0
-18
lines changed Original file line number Diff line number Diff line change @@ -429,24 +429,6 @@ Perl_xxx(aTHX_ ...) form for any API calls where it's used.
429429#define get_cvs (str , flags ) \
430430 Perl_get_cvn_flags(aTHX_ STR_WITH_LEN(str), (flags))
431431
432- /* internal helpers */
433- /* Transitional */
434- #ifndef PERL_VERSION_MAJOR
435- # define PERL_VERSION_MAJOR PERL_REVISION
436- #else
437- # undef PERL_REVISION /* We don't want code to be using these */
438- #endif
439- #ifndef PERL_VERSION_MINOR
440- # define PERL_VERSION_MINOR PERL_VERSION
441- #else
442- # undef PERL_VERSION
443- #endif
444- #ifndef PERL_VERSION_PATCH
445- # define PERL_VERSION_PATCH PERL_SUBVERSION
446- #else
447- # undef PERL_SUBVERSION
448- #endif
449-
450432#define PERL_JNP_TO_DECIMAL_ (maJor ,miNor ,Patch ) \
451433 /* '10*' leaves room for things like alpha, beta, releases */ \
452434 (10 * ((maJor) * 1000000) + ((miNor) * 1000) + (Patch))
You can’t perform that action at this time.
0 commit comments