SGL_P
if (exp > (1 - SGL_P)) { \
if (exp == (1 - SGL_P)) { \
((exponent < (SGL_P - 1)) ? \
(exponent < (SGL_P - 2) ? \
if ((src_exponent -= SGL_BIAS) >= SGL_P - 1) {
Sgl_rightshift(result,(SGL_P-1) - (src_exponent));
Sgl_leftshift(result,(SGL_P-1) - (src_exponent));
for (count=1;count<=SGL_P && Sgl_all(opnd1);count++) {
if (count <= SGL_P) {
Sgl_leftshift(opnd3,SGL_P-count);
for (count=1;count<SGL_P;count+=4) {
if (dest_exponent >= (1 - SGL_P)) {
newbit = 1 << SGL_P;
if (exponent >= (1 - SGL_P)) { \