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