152 #define Sgl_copytoint_exponentmantissa(source,dest)     \  argument
153     dest = Sexponentmantissa(source)
160 #define Sgl_set_mantissa(dest,value) Deposit_smantissa(dest,value)  argument
161 #define Sgl_set_exponentmantissa(dest,value) \  argument
162     Deposit_sexponentmantissa(dest,value)
255 #define Sgl_makequietnan(dest)						\  argument
256     Sall(dest) = ((SGL_EMAX+SGL_BIAS)+1)<< (32-(1+SGL_EXP_LENGTH))	\
258 #define Sgl_makesignalingnan(dest)					\  argument
259     Sall(dest) = ((SGL_EMAX+SGL_BIAS)+1)<< (32-(1+SGL_EXP_LENGTH))	\
333 #define Sgl_copyfromptr(srcptr,dest) dest = *srcptr  argument
422 #define Sglext_copytoint_exponentmantissa(src,dest) \  argument
423 	Sgl_copytoint_exponentmantissa(src,dest)