# define aTHXo aTHX
# define aTHXo_ aTHX_
# define dTHXo dTHX
+# define dTHXoa(x) dTHXa(x)
#endif
#ifndef pTHXx
# include <sunmath.h>
# endif
# define NV_DIG LDBL_DIG
+# ifdef LDBL_MANT_DIG
+# define NV_MANT_DIG LDBL_MANT_DIG
+# endif
# ifdef HAS_SQRTL
# define Perl_cos cosl
# define Perl_sin sinl
# define Perl_modf(x,y) ((long double)modf((double)(x),(double*)(y)))
# endif
# ifdef HAS_FREXPL
-# define Perl_frexp(x) frexpl(x)
+# define Perl_frexp(x,y) frexpl(x,y)
# else
-# define Perl_frexp(x) ((long double)frexp((double)(x)))
+# define Perl_frexp(x,y) ((long double)frexp((double)(x),y))
# endif
# ifdef HAS_ISNANL
# define Perl_isnan(x) isnanl(x)
# endif
#else
# define NV_DIG DBL_DIG
+# ifdef DBL_MANT_DIG
+# define NV_MANT_DIG DBL_MANT_DIG
+# endif
# define Perl_cos cos
# define Perl_sin sin
# define Perl_sqrt sqrt
# define Perl_floor floor
# define Perl_fmod fmod
# define Perl_modf(x,y) modf(x,y)
-# define Perl_frexp(x) frexp(x)
+# define Perl_frexp(x,y) frexp(x,y)
# ifdef HAS_ISNAN
# define Perl_isnan(x) isnan(x)
# else