RosettaCodeData/Task/Pointers-and-references/Ada/pointers-and-references-1.adb

type Int_Access is access Integer;
Int_Acc : Int_Access := new Integer'(5);