对分程序体人口的处理（见程序文本block 的过程体） 　　begin (*block*) 　　　dx:=3; 　　　tx0:=tx; （*保留当前table表指针值,实际为过程名在table表中的位置*） 　　　table[tx].adr:=cx;（*保留当前code指针值到过程名的adr域*） 　　　gen(jmp,0,0); 记录过程在code的入口到table中的adr域如下表所示： （*生成转向过程体入口的指令，该指令的地址为cx已保留在过程名的adr域，真正的过程体入口地址，等生成过程体入口的指令时，再由table[tx].adr中取出 cx将过程体入口返填到cx所指目标代码，即:（jmp,0,0）的第3区域，同时填到table[tx].adr 中*)