S387
((S387->swd & ~SW_Top & 0xffff) | ((S387->ftop << SW_Top_Shift) & SW_Top))
S387->ftop = (S387->swd >> SW_Top_Shift) & 7;
offset = (S387->ftop & 7) * 10;
tags = S387->twd;
newtop = S387->ftop;
FPU_tagof((FPU_REG *) ((u_char *) S387->st_space +
S387->twd = tags;
int offset = (S387->ftop & 7) * 10, other = 80 - offset;
S387->cwd &= ~0xe080;
S387->cwd |= 0xffff0040;
S387->swd = sstatus_word() | 0xffff0000;
S387->twd |= 0xffff0000;
S387->fcs &= ~0xf8000000;
S387->fos |= 0xffff0000;