From: ceriel <none@none>
Date: Wed, 31 Jan 1990 15:50:30 +0000 (+0000)
Subject: some fixes
X-Git-Tag: release-5-5~1845
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=546d8f3d1629e5a3793dad1933c9b4f605e02eaf;p=ack.git

some fixes
---

diff --git a/lang/cem/libcc/stdio/doprnt.c b/lang/cem/libcc/stdio/doprnt.c
index 6b37dbff0..05b7b6a37 100644
--- a/lang/cem/libcc/stdio/doprnt.c
+++ b/lang/cem/libcc/stdio/doprnt.c
@@ -121,7 +121,7 @@ _doprnt(fmt,ap,stream)
 		switch (c = *fmt++) {
 		default:
 #ifdef  CPM
-			if (c == '\n') putc('r',stream);
+			if (c == '\n') putc('\r',stream);
 #endif
 			putc(c,stream);
 			continue;
@@ -165,11 +165,7 @@ _doprnt(fmt,ap,stream)
 				*s++ = '-';
 				l = -l;
 			}
-			goto do_l;
 		    l_unsignd:
-			if (l && ndigit)
-				*s++ = '0';
-		    do_l:
 			s = l_compute(l,j,s);
 			break;
 #endif
@@ -187,11 +183,7 @@ _doprnt(fmt,ap,stream)
 				*s++ = '-';
 				inte= -inte ;
 			}
-			goto do_i ;
 		    i_unsignd:
-			if (inte && ndigit)
-				*s++ = '0';
-		    do_i:
 			s = i_compute(inte,j,s);
 			break;
 		case 'c':