X-Git-Url: http://review.tizen.org/git/?a=blobdiff_plain;ds=sidebyside;f=gcc%2Fada%2Fs-auxdec-vms_64.ads;h=1480a441887b74a337953583438f1993b2df8037;hb=955871d37fc3f6022ac6bd19dfd8a7134cbcdfac;hp=be90c03d951b892ca75a4c9747b1326d51a0b206;hpb=b53c1b9ce2c05a9c982bcbdb8434ae167f014161;p=platform%2Fupstream%2Fgcc.git diff --git a/gcc/ada/s-auxdec-vms_64.ads b/gcc/ada/s-auxdec-vms_64.ads index be90c03..1480a44 100644 --- a/gcc/ada/s-auxdec-vms_64.ads +++ b/gcc/ada/s-auxdec-vms_64.ads @@ -107,10 +107,10 @@ package System.Aux_DEC is Address_Size : constant := Standard'Address_Size; Short_Address_Size : constant := 32; - function "+" (Left : Short_Address; Right : Integer) return Short_Address; - function "+" (Left : Integer; Right : Short_Address) return Short_Address; - function "-" (Left : Short_Address; Right : Short_Address) return Integer; - function "-" (Left : Short_Address; Right : Integer) return Short_Address; + function "+" (Left : Address; Right : Integer) return Address; + function "+" (Left : Integer; Right : Address) return Address; + function "-" (Left : Address; Right : Address) return Integer; + function "-" (Left : Address; Right : Integer) return Address; pragma Import (Intrinsic, "+"); pragma Import (Intrinsic, "-");