split init_ir_prog() so part 1 can be called before mode initialization