static void cgEmitCodePtr( // EMIT INSTRUCTION TO CODE FILE WITH PTR PARM
CGFILE_GEN *gen, // - generation data
unsigned opcode, // - opcode
void *value ) // - value
{
CGINTER ins; // - instruction
ins.opcode = opcode;
ins.value.pvalue = value;
cgEmitIns( gen, &ins );
}
static void cgEmitCodeUint( // EMIT INSTRUCTION TO CODE FILE WITH UINT PARM
CGFILE_GEN *gen, // - generation data
CGINTEROP opcode, // - opcode
unsigned value ) // - value
{
CGINTER ins; // - instruction
ins.opcode = opcode;
ins.value.uvalue = value;
cgEmitIns( gen, &ins );
}
static void cgEmit( // EMIT INSTRUCTION TO CODE FILE, IF REQUIRED
CGFILE_GEN *gen, // - generation data
CGINTER *instruction ) // - instruction to be emitted
{
emitSetType( gen );
switch( instruction->opcode ) {
case IC_INIT_DONE :
case IC_FUNCTION_OPEN :
gen->curr_type = NULL;
break;
}
cgEmitIns( gen, instruction );
}
