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

Section 6 Instruction Descriptions
case(ftrc_double_type_of(m)){
NORM:
*FPUL = DR[m>>1]; break;
PINF:
ftrc_invalid(0); break;
NINF:
ftrc_invalid(1); break;
}
}
}
int ftrc_signle_type_of(int m)
{
if(sign_of(m) == 0){
if(FR_HEX[m] > 0x7f800000) return(NINF); /* NaN */
else if(FR_HEX[m] > P_INT_SINGLE_RANGE)
return(PINF); /* out of range,+INF */
else
return(NORM); /* +0,+NORM
*/
} else {
if((FR_HEX[m] & 0x7fffffff) > N_INT_SINGLE_RANGE)
return(NINF); /* out of range ,+INF,NaN*/
else
return(NORM); /* -0,-NORM
*/
}
}
int ftrc_double_type_of(int m)
{
if(sign_of(m) == 0){
if((FR_HEX[m] > 0x7ff00000) ||
((FR_HEX[m] == 0x7ff00000) &&
(FR_HEX[m+1] != 0x00000000))) return(NINF);
/* NaN */
else if(DR_HEX[m>>1] >= P_INT_DOUBLE_RANGE)
return(PINF); /* out of range,+INF */
else
return(NORM); /* +0,+NORM
*/
} else {
if((DR_HEX[m>>1] & 0x7fffffffffffffff) >= N_INT_DOUBLE_RANGE)
return(NINF); /* out of range ,+INF,NaN*/
else
return(NORM); /* -0,-NORM
*/
}
}
Rev. 3.00 Jul 08, 2005 page 319 of 484
REJ09B0051-0300