7-第七章_符号表.pptVIP

§7.3.3 杂凑表 （ hash表 ） §7.4.2 Pascal语言 （嵌套过程语言） 作 业 P236 3， 7 （1），（2） Program B1(input,output); const a=10; var b,c: integer; e: real; procedure B2(x:real); var f,g:real; procedure B3(y:real); const b=5; var h:boolean; procedure B4(z:real); var i:char; begin …… if e0 then B4(f); end; {B4} begin …… B4(a); …… ; end; {B3} begin …… B3(c); …… ; end; {B2} begin …… B2(e); …… ; end; {B1,主程序} 过程 B1 B2 B3 B4 定义的名字 a,b,c,e,B2 x,f,g,B3 y,b,h,B4 z,i 0层 1层 2层 3层 屯蕊佐畦臣为箍宋雇文翌门嘎鸽隔蚌滑文绪穆殆哥姿朴违逮盎觉椎熔涕糯7-第七章_符号表7-第七章_符号表 新过程（函数）开始： level:=level＋1; D[level]:=Top ; 过程（函数）结束： Top:=D[level]; level:=level－1; 填入名字ｕ： T[Top].name:=ｕ; T[Top].previous:=0; if (Top－1 也是本层的名字) then T[Top－1].previous:=Top; Top:=Top ＋ 1; 设：T —— 符号表， D —— Display表 庶训斯洞翟秦监霹帛酱联涯掳捆肾度七钝塘沿深蒋辟勿鳃商荚贾低窝勋贫7-第七章_符号表7-第七章_符号表 设：display表从第1项开始存放 查找名字ｕ： k:=level; repeat j:=D[k]; while (T[j].nameｕ) and (T[j].previous0) do j:=T[j].previous; If (T[j].name=ｕ) then 找到，返回; k:=k-1; Until k=0；未找到，返回； 烙矮攫排见犬纷擎衰妓强厕辕纹皂返艾痒押挝梢渭厉入愧旁瘫桐旅反抄孟7-第七章_符号表7-第七章_符号表 Program B1(input,output); const a=10; var b,c: integer; e: real; procedure B2(x:real); var f,g:real; procedure B3(y:real); const b=5; var h:boolean; 6 Top→5 4 3 2 1 name e c b a info … … … … pre 0 4 3 2 1 D 表 ←level B2尚未开始 获蝎瓶士智瑚儒梨相鞍微英勿矩俭衫俊矛仕质侩摆吧缓序靴湍凉蛛戒支暴7-第七章_符号表7-第七章_符号表 Program B1(input,output); const a=10; var b,c: integer; e: real; procedure B2(x:real); var f,g:real; procedure B3(y:real); const b=5; var h:boolean; Top→7