From f852ffee9a67e7a12fd8222de726df01e743b3f5 Mon Sep 17 00:00:00 2001 From: Robert Dewar Date: Wed, 11 Jun 2014 12:34:08 +0000 Subject: [PATCH] gnat_rm.texi: Document System.Unsigned_Types. 2014-06-11 Robert Dewar * gnat_rm.texi: Document System.Unsigned_Types. * impunit.adb: System.Unsigned_Types (s-unstyp.ads) is user accessible. * s-unstyp.ads: Update comments (this is now user available unit). From-SVN: r211458 --- gcc/ada/ChangeLog | 6 ++++++ gcc/ada/gnat_rm.texi | 13 +++++++++++++ gcc/ada/impunit.adb | 3 ++- gcc/ada/s-unstyp.ads | 4 ++-- 4 files changed, 23 insertions(+), 3 deletions(-) diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 5131a6a242c..b59965cbeff 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,9 @@ +2014-06-11 Robert Dewar + + * gnat_rm.texi: Document System.Unsigned_Types. + * impunit.adb: System.Unsigned_Types (s-unstyp.ads) is user accessible. + * s-unstyp.ads: Update comments (this is now user available unit). + 2014-06-11 Robert Dewar * make.adb, sem_res.adb: Minor reformatting. diff --git a/gcc/ada/gnat_rm.texi b/gcc/ada/gnat_rm.texi index 3250a19d700..c1ab2e9eb5c 100644 --- a/gcc/ada/gnat_rm.texi +++ b/gcc/ada/gnat_rm.texi @@ -636,6 +636,7 @@ The GNAT Library * System.Rident (s-rident.ads):: * System.Strings.Stream_Ops (s-ststop.ads):: * System.Task_Info (s-tasinf.ads):: +* System.Unsigned_Types (s-unstyp.ads):: * System.Wch_Cnv (s-wchcnv.ads):: * System.Wch_Con (s-wchcon.ads):: @@ -18254,6 +18255,7 @@ of GNAT, and will generate a warning message. * System.Rident (s-rident.ads):: * System.Strings.Stream_Ops (s-ststop.ads):: * System.Task_Info (s-tasinf.ads):: +* System.Unsigned_Types (s-unstyp.ads):: * System.Wch_Cnv (s-wchcnv.ads):: * System.Wch_Con (s-wchcon.ads):: @end menu @@ -19842,6 +19844,17 @@ package can be used directly by application programs. This package provides target dependent functionality that is used to support the @code{Task_Info} pragma +@node System.Unsigned_Types (s-unstyp.ads) +@section @code{System.Unsigned_Types} (@file{s-unstyp.ads}) +@cindex @code{System.Unsigned_Types} (@file{s-unstyp.ads}) + +@noindent +This package contains definitions of standard unsigned types that +correspond in size to the standard signed types declared in Standard, +and (unlike the types in Interfaces) have corresponding names. It +also contains some related definitions for other specialized types +used by the compiler in connection with packed array types. + @node System.Wch_Cnv (s-wchcnv.ads) @section @code{System.Wch_Cnv} (@file{s-wchcnv.ads}) @cindex @code{System.Wch_Cnv} (@file{s-wchcnv.ads}) diff --git a/gcc/ada/impunit.adb b/gcc/ada/impunit.adb index 6b6b45febaa..de0cb0b2d15 100644 --- a/gcc/ada/impunit.adb +++ b/gcc/ada/impunit.adb @@ -6,7 +6,7 @@ -- -- -- B o d y -- -- -- --- Copyright (C) 2000-2013, Free Software Foundation, Inc. -- +-- Copyright (C) 2000-2014, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -380,6 +380,7 @@ package body Impunit is ("s-rident", F), -- System.Rident ("s-ststop", F), -- System.Strings.Stream_Ops ("s-tasinf", F), -- System.Task_Info + ("s-unstyp", F), -- System.Unsigned_Types ("s-wchcnv", F), -- System.Wch_Cnv ("s-wchcon", F), -- System.Wch_Con diff --git a/gcc/ada/s-unstyp.ads b/gcc/ada/s-unstyp.ads index ee77af897ac..3b97599be87 100644 --- a/gcc/ada/s-unstyp.ads +++ b/gcc/ada/s-unstyp.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1992-2013, Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2014, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -200,7 +200,7 @@ package System.Unsigned_Types is -- previous version of the compiler and runtime, but are not needed -- by the current version. We retain them to help with bootstrap path -- problems. Also they seem harmless, and if any user programs have - -- been (rather improperly) using these types, why discombobulate them? + -- been using these types, why discombobulate them? subtype Packed_Bytes is Packed_Bytes4; subtype Packed_Bytes_Unaligned is Packed_Bytes1; -- 2.30.2