From 3fa0224d3050e82683f62fe4d357aebc19f250f4 Mon Sep 17 00:00:00 2001
From: John Fletcher <J.P.Fletcher@aston.ac.uk>
Date: Sat, 24 Jan 2015 23:04:09 +0000
Subject: [PATCH] lambda_tests1b2 made into three tests p,q,r

---
 test/scope/lambda_tests1b2p.cpp | 74 +++++++++++++++++++++++++++++++++
 test/scope/lambda_tests1b2q.cpp | 74 +++++++++++++++++++++++++++++++++
 test/scope/lambda_tests1b2r.cpp | 74 +++++++++++++++++++++++++++++++++
 3 files changed, 222 insertions(+)
 create mode 100644 test/scope/lambda_tests1b2p.cpp
 create mode 100644 test/scope/lambda_tests1b2q.cpp
 create mode 100644 test/scope/lambda_tests1b2r.cpp

diff --git a/test/scope/lambda_tests1b2p.cpp b/test/scope/lambda_tests1b2p.cpp
new file mode 100644
index 0000000..8600bc2
--- /dev/null
+++ b/test/scope/lambda_tests1b2p.cpp
@@ -0,0 +1,74 @@
+/*=============================================================================
+    Copyright (c) 2001-2007 Joel de Guzman
+    Copyright (c) 2014      John Fletcher
+
+    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 <iostream>
+#include <cmath>
+#include <algorithm>
+#include <vector>
+
+#include <typeinfo>
+
+#include <boost/detail/lightweight_test.hpp>
+#include <boost/phoenix/core.hpp>
+#include <boost/phoenix/operator.hpp>
+#include <boost/phoenix/function.hpp>
+//#include <boost/phoenix/bind.hpp>
+#include <boost/phoenix/scope.hpp>
+
+struct zzz {};
+
+int
+main()
+{
+    using boost::phoenix::lambda;
+    using boost::phoenix::let;
+    using boost::phoenix::ref;
+    using boost::phoenix::val;
+    using boost::phoenix::arg_names::_1;
+    //using boost::phoenix::arg_names::_2;
+    using boost::phoenix::local_names::_a;
+    //using boost::phoenix::local_names::_b;
+    //    using boost::phoenix::placeholders::arg1;
+
+    /*
+    {
+        int x = 1;
+        long x2 = 2;
+        short x3 = 3;
+        char const* y = "hello";
+        zzz z;
+
+        BOOST_TEST(lambda[_1](x)(y) == y);
+        BOOST_TEST(lambda(_a = _1)[_a](x)(y) == x);
+        BOOST_TEST(lambda(_a = _1)[lambda[_a]](x)(y)(z) == x);
+        BOOST_TEST(lambda(_a = _1)[lambda[_a + _1]](x)(y)(x) == 2);
+        BOOST_TEST(lambda(_a = _1)[lambda(_b = _1)[_a + _b + _1]](x)(x2)(x3) == 6);
+    }
+    */
+    {
+        int x = 1, y = 10;
+        BOOST_TEST(
+            (_1 + _1 + lambda[_1 + 2])(x)(y) == 1+1+10+2
+        );
+    }
+    /*
+    {
+        int x = 1, y = 10;
+        BOOST_TEST(
+        (
+                _1 + 
+                lambda(_a = _1)
+                [
+                    _a + lambda[_a + 2]
+                ]
+            )
+            (x)(y)(y) == 1+1+1+2
+        );
+    }
+    */
+    return boost::report_errors();
+}
diff --git a/test/scope/lambda_tests1b2q.cpp b/test/scope/lambda_tests1b2q.cpp
new file mode 100644
index 0000000..f610a1f
--- /dev/null
+++ b/test/scope/lambda_tests1b2q.cpp
@@ -0,0 +1,74 @@
+/*=============================================================================
+    Copyright (c) 2001-2007 Joel de Guzman
+    Copyright (c) 2014      John Fletcher
+
+    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 <iostream>
+#include <cmath>
+#include <algorithm>
+#include <vector>
+
+#include <typeinfo>
+
+#include <boost/detail/lightweight_test.hpp>
+#include <boost/phoenix/core.hpp>
+#include <boost/phoenix/operator.hpp>
+#include <boost/phoenix/function.hpp>
+//#include <boost/phoenix/bind.hpp>
+#include <boost/phoenix/scope.hpp>
+
+struct zzz {};
+
+int
+main()
+{
+    using boost::phoenix::lambda;
+    using boost::phoenix::let;
+    using boost::phoenix::ref;
+    using boost::phoenix::val;
+    using boost::phoenix::arg_names::_1;
+    //using boost::phoenix::arg_names::_2;
+    using boost::phoenix::local_names::_a;
+    //using boost::phoenix::local_names::_b;
+    //    using boost::phoenix::placeholders::arg1;
+
+    /*
+    {
+        int x = 1;
+        long x2 = 2;
+        short x3 = 3;
+        char const* y = "hello";
+        zzz z;
+
+        BOOST_TEST(lambda[_1](x)(y) == y);
+        BOOST_TEST(lambda(_a = _1)[_a](x)(y) == x);
+        BOOST_TEST(lambda(_a = _1)[lambda[_a]](x)(y)(z) == x);
+        BOOST_TEST(lambda(_a = _1)[lambda[_a + _1]](x)(y)(x) == 2);
+        BOOST_TEST(lambda(_a = _1)[lambda(_b = _1)[_a + _b + _1]](x)(x2)(x3) == 6);
+    }
+    */
+    {
+        int x = 1, y = 10;
+        BOOST_TEST(
+            (_1 + lambda(_a = _1)[_a + _1 + 2])(x)(y) == 1+1+10+2
+        );
+    }
+    /*
+    {
+        int x = 1, y = 10;
+        BOOST_TEST(
+        (
+                _1 + 
+                lambda(_a = _1)
+                [
+                    _a + lambda[_a + 2]
+                ]
+            )
+            (x)(y)(y) == 1+1+1+2
+        );
+    }
+    */
+    return boost::report_errors();
+}
diff --git a/test/scope/lambda_tests1b2r.cpp b/test/scope/lambda_tests1b2r.cpp
new file mode 100644
index 0000000..eef874a
--- /dev/null
+++ b/test/scope/lambda_tests1b2r.cpp
@@ -0,0 +1,74 @@
+/*=============================================================================
+    Copyright (c) 2001-2007 Joel de Guzman
+    Copyright (c) 2014      John Fletcher
+
+    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 <iostream>
+#include <cmath>
+#include <algorithm>
+#include <vector>
+
+#include <typeinfo>
+
+#include <boost/detail/lightweight_test.hpp>
+#include <boost/phoenix/core.hpp>
+#include <boost/phoenix/operator.hpp>
+#include <boost/phoenix/function.hpp>
+//#include <boost/phoenix/bind.hpp>
+#include <boost/phoenix/scope.hpp>
+
+struct zzz {};
+
+int
+main()
+{
+    using boost::phoenix::lambda;
+    using boost::phoenix::let;
+    using boost::phoenix::ref;
+    using boost::phoenix::val;
+    using boost::phoenix::arg_names::_1;
+    //using boost::phoenix::arg_names::_2;
+    using boost::phoenix::local_names::_a;
+    //using boost::phoenix::local_names::_b;
+    //    using boost::phoenix::placeholders::arg1;
+
+    /*
+    {
+        int x = 1;
+        long x2 = 2;
+        short x3 = 3;
+        char const* y = "hello";
+        zzz z;
+
+        BOOST_TEST(lambda[_1](x)(y) == y);
+        BOOST_TEST(lambda(_a = _1)[_a](x)(y) == x);
+        BOOST_TEST(lambda(_a = _1)[lambda[_a]](x)(y)(z) == x);
+        BOOST_TEST(lambda(_a = _1)[lambda[_a + _1]](x)(y)(x) == 2);
+        BOOST_TEST(lambda(_a = _1)[lambda(_b = _1)[_a + _b + _1]](x)(x2)(x3) == 6);
+    }
+    */
+    /*{
+        int x = 1, y = 10;
+        BOOST_TEST(
+            (_1 + lambda(_a = _1)[_a + _1 + 2])(x)(y) == 1+1+10+2
+        );
+    }
+    */
+    {
+        int x = 1, y = 10;
+        BOOST_TEST(
+        (
+                _1 + 
+                lambda(_a = _1)
+                [
+                    _a + lambda[_a + 2]
+                ]
+            )
+            (x)(y)(y) == 1+1+1+2
+        );
+    }
+
+    return boost::report_errors();
+}