* gnat.dg/unchecked_convert4.adb: Add missing rep clause.

From-SVN: r152938
This commit is contained in:
Eric Botcazou 2009-10-17 12:06:56 +00:00 committed by Eric Botcazou
parent 57e4ba8488
commit 5efc527bcc
2 changed files with 5 additions and 0 deletions

View File

@ -1,3 +1,7 @@
2009-10-17 Eric Botcazou <ebotcazou@adacore.com>
* gnat.dg/unchecked_convert4.adb: Add missing rep clause.
2009-10-17 Eric Botcazou <ebotcazou@adacore.com> 2009-10-17 Eric Botcazou <ebotcazou@adacore.com>
* gnat.dg/aggr11.adb: New test. * gnat.dg/aggr11.adb: New test.

View File

@ -9,6 +9,7 @@ procedure Unchecked_Convert4 is
type Rec is record type Rec is record
I : Uint32; I : Uint32;
end record; end record;
for Rec'Size use 32;
pragma Atomic (Rec); pragma Atomic (Rec);
function Conv is new Unchecked_Conversion (Uint32, Rec); function Conv is new Unchecked_Conversion (Uint32, Rec);