2
0
mirror of https://github.com/boostorg/hana.git synced 2026-02-18 02:02:09 +00:00
Files
hana/example/monad/tap.cpp
2014-07-24 10:15:06 -04:00

28 lines
685 B
C++

/*
@copyright Louis Dionne 2014
Distributed under the Boost Software License, Version 1.0.
(See accompanying file LICENSE.md or copy at http://boost.org/LICENSE_1_0.txt)
*/
#include <boost/hana/list/instance.hpp>
#include <cassert>
#include <sstream>
using namespace boost::hana;
int main() {
//! [main]
std::stringstream before, after;
auto xs = list(1, 2, 3)
| tap<List>([&](auto x) { before << x << ' '; })
| [](auto x) { return list(x, -x); }
| tap<List>([&](auto x) { after << x << ' '; });
assert(before.str() == "1 2 3 ");
assert(after.str() == "1 -1 2 -2 3 -3 ");
assert(xs == list(1, -1, 2, -2, 3, -3));
//! [main]
}