From ed140128eb692ebeaa21f2775f8d3c34e9a94094 Mon Sep 17 00:00:00 2001
From: Andy Dougherty <doughera@lafayette.edu>
Date: Fri, 9 Feb 2007 06:40:51 -0500
Subject: signbit detection (was [perl #39875] -0.0 loses signedness upon
 numeric comparison) Message-ID:
 <Pine.LNX.4.62.0702091121400.10202@fractal.phys.lafayette.edu>

p4raw-id: //depot/perl@30192
---
 proto.h | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'proto.h')

diff --git a/proto.h b/proto.h
index 8199ec2a7c..a9d6c93c9e 100644
--- a/proto.h
+++ b/proto.h
@@ -4593,6 +4593,11 @@ STATIC void	S_curmad(pTHX_ char slot, SV *sv);
 PERL_CALLCONV int	Perl_madlex(pTHX);
 PERL_CALLCONV int	Perl_madparse(pTHX);
 #endif
+#if !defined(HAS_SIGNBIT)
+PERL_CALLCONV int	Perl_signbit(NV f)
+			__attribute__pure__;
+
+#endif
 
 END_EXTERN_C
 /*
-- 
cgit v1.2.1