// $Source$ // $Revision$ // $Date$ $func RFP-Compile e.items = e.asail; /* * Tables for storing different items. * For each table the key is item's qualified name. * Value is s.Linkage s.ItemType t.Pragma e.Item-Specific-Information. * In tables Fun and Fun? s.ItemType is &Fun and &Fun? correspondingly, and * e.Item-Specific-Information is empty. */ $table Fun; $table Fun?; $table Const; $table Object; $func? Lookup-Func t.Fname = s.linkage s.tag t.pragma (e.Fin) (e.Fout);