BC_SCALE_MAX
while (c < BC_SCALE_MAX && sfbeg(q) == 0)
if (c > BC_SCALE_MAX)
return ((long)BC_SCALE_MAX);