From 76393382c8db4d81ca397f91433ba3d252c84471 Mon Sep 17 00:00:00 2001
From: Dave Abrahams <dave@boostpro.com>
Date: Sat, 1 Feb 2003 01:04:21 +0000
Subject: [PATCH] Borland fixup

[SVN r17143]
---
 include/boost/mpl/integral_c.hpp | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/include/boost/mpl/integral_c.hpp b/include/boost/mpl/integral_c.hpp
index bd4088f..daa99e6 100644
--- a/include/boost/mpl/integral_c.hpp
+++ b/include/boost/mpl/integral_c.hpp
@@ -51,8 +51,12 @@ struct integral_c
     typedef integral_c<T, next_value> next;
     typedef integral_c<T, prior_value> prior;
 #elif BOOST_WORKAROUND(__BORLANDC__, BOOST_TESTED_AT(0x561)) \
-    || BOOST_WORKAROUND(__IBMCPP__, BOOST_TESTED_AT(502)) \
     || BOOST_WORKAROUND(__HP_aCC, BOOST_TESTED_AT(53800))
+    // Borland can't handle the casts, and HP doesn't need them
+    // because the 2nd template parameter is not T but long
+    typedef integral_c<T, N + 1> next;
+    typedef integral_c<T, N - 1> prior;
+#elif BOOST_WORKAROUND(__IBMCPP__, BOOST_TESTED_AT(502))
     typedef integral_c<T, static_cast<T>(N + 1)> next;
     typedef integral_c<T, static_cast<T>(N - 1)> prior;
 #else