Author: baldrick
Date: Thu Jan 3 05:53:52 2008
New Revision: 45534
URL: http://llvm.org/viewvc/llvm-project?rev=45534&view=rev
Log:
Test for handling of large bit offset from a
variable field offset.
Added:
llvm/trunk/test/FrontendAda/Support/var_offset.ads
llvm/trunk/test/FrontendAda/var_offset.adb
Added: llvm/trunk/test/FrontendAda/Support/var_offset.ads
URL:
http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/Support/var_offset.ads?rev=45534&view=auto
==============================================================================
--- llvm/trunk/test/FrontendAda/Support/var_offset.ads (added)
+++ llvm/trunk/test/FrontendAda/Support/var_offset.ads Thu Jan 3 05:53:52 2008
@@ -0,0 +1,9 @@
+package Var_Offset is
+ pragma Elaborate_Body;
+ type T (L : Natural) is record
+ Var_Len : String (1 .. L);
+ Space : Integer;
+ Small : Character;
+ Bad_Field : Character;
+ end record;
+end;
Added: llvm/trunk/test/FrontendAda/var_offset.adb
URL:
http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/var_offset.adb?rev=45534&view=auto
==============================================================================
--- llvm/trunk/test/FrontendAda/var_offset.adb (added)
+++ llvm/trunk/test/FrontendAda/var_offset.adb Thu Jan 3 05:53:52 2008
@@ -0,0 +1,7 @@
+-- RUN: %llvmgcc -c %s -I%p/Support
+package body Var_Offset is
+ function F (X : T) return Character is
+ begin
+ return X.Bad_Field;
+ end;
+end;
_______________________________________________
llvm-commits mailing list
llvm-commits@cs.uiuc.edu
http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits
