Esempio n. 1
0
Temp_label Temp_newlabel(const char *LabelNameSuffix)
{
	char buf[MAX_NAME_LENGTH_OF_LABEL];
	
	sprintf(buf,"Label_%d_%s",labels++,LabelNameSuffix);
	
	return Temp_namedlabel(String(buf));
}
Esempio n. 2
0
Tr_level Tr_outermost(){
	if(outermostLevel==NULL){
		outermostLevel = (Tr_level)checked_malloc(sizeof(struct Tr_level_));
		outermostLevel->parent = NULL;
		outermostLevel->frame = F_newFrame(Temp_namedlabel("main"), NULL);
		outermostLevel->depth = 0;
	}
	return outermostLevel;
}
Esempio n. 3
0
T_exp F_externalCall(string str, T_expList args)
{
	return T_Call(T_Name(Temp_namedlabel(str)), args);
}