develooper Front page | perl.perl5.porters | Postings from January 2001

[partial PATCH perl@8482] Re: 8482 busted for $^V sprintf()s onOS/390

Thread Previous | Thread Next
From:
Peter Prymmer
Date:
January 19, 2001 16:43
Subject:
[partial PATCH perl@8482] Re: 8482 busted for $^V sprintf()s onOS/390
Message ID:
Pine.OSF.4.10.10101191639540.61158-100000@aspara.forte.com

On Fri, 19 Jan 2001, Peter Prymmer wrote:

> In attempting to build a plain 8482 kit on OS/390 I note the new
> warning:
> 
> `sh  cflags libperl.a sv.o`  sv.c
>           CCCMD =  c89 -DPERL_CORE -c -DMAXSIG=38 -DOEMVS -D_OE_SOCKETS -D_XOPE
> WARNING CBC3068 ./sv.c:6914  Operation between types "char*" and "unsigned
> char.
> FSUM3065 The COMPILE step ended with return code 4.
> `sh  cflags libperl.a pp.o`  pp.c

OK my guess is that the following will work everywhere, although I have
not tried it everywhere.  It does not necessarily do anything at all about
the %v sprintf problem on OS/390 but at least its a step in the right
direction (its getting late today and it looks like my bigger patch
cannot wait any longer :-)

--- sv.c.orig	Fri Jan 19 15:11:52 2001
+++ sv.c	Fri Jan 19 15:33:05 2001
@@ -6815,7 +6815,7 @@
 	STRLEN have;
 	STRLEN need;
 	STRLEN gap;
-	char *dotstr = ".";
+	U8* dotstr = (U8*)".";
 	STRLEN dotstrlen = 1;
 	I32 efix = 0; /* explicit format parameter index */
 	I32 ewix = 0; /* explicit width index */
End of partial patch.

Don't be surprised if you see further tweaking to sv.c in the future.

Peter Prymmer



Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About