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

   1: program incltest (input, output);
   2: 
   3: #include "incltypes.h"
   4: #include "included.h"
   5: 
   6: var p : T;
   7:     q : OT;
   8:     r : RT;
   9: begin
  10:     new(r);
  11:     r^.i := 3;
  12:     r^.j := 4;
  13:     Blah;
  14: end.