cg_name CgAssignStateVar( // ASSIGN STATE-VAR VALUE
SYMBOL blk, // - R/W Block
SE* se, // - state entry
target_offset_t offset ) // - offset of state variable
{
return CGLVAssign( CgSymbolPlusOffset( blk, offset )
, CgOffset( SeStateVar( se ) )
, CgTypeOffset() );
}
void CgCdArgDefine( // DEFINE CDOPT VALUE
unsigned value ) // - cdopt value
{
cg_name expr; // - expression under construction
cg_type type; // - expression type
cdtor_entry* cd_entry; // - cdopt entry
type = CgTypeOffset();
expr = CgOffset( value );
cd_entry = RingCarveAlloc( carver_cdtors, &ring_cdtors );
cd_entry->value = value;
cd_entry->handle = CallStackTopHandle();
CgExprPush( expr, type );
}
void CgRtParamConstOffset( // SET UP PARAMETER: CONSTANT OFFSET
RT_DEF *def, // - definition for call
unsigned value ) // - parameter value
{
CgRtParam( CgOffset( value ), def, CgTypeOffset() );
}
cg_name CgOffset( // PASS ABSOLUTE OFFSET TO CODE GENERATOR
unsigned offset ) // - offset value
{
return CGInteger( offset, CgTypeOffset() );
}
void DgOffset( // GENERATE AN OFFSET VALUE
unsigned offset ) // - offset value
{
DGInteger( offset, CgTypeOffset() );
}
