From 8cc95fdbe3687330bd987cea170494b4cd263d90 Mon Sep 17 00:00:00 2001 From: Perl 5 Porters Date: Mon, 7 Apr 1997 00:00:00 +0000 Subject: [inseparable changes from match from perl-5.003_97b to perl-5.003_97c] BUILD PROCESS Subject: Fix syntax error in Configure comment(!) From: Chip Salzenberg Files: Configure Subject: For Solaris, if -DDEBUGGING, default to '-KPIC', not '-Kpic' From: Chip Salzenberg Files: Configure Subject: Fix usage of dXSUB_SYS, esp. in ExtUtils::Miniperl From: Chip Salzenberg Files: dosish.h minimod.pl os2/os2ish.h plan9/plan9ish.h vms/vmsish.h CORE LANGUAGE CHANGES Subject: Refine setgroups() behavior of C<$)> From: Chip Salzenberg Files: mg.c pod/perldelta.pod pod/perlvar.pod Subject: Forbid -[Mm] on #! line From: Chip Salzenberg Files: pod/perldelta.pod pod/perldiag.pod toke.c CORE PORTABILITY Subject: Special mkdir() for VMS Date: Tue, 08 Apr 1997 12:33:56 -0400 (EDT) From: Charles Bailey Files: dosish.h lib/ExtUtils/MM_Unix.pm lib/File/Path.pm os2/os2ish.h plan9/plan9ish.h pp_sys.c unixish.h vms/vms.c vms/vmsish.h Msg-ID: 01IHGOXN6MZM0004K3@hmivax.humgen.upenn.edu (applied based on p5p patch as commit ebec1d4b2ca9c08d24035a369c7aa782aa058e66) DOCUMENTATION Subject: IO::Socket doc fix Date: Tue, 08 Apr 1997 15:30:43 -0400 From: Roderick Schertler Files: ext/IO/lib/IO/Socket.pm Msg-ID: 28383.860527843@eeyore.ibcinc.com (applied based on p5p patch as commit 4a51304ce091cb6d1ccc9f25e11753bd7d985b32) LIBRARY AND EXTENSIONS Subject: Replace Class::Template with improved Class::Struct From: Jim Miner Files: MANIFEST lib/Class/Struct.pm lib/Class/Template.pm lib/File/stat.pm lib/Net/hostent.pm lib/Net/netent.pm lib/Net/protoent.pm lib/Net/servent.pm lib/Time/gmtime.pm lib/Time/localtime.pm lib/Time/tm.pm lib/User/grent.pm lib/User/pwent.pm pod/perldelta.pod pod/perlfaq7.pod pod/perlmod.pod pod/perltoot.pod Subject: MakeMaker pathname patch Date: Wed, 9 Apr 1997 20:08:23 +0100 From: Nick Ing-Simmons Files: lib/ExtUtils/MM_Unix.pm lib/ExtUtils/MakeMaker.pm Msg-ID: 199704091908.UAA00877@ni-s.u-net.com (applied based on p5p patch as commit 9cbbd68ff8edc7de96e3471de49538d0b2b98173) Subject: Fix configuration of new socket From: Chip Salzenberg Files: ext/IO/lib/IO/Socket.pm --- vms/vmsish.h | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) (limited to 'vms/vmsish.h') diff --git a/vms/vmsish.h b/vms/vmsish.h index fd4434efb2..9917232234 100644 --- a/vms/vmsish.h +++ b/vms/vmsish.h @@ -88,6 +88,7 @@ # define my_gconvert Perl_my_gconvert # define do_rmdir Perl_do_rmdir # define kill_file Perl_kill_file +# define my_mkdir Perl_my_mkdir # define my_utime Perl_my_utime # define rmsexpand Perl_rmsexpand # define rmsexpand_ts Perl_rmsexpand_ts @@ -226,7 +227,7 @@ #define BIT_BUCKET "_NLA0:" #define PERL_SYS_INIT(c,v) getredirection((c),(v)) #define PERL_SYS_TERM() -#define dXSUB_SYS int dummy +#define dXSUB_SYS #define HAS_KILL #define HAS_WAIT @@ -349,6 +350,9 @@ struct utimbuf { /* Ditto for sys$hash_passwrod() . . . */ #define crypt my_crypt +/* Tweak arg to mkdir first, so we can tolerate trailing /. */ +#define Mkdir(dir,mode) my_mkdir((dir),(mode)) + /* Use our own stat() clones, which handle Unix-style directory names */ #define Stat(name,bufptr) flex_stat(name,bufptr) #define Fstat(fd,bufptr) flex_fstat(fd,bufptr) @@ -506,6 +510,7 @@ Pid_t my_waitpid _((Pid_t, int *, int)); char * my_gconvert _((double, int, int, char *)); int do_rmdir _((char *)); int kill_file _((char *)); +int my_mkdir _((char *, mode_t)); int my_utime _((char *, struct utimbuf *)); char * rmsexpand _((char *, char *, char *, unsigned)); char * rmsexpand_ts _((char *, char *, char *, unsigned)); -- cgit v1.2.1