Instigate Open Source Documentation

---

src/stl/_is_sorted.hpp

Go to the documentation of this file.

#ifndef _INSTIGATE_STL_INTERNAL_HEADER_IN_ALGORITHM
#error This is an internal header file used to implement Instigate STL.\
        It should never be included directly by a program.
#endif

#ifndef INSTIGATE_STL_IS_SORTED_HPP
#define INSTIGATE_STL_IS_SORTED_HPP

// headers from this project
#include "concept.hpp"
#include "_basis.hpp"


// headers from other project

// headers from standard library

// forward declaration
namespace instigate {
        namespace stl {
                template <typename F>
                bool is_sorted(F b, F e);
                template <typename F, typename BP>
                bool is_sorted(F b, F e, BP p);
        }
}

template <typename F>
bool instigate::stl::is_sorted(F b, F e)
{
        namespace FI = instigate::stl::forward_iterator;
        namespace RI = instigate::stl::readable_iterator;
        namespace LT = instigate::generic::less_than_comparable;
        CHECK(FI::requirements<F>);
        CHECK(RI::requirements<F>);
        typedef typename RI::interface<F>::value_type value_type;
        CHECK(LT::requirements<value_type>);
        if (equal(b, e)) {
                return true;
        }
        char c[sizeof(F)];
        F* n = 0;
        assign(n, copy_constructor(c, b));
        assert(0 != n);
        increment(*n);
        for (; !equal(*n, e); assign(b, *n), increment(*n)) {
                if (less_than(const_dereference(*n), const_dereference(b))) {
                        return false;
                }
        }
        return true;
}

template <typename F, typename BP>
bool instigate::stl::is_sorted(F b, F e, BP p)
{
        namespace FI = instigate::stl::forward_iterator;
        namespace RI = instigate::stl::readable_iterator;
        namespace BPI = instigate::stl::binary_predicate;
        CHECK(FI::requirements<F>);
        CHECK(RI::requirements<F>);
        CHECK(BPI::requirements<BP>);
        typedef typename RI::interface<F>::value_type value_type;
        typedef typename BPI::interface<BP>::first_argument_type 
                                                        first_argument_type;
        typedef typename BPI::interface<BP>::second_argument_type 
                                                        second_argument_type;
        CHECK_CONVERTIBILITY(value_type, first_argument_type);
        CHECK_CONVERTIBILITY(value_type, second_argument_type);
        if (equal(b, e)) {
                return true;
        }
        char c[sizeof(F)];
        F* n = 0;
        assign(n, copy_constructor(c, b));
        assert(0 != n);
        increment(*n);
        for (; !equal(*n, e); assign(b, *n), increment(*n)) {
                if (invoke_predicate(p, const_dereference(*n),
                                        const_dereference(b))) 
                {
                        return false;
                }
        }
        return true;
}

// vim:et:tabstop=8:shiftwidth=8:cindent:fo=croq:textwidth=80:

#endif // INSTIGATE_STL_IS_SORTED_HPP

---

© Instigate CJSC, Open Source