Goose  Artifact [d6ce105dc3]

Artifact d6ce105dc30e02cd2b1627492db3d86780c581c960b7feb45660fd24f12912dd:

• File bs/parse/rule-helpers.cpp — part of check-in [aee388d9c0] at 2019-08-09 19:54:22 on branch trunk — Cleanup: got rid of the half-assed location and poisoning systems in ir::Terms. (user: achavasse size: 1006)

#include "parse.h"

using namespace empathy;
using namespace empathy::parse;

namespace empathy::ir
{
    const Term& Bridge< parse::Rule >::Type()
    {
        static auto type = ValueToIRExpr( Value( TypeType(), TSID( rule ) ) );
        return type;
    }

    Value Bridge< parse::Rule >::ToValue( parse::Rule&& r )
    {
        ptr< void > prule = make_shared< parse::Rule >( move( r ) );
        return Value( Type(), TERM( move( prule ) ) );
    }

    optional< ptr< parse::Rule > > Bridge< parse::Rule >::FromValue( const Value& v )
    {
        if( v.type() != Type() )
            return nullopt;

        const auto& p = get< ptr< void > >( v.val() );
        return static_pointer_cast< parse::Rule >( p );
    }
}

namespace empathy::parse
{
    void RegisterRule( sema::Env& env, const Term& identity, Rule&& rule )
    {
        auto ruleVal = ToValue( move( rule ) );
        auto ruleTerm = ValueToIRExpr( ruleVal );
        env.storeValue( identity, ANYTERM( _ ), ruleTerm );
    }
}