20 #define QH r5  macro
130 		QH = #-DF_BIAS+1  define
135 		NO_OVF_UNF = cmp.gt(EXPA,QH)
333 		QH = extractu(TMP,#2,#SR_ROUND_OFF)  define
338 		QH ^= lsr(AH,#31)
339 		QL = QH
343 		p0 = !cmp.eq(QH,#2)		// and not rounding the other way
411 		QH = add(clb(A),#-DF_EXPBITS)  define
420 		A = asl(A,QH)
422 		if (!P_TMP) EXPA = sub(TMP,QH)
475 		QH = convert_df2sf(A)	// get possible invalid exceptions  define