[llvm-commits] [llvm] r45520 - /llvm/trunk/test/FrontendAda/field_order.ads

[Duncan Sands]

Author: baldrick
Date: Wed Jan  2 18:17:02 2008
New Revision: 45520

URL: http://llvm.org/viewvc/llvm-project?rev=45520&view=rev
Log:
Test handling of records for which the fields are
not ordered by offset.

Added:
    llvm/trunk/test/FrontendAda/field_order.ads

Added: llvm/trunk/test/FrontendAda/field_order.ads
URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/field_order.ads?rev=45520&view=auto

==============================================================================
--- llvm/trunk/test/FrontendAda/field_order.ads (added)
+++ llvm/trunk/test/FrontendAda/field_order.ads Wed Jan  2 18:17:02 2008
@@ -0,0 +1,7 @@
+-- RUN: %llvmgcc -c %s
+package Field_Order is
+   type Tagged_Type is abstract tagged null record;
+   type With_Discriminant (L : Positive) is new Tagged_Type with record
+      S : String (1 .. L);
+   end record;
+end;