From 1a78a62555be32868418fe52f8e330c9d0f95d5a Mon Sep 17 00:00:00 2001
From: Anas Nashif <anas.nashif@intel.com>
Date: Tue, 30 Oct 2012 12:57:26 -0700
Subject: Imported Upstream version 1.49.0

---
 libs/bind/bind_as_compose.cpp | 76 +++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 76 insertions(+)
 create mode 100644 libs/bind/bind_as_compose.cpp

(limited to 'libs/bind/bind_as_compose.cpp')

diff --git a/libs/bind/bind_as_compose.cpp b/libs/bind/bind_as_compose.cpp
new file mode 100644
index 0000000000..999856cf28
--- /dev/null
+++ b/libs/bind/bind_as_compose.cpp
@@ -0,0 +1,76 @@
+#include <boost/config.hpp>
+
+#if defined(BOOST_MSVC)
+#pragma warning(disable: 4786)  // identifier truncated in debug info
+#pragma warning(disable: 4710)  // function not inlined
+#pragma warning(disable: 4711)  // function selected for automatic inline expansion
+#pragma warning(disable: 4514)  // unreferenced inline removed
+#endif
+
+//
+//  bind_as_compose.cpp - function composition using bind.hpp
+//
+//  Version 1.00.0001 (2001-08-30)
+//
+//  Copyright (c) 2001 Peter Dimov and Multi Media Ltd.
+//
+// Distributed under the Boost Software License, Version 1.0. (See
+// accompanying file LICENSE_1_0.txt or copy at
+// http://www.boost.org/LICENSE_1_0.txt)
+//
+
+#include <boost/bind.hpp>
+#include <iostream>
+#include <string>
+
+std::string f(std::string const & x)
+{
+    return "f(" + x + ")";
+}
+
+std::string g(std::string const & x)
+{
+    return "g(" + x + ")";
+}
+
+std::string h(std::string const & x, std::string const & y)
+{
+    return "h(" + x + ", " + y + ")";
+}
+
+std::string k()
+{
+    return "k()";
+}
+
+template<class F> void test(F f)
+{
+    std::cout << f("x", "y") << '\n';
+}
+
+int main()
+{
+    using namespace boost;
+
+    // compose_f_gx
+
+    test( bind(f, bind(g, _1)) );
+
+    // compose_f_hxy
+
+    test( bind(f, bind(h, _1, _2)) );
+
+    // compose_h_fx_gx
+
+    test( bind(h, bind(f, _1), bind(g, _1)) );
+
+    // compose_h_fx_gy
+
+    test( bind(h, bind(f, _1), bind(g, _2)) );
+
+    // compose_f_k
+
+    test( bind(f, bind(k)) );
+
+    return 0;
+}
-- 
cgit v1.2.3