Skip to content

Commit 8a0e31d

Browse files
committed
Remove transitional helpers from handy.h
1 parent defc7fa commit 8a0e31d

File tree

1 file changed

+0
-18
lines changed

1 file changed

+0
-18
lines changed

handy.h

Lines changed: 0 additions & 18 deletions
Original file line numberDiff line numberDiff 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))

0 commit comments

Comments
 (0)