123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869 |
- // Copyright (C) 2016-2018 T. Zachary Laine
- //
- // 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/yap/expression.hpp>
- #include <boost/test/minimal.hpp>
- #include <sstream>
- template <typename T>
- using term = boost::yap::terminal<boost::yap::expression, T>;
- namespace yap = boost::yap;
- int test_main(int, char * [])
- {
- {
- term<double> unity{1.0};
- {
- auto expr = (unity + (unity + (unity + (unity + (unity + (unity + (unity + unity)))))));
- double result = boost::yap::evaluate(expr);
- BOOST_CHECK(result == 8.0);
- }
- {
- auto expr =
- (unity + (unity + (unity + (unity + (unity + (unity + (unity + (unity +
- (unity + (unity + (unity + (unity + (unity + (unity + (unity + (unity +
- (unity + (unity + (unity + (unity + (unity + (unity + (unity + (unity +
- (unity + (unity + (unity + (unity + (unity + (unity + (unity + (unity +
- (unity + (unity + (unity + (unity + (unity + (unity + (unity + (unity +
- (unity + (unity + (unity + (unity + (unity + (unity + (unity + (unity +
- (unity + (unity + (unity + (unity + (unity + (unity + (unity + (unity +
- (unity + (unity + (unity + (unity + (unity + (unity + (unity + (unity))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))));
- double result = boost::yap::evaluate(expr);
- BOOST_CHECK(result == 64.0);
- }
- #if 0 // This makes the Travis VMs barf.
- {
- auto expr =
- (unity + (unity + (unity + (unity + (unity + (unity + (unity + (unity +
- (unity + (unity + (unity + (unity + (unity + (unity + (unity + (unity +
- (unity + (unity + (unity + (unity + (unity + (unity + (unity + (unity +
- (unity + (unity + (unity + (unity + (unity + (unity + (unity + (unity +
- (unity + (unity + (unity + (unity + (unity + (unity + (unity + (unity +
- (unity + (unity + (unity + (unity + (unity + (unity + (unity + (unity +
- (unity + (unity + (unity + (unity + (unity + (unity + (unity + (unity +
- (unity + (unity + (unity + (unity + (unity + (unity + (unity + (unity))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))));
- double result = boost::yap::evaluate(
- (expr + (expr + (expr + (expr + (expr + (expr + (expr + (expr +
- (expr + (expr + (expr + (expr + (expr + (expr + (expr + (expr +
- (expr + (expr + (expr + (expr + (expr + (expr + (expr + (expr +
- (expr + (expr + (expr + (expr + (expr + (expr + (expr + (expr))))))))))))))))))))))))))))))))
- );
- BOOST_CHECK(result == 64.0 * 32.0);
- }
- #endif
- }
- return 0;
- }
|