SH-2A Datasheet, PDF (95/501 Pages) Renesas Technology Corp – Renesas 32-Bit RISC Microcomputer SuperH™ RISC engine Family

Section 6 Instruction Descriptions
dstf.f += srcf.f; /* Round to nearest */
if(FPSCR_RM == 1) {
dstd.l[1] &= 0xe0000000; /* Round to zero */
dstf.f = dstd.d;
}
check_single_exception(&FR[n],dstf.f);
} else {
if(type == FADD) srcd.d = DR[m>>1];
else
srcd.d = -DR[m>>1];
dstx.x = DR[n>>1];
/* Conversion from double-precision to extended double-precision */
dstx.x += srcd.d;
if(((dstx.x == DR[n>>1]) && (srcd.d != 0.0)) ||
((dstx.x == srcd.d) && (DR[n>>1] != 0.0)) ) {
set_I();
if(sign_of(m)^ sign_of(n)) {
dstx.l[3] -= 1;
if(dstx.l[3] == 0xffffffff) {dstx.l[2] -= 1;
if(dstx.l[2] == 0xffffffff) {dstx.l[1] -= 1;
if(dstx.l[1] == 0xffffffff) {dstx.l[0] -= 1;}}}
}
}
if((dstx.l[2] & 0x0fffffff) || dstx.l[3]) set_I();
dst.d += srcd.d; /* Round to nearest */
if(FPSCR_RM == 1) {
dstx.l[2] &= 0xf0000000; /* Round to zero */
dstx.l[3] = 0x00000000;
dst.d = dstx.x;
}
check_double_exception(&DR[n>>1] ,dst.d);
}
}
void normal_fmul(int m,n)
{
union {
Rev. 3.00 Jul 08, 2005 page 81 of 484
REJ09B0051-0300