fpi1
FPI *fpi, fpi1;
fpi1 = fpi0;
fpi = &fpi1;
fpi1.rounding = Rounding;
FPI fpi1 = fpi;
fpi1.rounding = Rounding;
switch((i = gethex(&s, &fpi1, &exp, &bb, sign)) & STRTOG_Retmask) {
FPI *fpi, fpi1;
fpi1 = fpi0;
fpi1.rounding = rounding;
fpi = &fpi1;
FPI *fpi, fpi1;
fpi1 = fpi0;
fpi1.rounding = rounding;
fpi = &fpi1;
FPI *fpi, fpi1;
fpi1 = fpi0;
fpi1.rounding = rounding;
fpi = &fpi1;