expression_front_push_operation.cpp

Go to the documentation of this file.

 
#ifndef Om_Language_Operation_ExpressionFrontPushOperation_
 
    #include "om/language/operation/expression_front_push_operation.hpp"
 
    #ifdef Om_Macro_Test_
 
        #ifndef Om_Macro_Precompilation_
 
            #include "boost/test/unit_test.hpp"
 
        #endif
 
namespace Om {
 
    namespace Language {
 
        namespace Operation {
 
            BOOST_AUTO_TEST_SUITE(ExpressionFrontPushOperationTest)
 
                BOOST_AUTO_TEST_CASE(DefinitionTest) {
                    BOOST_CHECK_EQUAL(
                        "{->[expression]}",
                        System::Get().Evaluate("drop find {->[expression]} system")
                    );
                }
 
                BOOST_AUTO_TEST_CASE(GeneralTest) {
                    BOOST_CHECK_EQUAL(
                        (
                            "{"
                            "1{2}\n"
                            "3\n"
                            "4{5}\n"
                            "6"
                            "}"
                        ),
                        System::Get().Evaluate("->[expression] {1{2}3}{4{5}6}")
                    );
 
                    BOOST_CHECK_EQUAL(
                        (
                            "{"
                            "1{2}{5}\n"
                            "6"
                            "}"
                        ),
                        System::Get().Evaluate("->[expression] {1{2}}{{5}6}")
                    );
 
                    BOOST_CHECK_EQUAL(
                        (
                            "{"
                            "{5}\n"
                            "6"
                            "}"
                        ),
                        System::Get().Evaluate("->[expression] {}{{5}6}")
                    );
 
                    BOOST_CHECK_EQUAL(
                        (
                            "{"
                            "{5}\n"
                            "6"
                            "}"
                        ),
                        System::Get().Evaluate("->[expression] {{5}6}{}")
                    );
 
                    BOOST_CHECK_EQUAL(
                        (
                            "{"
                            "{2}\n"
                            "3"
                            "}"
                        ),
                        System::Get().Evaluate("->[expression] quote{2}{3}")
                    );
 
                    BOOST_CHECK_EQUAL(
                        "{2{3}}",
                        System::Get().Evaluate("->[expression]{2}quote{3}")
                    );
                }
 
            BOOST_AUTO_TEST_SUITE_END()
 
        }
 
    }
 
}
 
    #endif
 
#else
 
    #include "om/language/expression.hpp"
    #include "om/language/operation/front_push_operation.hpp"
 
// MARK: - Om::Language::Operation::ExpressionFrontPushOperation
 
    #define Type_ \
    Om::Language::Operation::ExpressionFrontPushOperation
 
// MARK: public (static)
 
inline char const * Type_::GetName() {
    return Om_Language_Operation_ExpressionFrontPushOperation_GetName_();
}
 
inline void Type_::Give(Evaluation & theEvaluation) {
    theEvaluation.TakeOperation(
        std::auto_ptr<IncompleteOperation>(
            new FrontPushOperation<
                Expression,
                ExpressionFrontPushOperation
            >
        )
    );
}
 
    #undef Type_
 
#endif