diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-08-05 13:35:04 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-08-05 13:35:04 +0000 |
| commit | b1e52fee28af2dc34e3316768dc3ef0724c910d7 (patch) | |
| tree | ceb05eff07864148731708854889873363c69eb4 /gcc/ada/s-atocou.adb | |
| parent | b07bcda80a38e4286568d1f8efa340bea8c3c999 (diff) | |
| download | gcc-b1e52fee28af2dc34e3316768dc3ef0724c910d7.tar.gz | |
2011-08-05 Robert Dewar <dewar@adacore.com>
* exp_ch7.ads, sem_type.adb, make.adb, sem_prag.adb, sem_util.adb,
sem_util.ads, sem_attr.adb, restrict.ads, sem_ch6.adb, prj-conf.adb,
prj-conf.ads, s-atocou.ads, s-atocou.adb, s-atocou-x86.adb,
s-atocou-builtin.adb: Minor reformatting.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@177433 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/s-atocou.adb')
| -rw-r--r-- | gcc/ada/s-atocou.adb | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/gcc/ada/s-atocou.adb b/gcc/ada/s-atocou.adb index 709d3889e04..8f2ca01b6d9 100644 --- a/gcc/ada/s-atocou.adb +++ b/gcc/ada/s-atocou.adb @@ -29,7 +29,12 @@ -- -- ------------------------------------------------------------------------------ --- This is dummy version of the package. +-- This is dummy version of the package, for use on platforms where this +-- capability is not supported. Any use of any of the routines in this +-- package will raise Program_Error. + +-- Why don't we use pragma Unimplemented_Unit in a dummy spec, this would +-- seem much more useful than raising an exception at run time ??? package body System.Atomic_Counters is |