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.0t8.2

Browse Source
This commit is contained in:
Landon Curt Noll
1999-10-21 00:25:24 -07:00
parent 5cc680fe42
commit a7d401cd65
22 changed files with 122 additions and 132 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
poly.c
View File

@@ -31,20 +31,17 @@ evp(LISTELEM *cp, LISTELEM *x, VALUE *vres)
freevalue(&tmp1);
freevalue(vres);
*vres = tmp2;
}
else {
} else {
s = TRUE;
*vres = tmp1;
}
}
}
else {
} else {
if (s) {
addvalue(&v, vres, &tmp1);
freevalue(vres);
*vres = tmp1;
}
else {
} else {
s = TRUE;
copyvalue(&v, vres);
}
@@ -126,9 +123,9 @@ addlistinv(LIST *lp, VALUE *vres)
VALUE tmp1, tmp2;
for (ep = lp->l_first; ep; ep = ep->e_next) {
if (ep->e_value.v_type == V_LIST)
if (ep->e_value.v_type == V_LIST) {
addlistinv(ep->e_value.v_list, vres);
else {
} else {
invertvalue(&ep->e_value, &tmp1);
addvalue(vres, &tmp1, &tmp2);
freevalue(&tmp1);