rem: if (bkm_scale (x, base)) return 1;  return 0;
add: err |= bkm_scale (x, base); return err;
context: bkm_scale_by_power (__strtol_t *x, int base, int power){  while (power--)    if (bkm_scale (x, base))      return 1;  return 0;}