From owner-FreeBSD-users-jp@jp.freebsd.org  Tue Aug 27 13:05:58 1996
Received: by mail.jp.freebsd.org (8.7.3+2.6Wbeta5/8.7.3) id NAA19231
	Tue, 27 Aug 1996 13:05:58 +0900 (JST)
Received: by mail.jp.freebsd.org (8.7.3+2.6Wbeta5/8.7.3) with SMTP id NAA19226
	for <FreeBSD-users-jp@jp.freebsd.org>; Tue, 27 Aug 1996 13:05:51 +0900 (JST)
Received: by canongate.in.canon.co.jp (4.1/2.7W)
	id AA09390; Tue, 27 Aug 96 13:05:48 JST
Received: from cavax3(150.61.22.84) by canongate via smap (V1.3)
	id sma009370; Tue Aug 27 13:05:19 1996
Received: from genesis.ccc.canon.co.jp by cavax3.cis.canon.co.jp (4.1/3.4Wbeta3)
	id AA22605; Tue, 27 Aug 96 13:05:16 JST
Received: from ds5000gw.ccc.canon.co.jp ([150.61.170.33]) by genesis.ccc.canon.co.jp (8.6.9/3.3W9) with ESMTP id NAA18530 for <FreeBSD-users-jp@jp.freebsd.org>; Tue, 27 Aug 1996 13:05:18 +0900
Received: from sun05.ds5000gw.ccc.canon.co.jp by ds5000gw.ccc.canon.co.jp (8.6.9/6.4J.6-agu4)
	id NAA23584; Tue, 27 Aug 1996 13:05:16 +0900
Message-Id: <199608270405.NAA23584@ds5000gw.ccc.canon.co.jp>
To: FreeBSD-users-jp@jp.freebsd.org
From: Koichi Sato <koichi@ccc.canon.co.jp>
In-Reply-To: Your message of "Tue, 27 Aug 1996 11:36:11 +0900"
References: <199608270236.LAA02657@marble.eps.nagoya-u.ac.jp>
X-Mailer: Mew version 1.06 on Emacs 19.28.1, Mule 2.3
Mime-Version: 1.0
Content-Type: Text/Plain; charset=iso-2022-jp
Date: Tue, 27 Aug 1996 13:05:14 +0900
Reply-To: FreeBSD-users-jp@jp.freebsd.org
X-Distribute: distribute [version 2.1 (Alpha) patchlevel=19]
X-Sequence: FreeBSD-users-jp 3858
Subject: [FreeBSD-users-jp 3858] Re: problem of g77 write format 
Errors-To: owner-FreeBSD-users-jp@jp.freebsd.org
Sender: owner-FreeBSD-users-jp@jp.freebsd.org

$B:4F#!w%-%d%N%s$G$9!#(B

$B9bLZ(B>> $B$C$F$3$H$O!"(BFreeBSD 2.1.0R $B$G$O%@%a$G!"?7$7$$$b$N$K$7$J$$$H$$$1$J$$$N(B
$B9bLZ(B>> $B$+$J!)(B $BDj>o1?MQ$7$F$$$k$N$G!"$"$^$j(BOS$B$OJQ$($?$/$J$$$N$@$1$l$I$b!#!#!#!#(B

$B2CF#(B> $B$3$l$r8+$F$U$H;W$$=P$9!%(B
$B2CF#(B> 
$B2CF#(B> $B$b$H$N(B4.4BSD$B$N%i%$%V%i%j$O(BISO$B$K=`5r$7$F$$$J$/$F!$(Bprintf$B%0%k!<%W$G=PNO(B
$B2CF#(B> $B$9$k;~!$@:EY$r;XDj$9$k$HI=<(J8;z?t$H$7$F=hM}$5$l$F$7$^$$$^$9!%(Bcurrent
$B2CF#(B> $B$G$O$1$C$3$&A0$K=$@5$5$l$?$N$G$9$,!$$b$7$+$7$?$i(Bstable$B$K$OF~$i$J$+$C$?(B
$B2CF#(B> $B$N$+$b$7$l$^$;$s!%(B

$B;d$b$3$l$r;W$$=P$7$F!"$5$C$-2a5n$N%a!<%k$rC5$C$F$_$?$i!":rG/$N#1#17n$K(B
$B2CF#!wL>Bg4d9[$5$s$,%Q%C%A$r=P$5$l$F$^$9$M!#$3$l$G(B libc $B$r:n$jD>$;$P!"(B
$B$H$j$"$($:!"(B2.2 $B$K>e$2$J$/$F$bBP1~$G$-$k$N$G$O$J$$$G$7$g$&$+!#(B

$B2a5n$N8!:w$,BgJQ$J?M$N$?$a$K:FEY:\$;$5$;$F2<$5$$!#(B


---- $B$3$3$+$i$O(B $B2CF#!wL>Bg4d9[$5$s$N(B (FreeBSD-user 1249) $B$N0lIt$G$9(B ----

/usr/src/lib/libc/stdio/vfprintf.c$B$KBP$9$k%Q%C%A$G$9!#(B

---------- BEGIN ----------
*** vfprintf.c.old	Sat Nov  4 00:29:15 1995
--- vfprintf.c	Sat Nov  4 00:32:44 1995
***************
*** 695,706 ****
  		 * Compute actual size, so we know how much to pad.
  		 * fieldsz excludes decimal prec; realsz includes it.
  		 */
! 		fieldsz = size;
  		if (sign)
! 			fieldsz++;
  		else if (flags & HEXPREFIX)
! 			fieldsz += 2;
! 		realsz = dprec > fieldsz ? dprec : fieldsz;
  
  		/* right-adjusting blank padding */
  		if ((flags & (LADJUST|ZEROPAD)) == 0)
--- 695,705 ----
  		 * Compute actual size, so we know how much to pad.
  		 * fieldsz excludes decimal prec; realsz includes it.
  		 */
! 		realsz = dprec > size ? dprec : size;
  		if (sign)
! 		    realsz++;
  		else if (flags & HEXPREFIX)
! 			realsz += 2;
  
  		/* right-adjusting blank padding */
  		if ((flags & (LADJUST|ZEROPAD)) == 0)
***************
*** 720,726 ****
  			PAD(width - realsz, zeroes);
  
  		/* leading zeroes from decimal precision */
! 		PAD(dprec - fieldsz, zeroes);
  
  		/* the string or number proper */
  #ifdef FLOATING_POINT
--- 719,725 ----
  			PAD(width - realsz, zeroes);
  
  		/* leading zeroes from decimal precision */
! 		PAD(dprec - size, zeroes);
  
  		/* the string or number proper */
  #ifdef FLOATING_POINT
---------- END ----------
