mirror of
https://git.freebsd.org/ports.git
synced 2025-06-19 03:30:32 -04:00
f9d0b19b04
A few important changes:
- '.' is no longer in @INC.
- "do" now gives a deprecation warning when it fails to load a file
which it would have loaded had "." been in @INC.
- In regular expression patterns, a literal left brace "{" should be
escaped.
Changes: https://metacpan.org/pod/release/XSAWYERX/perl-5.26.0/pod/perldelta.pod
Sponsored by: Absolight
26 lines
715 B
C
26 lines
715 B
C
--- perl.c.orig 2017-02-20 08:31:27 UTC
|
|
+++ perl.c
|
|
@@ -1870,23 +1870,7 @@ S_Internals_V(pTHX_ CV *cv)
|
|
PUSHs(Perl_newSVpvn_flags(aTHX_ non_bincompat_options,
|
|
sizeof(non_bincompat_options) - 1, SVs_TEMP));
|
|
|
|
-#ifndef PERL_BUILD_DATE
|
|
-# ifdef __DATE__
|
|
-# ifdef __TIME__
|
|
-# define PERL_BUILD_DATE __DATE__ " " __TIME__
|
|
-# else
|
|
-# define PERL_BUILD_DATE __DATE__
|
|
-# endif
|
|
-# endif
|
|
-#endif
|
|
-
|
|
-#ifdef PERL_BUILD_DATE
|
|
- PUSHs(Perl_newSVpvn_flags(aTHX_
|
|
- STR_WITH_LEN("Compiled at " PERL_BUILD_DATE),
|
|
- SVs_TEMP));
|
|
-#else
|
|
PUSHs(&PL_sv_undef);
|
|
-#endif
|
|
|
|
for (i = 1; i <= local_patch_count; i++) {
|
|
/* This will be an undef, if PL_localpatches[i] is NULL. */
|