unit u_samename;

var val_a := new System.IntPtr(0);

end.