case k_ir_loop : return "k_ir_loop";
case k_ir_compound_graph_path : return "k_ir_compound_graph_path";
case k_ir_extblk : return "k_ir_extblk";
+ case k_ir_prog : return "k_ir_prog";
default: return "";
}
}
case k_ir_extblk:
printf("extended block: (%p)\n", X);
break;
+ case k_ir_prog:
+ printf("irp: (%p)\n", X);
+ break;
default:
printf("Cannot identify thing at (%p).\n", X);
}