more in gencod.c on procedure prologue