"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "perl.c" between
perl-5.28.2.tar.xz and perl-5.28.3.tar.xz

About: Perl (Practical Extraction and Report Language) is a high-level, general-purpose, interpreted, dynamic programming language. Stable release.

perl.c  (perl-5.28.2.tar.xz)	:	perl.c  (perl-5.28.3.tar.xz)
#line 2 "perl.c"		#line 2 "perl.c"
/* perl.c		/* perl.c
*		*
* Copyright (C) 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001		* Copyright (C) 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001
* 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012		* 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012
* 2013, 2014, 2015, 2016, 2017, 2018, 2019 by Larry Wall and others		* 2013, 2014, 2015, 2016, 2017, 2018, 2019, 2020 by Larry Wall and others
*		*
* You may distribute under the terms of either the GNU General Public		* You may distribute under the terms of either the GNU General Public
* License or the Artistic License, as specified in the README file.		* License or the Artistic License, as specified in the README file.
*		*
*/		*/
/*		/*
* A ship then new they built for him		* A ship then new they built for him
* of mithril and of elven-glass		* of mithril and of elven-glass
* --from Bilbo's song of Eärendil		* --from Bilbo's song of Eärendil
skipping to change at line 3757		skipping to change at line 3757
#if defined(LOCAL_PATCH_COUNT)		#if defined(LOCAL_PATCH_COUNT)
if (LOCAL_PATCH_COUNT > 0)		if (LOCAL_PATCH_COUNT > 0)
PerlIO_printf(PIO_stdout,		PerlIO_printf(PIO_stdout,
"\n(with %d registered patch%s, "		"\n(with %d registered patch%s, "
"see perl -V for more detail)",		"see perl -V for more detail)",
LOCAL_PATCH_COUNT,		LOCAL_PATCH_COUNT,
(LOCAL_PATCH_COUNT!=1) ? "es" : "");		(LOCAL_PATCH_COUNT!=1) ? "es" : "");
#endif		#endif
PerlIO_printf(PIO_stdout,		PerlIO_printf(PIO_stdout,
"\n\nCopyright 1987-2019, Larry Wall\n");		"\n\nCopyright 1987-2020, Larry Wall\n");
#ifdef MSDOS		#ifdef MSDOS
PerlIO_printf(PIO_stdout,		PerlIO_printf(PIO_stdout,
"\nMS-DOS port Copyright (c) 1989, 1990, Diomidis Spinellis \n");		"\nMS-DOS port Copyright (c) 1989, 1990, Diomidis Spinellis \n");
#endif		#endif
#ifdef DJGPP		#ifdef DJGPP
PerlIO_printf(PIO_stdout,		PerlIO_printf(PIO_stdout,
"djgpp v2 port (jpl5003c) by Hirofumi Watanabe, 1996\n"		"djgpp v2 port (jpl5003c) by Hirofumi Watanabe, 1996\n"
"djgpp v2 port (perl5004+) by Laszlo Molnar, 1997-1999\n");		"djgpp v2 port (perl5004+) by Laszlo Molnar, 1997-1999\n");
#endif		#endif
#ifdef OS2		#ifdef OS2
End of changes. 2 change blocks.
2 lines changed or deleted		2 lines changed or added

---