rainlance/amiga-tz
1
0
Fork 0
mirror of https://frontier.innolan.net/rainlance/amiga-tz.git synced 2026-09-20 13:56:29 +00:00
Code Releases Activity

SCCS-file: strftime.c

Browse Source 
SCCS-SID: 7.73
This commit is contained in:
Arthur David Olson
2012-07-18 03:02:44 -04:00
committed by Paul Eggert
parent 40bf459d45
commit f1c19fd915
1 changed files with 6 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files
strftime.c
+6 -9
View File
@@ -618,24 +618,21 @@ const char * const ptlim;
register int trail;
#define DIVISOR 100
lead = a / DIVISOR + b / DIVISOR;
trail = a % DIVISOR + b % DIVISOR;
if (trail > DIVISOR) {
trail -= DIVISOR;
++lead;
}
while (trail < 0) {
lead = a / DIVISOR + b / DIVISOR + trail / DIVISOR;
trail %= DIVISOR;
if (trail < 0 && lead > 0) {
trail += DIVISOR;
--lead;
}
if (lead < 0 && trail != 0) {
} else if (lead < 0 && trail > 0) {
trail -= DIVISOR;
++lead;
}
if (convert_top)
if (convert_top) {
if (lead == 0 && trail < 0)
pt = _add("-0", pt, ptlim);
else pt = _conv(lead, "%02d", pt, ptlim);
}
if (convert_yy)
pt = _conv(((trail < 0) ? -trail : trail), "%02d", pt, ptlim);
}