From 6e6ebd28d6969eff3d7676403b2bceea1064ef9a Mon Sep 17 00:00:00 2001
From: Jeremy Siek <jeremy.siek@gmail.com>
Date: Fri, 3 Nov 2000 18:38:41 +0000
Subject: [PATCH] fixed Const_BinaryPredicate_concept for borland

[SVN r8117]
---
 include/boost/pending/concept_checks.hpp | 10 +++++++---
 1 file changed, 7 insertions(+), 3 deletions(-)

diff --git a/include/boost/pending/concept_checks.hpp b/include/boost/pending/concept_checks.hpp
index 0d36c82..7b6a921 100644
--- a/include/boost/pending/concept_checks.hpp
+++ b/include/boost/pending/concept_checks.hpp
@@ -491,10 +491,14 @@ template <class T> void ignore_unused_variable_warning(const T&) { }
   template <class Func, class First, class Second>
   struct Const_BinaryPredicate_concept {
     void constraints() { 
-      REQUIRE3(Func, First, Second, BinaryPredicate);
-      require_boolean_expr(f(a, b)); // operator() must be a const member function
+      const_constraints(f);
     }
-    const Func f;
+    void const_constraints(const Func& fun) {
+      REQUIRE3(Func, First, Second, BinaryPredicate);
+      // operator() must be a const member function
+      require_boolean_expr(fun(a, b));
+    }
+    Func f;
     First a;
     Second b;
   };