drygdryg/calc
1
0
Fork 0
mirror of https://github.com/lcn2/calc.git synced 2025-08-16 01:03:29 +03:00
Code Issues Packages Projects Releases Wiki Activity

Release calc version 2.11.0t10.1

Browse Source
This commit is contained in:
Landon Curt Noll
1999-11-11 14:17:58 -08:00
parent 96c34adee3
commit c7c0de97f2
4 changed files with 12 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
zmath.c
View File

@@ -735,9 +735,9 @@ done: while (m > 0 && A[m - 1] == 0)
if (s) {
while (--i > 0) {
g = (FULL) *--a + (*--b >> 1 | f);
f = *b & 1 ? TOPHALF : 0;
if (g != BASE1)
break;
f = *b & 1 ? TOPHALF : 0;
}
if (g == BASE && f == 0) {
while ((--i > 0) && ((*--a | *--b) == 0));
@@ -748,9 +748,9 @@ done: while (m > 0 && A[m - 1] == 0)
} else {
while (--i > 0) {
g = (FULL) *--a - (*--b >> 1 | f);
f = *b & 1 ? TOPHALF : 0;
if (g != 0)
break;
f = *b & 1 ? TOPHALF : 0;
}
if (g > 0 && g < BASE)
t = 1;