projects
/
gcc.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
1a52e56
)
Make type limited as per Ada 2005 rules.
author
Arnaud Charlet
<charlet@gcc.gnu.org>
Wed, 19 Dec 2007 16:17:40 +0000
(17:17 +0100)
committer
Arnaud Charlet
<charlet@gcc.gnu.org>
Wed, 19 Dec 2007 16:17:40 +0000
(17:17 +0100)
From-SVN: r131067
gcc/testsuite/gnat.dg/test_image_p.ads
patch
|
blob
|
history
diff --git
a/gcc/testsuite/gnat.dg/test_image_p.ads
b/gcc/testsuite/gnat.dg/test_image_p.ads
index 5a7882364095ebb7ddab7104c0ea14f1f94cf7b8..95715b8b5d30e7796bbf43cd7566bb71369aba59 100644
(file)
--- a/
gcc/testsuite/gnat.dg/test_image_p.ads
+++ b/
gcc/testsuite/gnat.dg/test_image_p.ads
@@
-13,7
+13,7
@@
private
type type1 is tagged record
f2 : array_t2;
end record;
- type type3 is record
+ type type3 is
limited
record
the_task : aliased task_t (type3'Access);
the_array : array_t (1 .. 10) := (others => to_type1 (-1));
end record;