16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
|
return !!result;
}
const Term& Decl::PatternTypeT::GetPattern()
{
static auto pattern = ValueToIRExpr(
Value( TypeType(), TVEC( TSID( decl ), MkHole( "T"_sid ) ) ) );
return pattern;
}
}
namespace empathy::ir
{
Term Bridge< Decl >::Type( const Term& declType )
{
return ValueToIRExpr( Value( TypeType(), TVEC( TSID( decl ), declType ) ) );
}
Value Bridge< Decl >::ToValue( const Decl& d )
{
return Value( Type( d.type() ), TERM( d.name() ) );
}
|
|
|
|
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
|
return !!result;
}
const Term& Decl::PatternTypeT::GetPattern()
{
static auto pattern = ValueToIRExpr(
Value( TypeType(), VEC( TSID( decl ), MkHole( "T"_sid ) ) ) );
return pattern;
}
}
namespace empathy::ir
{
Term Bridge< Decl >::Type( const Term& declType )
{
return ValueToIRExpr( Value( TypeType(), VEC( TSID( decl ), declType ) ) );
}
Value Bridge< Decl >::ToValue( const Decl& d )
{
return Value( Type( d.type() ), TERM( d.name() ) );
}
|