/*
 * Copyright Louis Dionne 2014
 * Distributed under the Boost Software License, Version 1.0.
 *         (See accompanying file LICENSE.md or copy at
 *             http://www.boost.org/LICENSE_1_0.txt)
 */

#include <boost/hana/range.hpp>

#include <boost/hana/detail/static_assert.hpp>
#include <boost/hana/integral.hpp>
#include <boost/hana/list.hpp>
using namespace boost::hana;


void test_Iterable() {
    BOOST_HANA_STATIC_ASSERT(is_empty(range(int_<0>, int_<0>)));
    BOOST_HANA_STATIC_ASSERT(!is_empty(range(int_<0>, int_<1>)));
    BOOST_HANA_STATIC_ASSERT(!is_empty(range(int_<0>, int_<2>)));

    BOOST_HANA_STATIC_ASSERT(head(range(int_<0>, int_<1>)) == int_<0>);
    BOOST_HANA_STATIC_ASSERT(head(range(int_<0>, int_<2>)) == int_<0>);

    BOOST_HANA_STATIC_ASSERT(tail(range(int_<0>, int_<1>)) == range(int_<1>, int_<1>));
    BOOST_HANA_STATIC_ASSERT(tail(range(int_<0>, int_<2>)) == range(int_<1>, int_<2>));
    BOOST_HANA_STATIC_ASSERT(tail(range(int_<0>, int_<3>)) == range(int_<1>, int_<3>));
}

void test_comparison() {
    BOOST_HANA_STATIC_ASSERT(range(int_<0>, int_<0>) == range(int_<0>, int_<0>));
    BOOST_HANA_STATIC_ASSERT(range(int_<0>, int_<0>) != range(int_<0>, int_<1>));
    BOOST_HANA_STATIC_ASSERT(range(int_<0>, int_<1>) != range(int_<0>, int_<0>));
    BOOST_HANA_STATIC_ASSERT(range(int_<0>, int_<1>) == range(int_<0>, int_<1>));
    BOOST_HANA_STATIC_ASSERT(range(int_<0>, int_<2>) != range(int_<0>, int_<1>));
    BOOST_HANA_STATIC_ASSERT(range(int_<0>, int_<2>) == range(int_<0>, int_<2>));
    BOOST_HANA_STATIC_ASSERT(range(int_<0>, int_<0>) == range(int_<2>, int_<2>));
}

constexpr struct {
    template <typename I>
    constexpr auto operator()(I i) const { return i + int_<1>; }
} f{};
void test_Functor() {
    BOOST_HANA_STATIC_ASSERT(fmap(f, range(int_<0>, int_<0>)) == list());
    BOOST_HANA_STATIC_ASSERT(fmap(f, range(int_<0>, int_<1>)) == list(f(int_<0>)));
    BOOST_HANA_STATIC_ASSERT(fmap(f, range(int_<0>, int_<2>)) == list(f(int_<0>), f(int_<1>)));
    BOOST_HANA_STATIC_ASSERT(fmap(f, range(int_<0>, int_<3>)) == list(f(int_<0>), f(int_<1>), f(int_<2>)));
}

int main() {
    test_Iterable();
    test_comparison();
    test_Functor();
}