1*44165Sbosticprogram incltest (input, output); 2*44165Sbostic 3*44165Sbostic#include "incltypes.h" 4*44165Sbostic#include "included.h" 5*44165Sbostic 6*44165Sbosticvar p : T; 7*44165Sbostic q : OT; 8*44165Sbostic r : RT; 9*44165Sbosticbegin 10*44165Sbostic new(r); 11*44165Sbostic r^.i := 3; 12*44165Sbostic r^.j := 4; 13*44165Sbostic Blah; 14*44165Sbosticend. 15