?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
2008-05-30 Vladimir Makarov <vmakarov@redhat.com>
[official-gcc.git] / gcc / testsuite / gnat.dg / size_attribute.adb
blob25642e0b0aad86413b92780ba62d73218c7d1d52
1 -- PR middle-end/35823
2 -- { dg-do compile ]
3
4 procedure Size_Attribute (Arg : in String) is
5 Size : constant Natural := Arg'Size;
6 begin
7 null;
8 end;
Mirror of the offical gcc git repository hosted at gcc.gnu.org