adjust the IEEEFP check for older versions of perl

[imager.git] / TIFF / TIFF.xs

diff --git a/TIFF/TIFF.xs b/TIFF/TIFF.xs
index c57486cef16a1a11676241cd4e83d1626869a7ba..43be5af88c87a14c436f7efc5aa5da3215bdeadc 100644 (file)
--- a/TIFF/TIFF.xs
+++ b/TIFF/TIFF.xs
@@ -11,6 +11,12 @@ extern "C" {
 
 DEFINE_IMAGER_CALLBACKS;
 
+#ifdef IEEEFP_TYPES
+#define i_tiff_ieeefp() &PL_sv_yes
+#else
+#define i_tiff_ieeefp() &PL_sv_no
+#endif
+
 MODULE = Imager::File::TIFF  PACKAGE = Imager::File::TIFF
 
 Imager::ImgRaw
@@ -140,6 +146,8 @@ bool
 i_tiff_has_compression(name)
        const char *name
 
+SV *
+i_tiff_ieeefp()
 
 BOOT:
        PERL_INITIALIZE_IMAGER_CALLBACKS;