From 06a0fa170884fe4cd9efc1a744531693a25c7d10 Mon Sep 17 00:00:00 2001
From: Marty Kraimer <mrkraimer@comcast.net>
Date: Fri, 17 May 2002 15:47:50 +0000
Subject: [PATCH] better code for isinf

---
 src/include/os/alpha/epicsMath.h | 2 +-
 src/include/os/vms/epicsMath.h   | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/include/os/alpha/epicsMath.h b/src/include/os/alpha/epicsMath.h
index 88c95b24f..58c72aa0c 100644
--- a/src/include/os/alpha/epicsMath.h
+++ b/src/include/os/alpha/epicsMath.h
@@ -2,6 +2,6 @@
 #define epicsMathh
 
 #include <math.h>
-#define isinf(D) 0
+#define isinf(D) (!finite((D)) && !(isnan((D))))
 
 #endif /* epicsMathh */
diff --git a/src/include/os/vms/epicsMath.h b/src/include/os/vms/epicsMath.h
index 88c95b24f..58c72aa0c 100644
--- a/src/include/os/vms/epicsMath.h
+++ b/src/include/os/vms/epicsMath.h
@@ -2,6 +2,6 @@
 #define epicsMathh
 
 #include <math.h>
-#define isinf(D) 0
+#define isinf(D) (!finite((D)) && !(isnan((D))))
 
 #endif /* epicsMathh */