sbackc
c = sbackc(p);
c = c * 100 + (sfbeg(p) ? 0 : sbackc(p));
sbackc(r);
nn = sfbeg(t) ? 0 : sbackc(t);
c = sbackc(e);
if (sbackc(p) < 0) {
if (sbackc(q) < 0) {
sbackc(p);
ct = sbackc(p);
ct = sbackc(p);
sc = sbackc(hptr); /* read scale off end of blk */
if (sbackc(p) < 0) {
OUTC(sbackc(strptr));
c = sbackc(p);
c = sbackc(p);
c = sbackc(p);
printf("%d", sbackc(p) / 10);
if (sbackc(p) < 0) {
sputc(strptr, sbackc(t));
while (sfbeg(p) == 0 && (c = sbackc(p)) == 0);
if (sfbeg(p) == 0 && sbackc(p) == -1) {
while ((c = sbackc(p)) == 99) {
cc = sbackc(p);
if ((c = sbackc(p)) < 0) {
if (sfbeg(arg1) == 0 && sbackc(arg1) < 0) {
sbackc(p);
if ((c = sbackc(p)) < 0) {
if ((c = sbackc(p)) == 0)
c = sbackc(q);
l = c = sbackc(q);
l = c = sbackc(q);
l = l * 100 + sbackc(q);
if ((c = sbackc(t)) > 9)
if ((sfbeg(q) == 0) && ((c = sbackc(q)) < 0))
c = (c * (scalev *= 100)) + sbackc(q);
n = sbackc(p);
if ((sfbeg(q) == 0) && ((c = sbackc(q)) < 0))
c = (c * (scalev *= 100)) + sbackc(q);
if ((sfbeg(q) == 0) && ((c = sbackc(q)) < 0))
c = (c * (scalev *= 100)) + sbackc(q);
if (sbackc(divr) == -1) {
if (sfbeg(divd) == 0 && sbackc(divd) == -1) {
c = sbackc(divr);
c = c * 100 + (sfbeg(divr)?0:sbackc(divr));
c = (c * 100 +(sfbeg(divr)?0:sbackc(divr)))*2;
td = sbackc(divd) * 100;
dd = sfbeg(divd)?0:sbackc(divd);
dd = sfbeg(divd)?0:sbackc(divd);
sbackc(p);
sbackc(p);
d = sbackc(divd);
d = sbackc(divd) + 100;
if (length(ps) > 0 && sbackc(ps) < 0) {
if (sbackc(p) == 0)
if (sbackc(divd) == 0)
if (sfbeg(dr) == 1 || (sfbeg(dr) == 0 && sbackc(dr) == 0)) {
if (sfbeg(dd) == 1 || (sfbeg(dd) == 0 && sbackc(dd) == 0)) {
neg = sbackc(p);