From: Chip Salzenberg Date: Sat, 22 Mar 1997 03:34:25 +0000 (+1200) Subject: [differences between cumulative patch application and perl-5.003_95] X-Git-Tag: accepted/trunk/20130322.191538~38041^2~222 X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=eb79544ff58c74c06888e5611739331fa5e91f32;p=platform%2Fupstream%2Fperl.git [differences between cumulative patch application and perl-5.003_95] --- eb79544ff58c74c06888e5611739331fa5e91f32 diff --cc win32/EXTERN.h index 3ce6377,3ce6377..0000000 deleted file mode 100644,100644 --- a/win32/EXTERN.h +++ /dev/null @@@ -1,47 -1,47 +1,0 @@@ --/* EXTERN.h -- * -- * Copyright (c) 1991-1997, Larry Wall -- * -- * You may distribute under the terms of either the GNU General Public -- * License or the Artistic License, as specified in the README file. -- * -- */ -- --/* -- * EXT designates a global var which is defined in perl.h -- * dEXT designates a global var which is defined in another -- * file, so we can't count on finding it in perl.h -- * (this practice should be avoided). -- */ --#undef EXT --#undef dEXT --#undef EXTCONST --#undef dEXTCONST --#if defined(VMS) && !defined(__GNUC__) --# define EXT globalref --# define dEXT globaldef {"$GLOBAL_RW_VARS"} noshare --# define EXTCONST globalref --# define dEXTCONST globaldef {"$GLOBAL_RO_VARS"} readonly --#elif defined(_MSC_VER) && defined(_WIN32) --# ifdef PERLDLL --# define EXT __declspec(dllexport) --# define dEXT --# define EXTCONST __declspec(dllexport) const --# define dEXTCONST const --# else --# define EXT __declspec(dllimport) --# define dEXT --# define EXTCONST __declspec(dllimport) const --# define dEXTCONST const --# endif --#else --# define EXT extern --# define dEXT --# define EXTCONST extern const --# define dEXTCONST const --#endif -- --#undef INIT --#define INIT(x) -- --#undef DOINIT diff --cc win32/VC-2.0/vc2.patch index ea7031b,ea7031b..0000000 deleted file mode 100644,100644 --- a/win32/VC-2.0/vc2.patch +++ /dev/null @@@ -1,16 -1,16 +1,0 @@@ --You will need this patch to win32.c when compiling with VC++ ver. 2.0. -- -- --diff -ur /y/src/perl5.003_93/win32/win32.c perl5.003_93-w32/win32/win32.c ----- /y/src/perl5.003_93/win32/win32.c Fri Jan 31 21:38:10 1997 --+++ perl5.003_93-w32/win32/win32.c Tue Mar 11 01:51:08 1997 --@@ -41,7 +41,8 @@ -- char szPerlLibRoot[MAX_PATH+1]; -- HANDLE PerlDllHandle = INVALID_HANDLE_VALUE; -- ---#define IsWin95() (Win32System == VER_PLATFORM_WIN32_WINDOWS) --+/* #define IsWin95() (Win32System == VER_PLATFORM_WIN32_WINDOWS) */ --+#define IsWin95() (0) -- #define IsWinNT() (Win32System == VER_PLATFORM_WIN32_NT) -- -- void * diff --cc win32/dosish.h index 8e423fa,8e423fa..0000000 deleted file mode 100644,100644 --- a/win32/dosish.h +++ /dev/null @@@ -1,89 -1,89 +1,0 @@@ --#define ABORT() abort(); -- --#define SH_PATH "/bin/sh" -- --#ifdef DJGPP --#define BIT_BUCKET "nul" --#define OP_BINARY O_BINARY --void Perl_DJGPP_init(); --#define PERL_SYS_INIT(argcp, argvp) STMT_START { \ -- Perl_DJGPP_init(); } STMT_END --#else --#define PERL_SYS_INIT(c,v) --#define BIT_BUCKET "nul" --#endif -- --#define PERL_SYS_TERM() --#define dXSUB_SYS int dummy --#define TMPPATH "plXXXXXX" -- --/* -- * 5.003_07 and earlier keyed on #ifdef MSDOS for determining if we were -- * running on DOS, *and* if we had to cope with 16 bit memory addressing -- * constraints, *and* we need to have memory allocated as unsigned long. -- * -- * with the advent of *real* compilers for DOS, they are not locked together. -- * MSDOS means "I am running on MSDOS". HAS_64K_LIMIT means "I have -- * 16 bit memory addressing constraints". -- * -- * if you need the last, try #DEFINE MEM_SIZE unsigned long. -- */ --#ifdef MSDOS -- #ifndef DJGPP -- #define HAS_64K_LIMIT -- #endif --#endif -- --/* USEMYBINMODE -- * This symbol, if defined, indicates that the program should -- * use the routine my_binmode(FILE *fp, char iotype) to insure -- * that a file is in "binary" mode -- that is, that no translation -- * of bytes occurs on read or write operations. -- */ --#undef USEMYBINMODE -- --/* USE_STAT_RDEV: -- * This symbol is defined if this system has a stat structure declaring -- * st_rdev -- */ --#define USE_STAT_RDEV /**/ -- --/* ACME_MESS: -- * This symbol, if defined, indicates that error messages should be -- * should be generated in a format that allows the use of the Acme -- * GUI/editor's autofind feature. -- */ --#undef ACME_MESS /**/ -- --/* ALTERNATE_SHEBANG: -- * This symbol, if defined, contains a "magic" string which may be used -- * as the first line of a Perl program designed to be executed directly -- * by name, instead of the standard Unix #!. If ALTERNATE_SHEBANG -- * begins with a character other then #, then Perl will only treat -- * it as a command line if if finds the string "perl" in the first -- * word; otherwise it's treated as the first line of code in the script. -- * (IOW, Perl won't hand off to another interpreter via an alternate -- * shebang sequence that might be legal Perl code.) -- */ --/* #define ALTERNATE_SHEBANG "#!" / **/ -- --/* -- * fwrite1() should be a routine with the same calling sequence as fwrite(), -- * but which outputs all of the bytes requested as a single stream (unlike -- * fwrite() itself, which on some systems outputs several distinct records -- * if the number_of_items parameter is >1). -- */ --#define fwrite1 fwrite -- --#define Stat(fname,bufptr) win32_stat((fname),(bufptr)) --#define Fstat(fd,bufptr) fstat((fd),(bufptr)) --#define Fflush(fp) fflush(fp) -- --#define my_getenv(var) getenv(var) --/* -- * the following are standard library calls (stdio in particular) -- * that is being redirected to the perl DLL. This is needed for -- * Dynaloading any modules that called stdio functions -- */ -- --#include diff --cc win32/perlmain.c index 507b383,507b383..0000000 deleted file mode 100644,100644 --- a/win32/perlmain.c +++ /dev/null @@@ -1,10 -1,10 +1,0 @@@ --#include --#include -- --extern WIN32_IOSUBSYSTEM win32stdio; --extern int RunPerl(int argc, char **argv, char **env, void *iosubsystem); -- --main(int argc, char **argv, char **env) --{ -- return (RunPerl(argc, argv, env, &win32stdio)); --}