4.3BSD - /usr/src/ucb/dbx/tests/pc/longsym.p

   1: program symtest (input, output);
   2: 
   3: procedure Level1Procedure ;
   4:     procedure Level2Procedure ;
   5:     procedure Level3Procedure ;
   6:         procedure Level4Procedure ;
   7:         procedure Level5Procedure ;
   8:         begin
   9:         end;
  10:         begin
  11:         end;
  12:     begin
  13:     end;
  14:     begin
  15:     end;
  16: begin
  17: end;
  18: 
  19: begin
  20: end.