On Wed, 10 Aug 2005 11:51:38 +0200, "H.Merijn Brand" <[EMAIL PROTECTED]> wrote:
> > 1. Add new routine to translate VMS error status codes into UNIX errno > > values. > > > > 2. Fix routines that callers expect not to modify the input strings to > > actually not modify them. > > > > 3. Put the const qualifiers on all input pointers that are not modified > > so that the routines that are wrappers for standard c library routines > > follow the same calling conventions. > > Thanks, committed as a group change in #25280 > > But there is more work to be done. Fast! > > `sh cflags "optimize='-O2'" util.o` util.c > CCCMD = cc -DPERL_CORE -c -DDEBUGGING -fno-strict-aliasing -pipe > -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -O2 -Wall util.c:2127: error: > conflicting types for `Perl_my_popen' proto.h:1104: error: previous > declaration of `Perl_my_popen' embed.h:#define my_popen Perl_my_popen embed.h:#define my_popen_list Perl_my_popen_list embed.h:#define my_popen(a,b) Perl_my_popen(aTHX_ a,b) embed.h:#define my_popen_list(a,b,c) Perl_my_popen_list(aTHX_ a,b,c) makedef.pl: Perl_my_popen makedef.pl: Perl_my_popen makedef.pl: Perl_my_popen makedef.pl: Perl_my_popen proto.h:PERL_CALLCONV PerlIO* Perl_my_popen(pTHX_ const char* cmd, const char* mode); proto.h:PERL_CALLCONV PerlIO* Perl_my_popen_list(pTHX_ char* mode, int n, SV ** args); util.c:Perl_my_popen_list(pTHX_ char *mode, int n, SV **args) util.c:Perl_my_popen(pTHX_ char *cmd, char *mode) util.c:Perl_my_popen(pTHX_ char *cmd, char *mode) util.c:Perl_my_popen(pTHX_ char *cmd, char *mode) vms/vms.c:Perl_my_popen(pTHX_ const char *cmd, const char *mode) win32/win32.c:Perl_my_popen(pTHX_ char *cmd, char *mode) wince/wince.c:Perl_my_popen(pTHX_ char *cmd, char *mode) -- H.Merijn Brand Amsterdam Perl Mongers (http://amsterdam.pm.org/) using Perl 5.6.2, 5.8.0, 5.8.5, & 5.9.2 on HP-UX 10.20, 11.00 & 11.11, AIX 4.3 & 5.2, SuSE 9.2 & 9.3, and Cygwin. http://www.cmve.net/~merijn Smoking perl: http://www.test-smoke.org, perl QA: http://qa.perl.org reports to: [EMAIL PROTECTED], perl-qa@perl.org
