Author: baldrick Date: Mon Jul 23 08:41:53 2007 New Revision: 40436 URL: http://llvm.org/viewvc/llvm-project?rev=40436&view=rev Log: For multipart tests, place the parts with no RUN line in Support. Give up on sending output to /dev/null - this cannot always be arranged.
Added: llvm/trunk/test/FrontendAda/Support/ llvm/trunk/test/FrontendAda/Support/fat_fields.ads llvm/trunk/test/FrontendAda/Support/global_constant.ads llvm/trunk/test/FrontendAda/Support/non_lvalue.ads llvm/trunk/test/FrontendAda/Support/unc_constructor.ads llvm/trunk/test/FrontendAda/Support/var_size.ads Removed: llvm/trunk/test/FrontendAda/fat_fields.ads llvm/trunk/test/FrontendAda/global_constant.ads llvm/trunk/test/FrontendAda/non_lvalue.ads llvm/trunk/test/FrontendAda/unc_constructor.ads llvm/trunk/test/FrontendAda/var_size.ads Modified: llvm/trunk/test/FrontendAda/array_constructor.adb llvm/trunk/test/FrontendAda/array_range_ref.adb llvm/trunk/test/FrontendAda/array_ref.adb llvm/trunk/test/FrontendAda/array_size.adb llvm/trunk/test/FrontendAda/asm.adb llvm/trunk/test/FrontendAda/debug_var_size.ads llvm/trunk/test/FrontendAda/emit_var.ads llvm/trunk/test/FrontendAda/fat_fields.adb llvm/trunk/test/FrontendAda/global_constant.adb llvm/trunk/test/FrontendAda/non_lvalue.adb llvm/trunk/test/FrontendAda/switch.adb llvm/trunk/test/FrontendAda/unc_constructor.adb llvm/trunk/test/FrontendAda/var_size.adb llvm/trunk/test/FrontendAda/vce.adb llvm/trunk/test/FrontendAda/vce_lv.adb Added: llvm/trunk/test/FrontendAda/Support/fat_fields.ads URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/Support/fat_fields.ads?rev=40436&view=auto ============================================================================== --- llvm/trunk/test/FrontendAda/Support/fat_fields.ads (added) +++ llvm/trunk/test/FrontendAda/Support/fat_fields.ads Mon Jul 23 08:41:53 2007 @@ -0,0 +1,6 @@ +package Fat_Fields is + pragma Elaborate_Body; + type A is array (Positive range <>) of Boolean; + type A_Ptr is access A; + P : A_Ptr := null; +end; Added: llvm/trunk/test/FrontendAda/Support/global_constant.ads URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/Support/global_constant.ads?rev=40436&view=auto ============================================================================== --- llvm/trunk/test/FrontendAda/Support/global_constant.ads (added) +++ llvm/trunk/test/FrontendAda/Support/global_constant.ads Mon Jul 23 08:41:53 2007 @@ -0,0 +1,4 @@ +package Global_Constant is + pragma Elaborate_Body; + An_Error : exception; +end; Added: llvm/trunk/test/FrontendAda/Support/non_lvalue.ads URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/Support/non_lvalue.ads?rev=40436&view=auto ============================================================================== --- llvm/trunk/test/FrontendAda/Support/non_lvalue.ads (added) +++ llvm/trunk/test/FrontendAda/Support/non_lvalue.ads Mon Jul 23 08:41:53 2007 @@ -0,0 +1,11 @@ +package Non_LValue is + type T (Length : Natural) is record + A : String (1 .. Length); + B : String (1 .. Length); + end record; + type T_Ptr is access all T; + type U is record + X : T_Ptr; + end record; + function A (Y : U) return String; +end; Added: llvm/trunk/test/FrontendAda/Support/unc_constructor.ads URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/Support/unc_constructor.ads?rev=40436&view=auto ============================================================================== --- llvm/trunk/test/FrontendAda/Support/unc_constructor.ads (added) +++ llvm/trunk/test/FrontendAda/Support/unc_constructor.ads Mon Jul 23 08:41:53 2007 @@ -0,0 +1,8 @@ +package Unc_Constructor is + type C is null record; + type A is array (Positive range <>) of C; + A0 : constant A; + procedure P (X : A); +private + A0 : aliased constant A := (1 .. 0 => (null record)); +end; Added: llvm/trunk/test/FrontendAda/Support/var_size.ads URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/Support/var_size.ads?rev=40436&view=auto ============================================================================== --- llvm/trunk/test/FrontendAda/Support/var_size.ads (added) +++ llvm/trunk/test/FrontendAda/Support/var_size.ads Mon Jul 23 08:41:53 2007 @@ -0,0 +1,7 @@ +package Var_Size is + type T (Length : Natural) is record + A : String (1 .. Length); + B : String (1 .. Length); + end record; + function A (X : T) return String; +end; Modified: llvm/trunk/test/FrontendAda/array_constructor.adb URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/array_constructor.adb?rev=40436&r1=40435&r2=40436&view=diff ============================================================================== --- llvm/trunk/test/FrontendAda/array_constructor.adb (original) +++ llvm/trunk/test/FrontendAda/array_constructor.adb Mon Jul 23 08:41:53 2007 @@ -1,4 +1,4 @@ --- RUN: %llvmgcc -c %s -o /dev/null +-- RUN: %llvmgcc -c %s procedure Array_Constructor is A : array (Integer range <>) of Boolean := (True, False); begin Modified: llvm/trunk/test/FrontendAda/array_range_ref.adb URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/array_range_ref.adb?rev=40436&r1=40435&r2=40436&view=diff ============================================================================== --- llvm/trunk/test/FrontendAda/array_range_ref.adb (original) +++ llvm/trunk/test/FrontendAda/array_range_ref.adb Mon Jul 23 08:41:53 2007 @@ -1,4 +1,4 @@ --- RUN: %llvmgcc -c %s -o /dev/null +-- RUN: %llvmgcc -c %s procedure Array_Range_Ref is A : String (1 .. 3); B : String := A (A'RANGE)(1 .. 3); Modified: llvm/trunk/test/FrontendAda/array_ref.adb URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/array_ref.adb?rev=40436&r1=40435&r2=40436&view=diff ============================================================================== --- llvm/trunk/test/FrontendAda/array_ref.adb (original) +++ llvm/trunk/test/FrontendAda/array_ref.adb Mon Jul 23 08:41:53 2007 @@ -1,4 +1,4 @@ --- RUN: %llvmgcc -c %s -o /dev/null +-- RUN: %llvmgcc -c %s procedure Array_Ref is type A is array (Natural range <>, Natural range <>) of Boolean; type A_Access is access A; Modified: llvm/trunk/test/FrontendAda/array_size.adb URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/array_size.adb?rev=40436&r1=40435&r2=40436&view=diff ============================================================================== --- llvm/trunk/test/FrontendAda/array_size.adb (original) +++ llvm/trunk/test/FrontendAda/array_size.adb Mon Jul 23 08:41:53 2007 @@ -1,4 +1,4 @@ --- RUN: %llvmgcc -c %s -o /dev/null +-- RUN: %llvmgcc -c %s procedure Array_Size is subtype S is String (1 .. 2); type R is record Modified: llvm/trunk/test/FrontendAda/asm.adb URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/asm.adb?rev=40436&r1=40435&r2=40436&view=diff ============================================================================== --- llvm/trunk/test/FrontendAda/asm.adb (original) +++ llvm/trunk/test/FrontendAda/asm.adb Mon Jul 23 08:41:53 2007 @@ -1,4 +1,4 @@ --- RUN: %llvmgcc -c %s -o /dev/null +-- RUN: %llvmgcc -c %s with System.Machine_Code; procedure Asm is begin Modified: llvm/trunk/test/FrontendAda/debug_var_size.ads URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/debug_var_size.ads?rev=40436&r1=40435&r2=40436&view=diff ============================================================================== --- llvm/trunk/test/FrontendAda/debug_var_size.ads (original) +++ llvm/trunk/test/FrontendAda/debug_var_size.ads Mon Jul 23 08:41:53 2007 @@ -1,4 +1,4 @@ --- RUN: %llvmgcc -c -g %s -o /dev/null +-- RUN: %llvmgcc -c -g %s package Debug_Var_Size is subtype Length_Type is Positive range 1 .. 64; type T (Length : Length_Type := 1) is record Modified: llvm/trunk/test/FrontendAda/emit_var.ads URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/emit_var.ads?rev=40436&r1=40435&r2=40436&view=diff ============================================================================== --- llvm/trunk/test/FrontendAda/emit_var.ads (original) +++ llvm/trunk/test/FrontendAda/emit_var.ads Mon Jul 23 08:41:53 2007 @@ -1,4 +1,4 @@ --- RUN: %llvmgcc -c %s -o /dev/null +-- RUN: %llvmgcc -c %s with Ada.Finalization; package Emit_Var is type Search_Type is new Ada.Finalization.Controlled with null record; Modified: llvm/trunk/test/FrontendAda/fat_fields.adb URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/fat_fields.adb?rev=40436&r1=40435&r2=40436&view=diff ============================================================================== --- llvm/trunk/test/FrontendAda/fat_fields.adb (original) +++ llvm/trunk/test/FrontendAda/fat_fields.adb Mon Jul 23 08:41:53 2007 @@ -1,5 +1,5 @@ --- RUN: %llvmgcc -c %s -o /dev/null --- RUN: %llvmgcc -c %s -O2 -o /dev/null +-- RUN: %llvmgcc -c %s -I%p/Support +-- RUN: %llvmgcc -c %s -I%p/Support -O2 package body Fat_Fields is procedure Proc is begin Removed: llvm/trunk/test/FrontendAda/fat_fields.ads URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/fat_fields.ads?rev=40435&view=auto ============================================================================== --- llvm/trunk/test/FrontendAda/fat_fields.ads (original) +++ llvm/trunk/test/FrontendAda/fat_fields.ads (removed) @@ -1,6 +0,0 @@ -package Fat_Fields is - pragma Elaborate_Body; - type A is array (Positive range <>) of Boolean; - type A_Ptr is access A; - P : A_Ptr := null; -end; Modified: llvm/trunk/test/FrontendAda/global_constant.adb URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/global_constant.adb?rev=40436&r1=40435&r2=40436&view=diff ============================================================================== --- llvm/trunk/test/FrontendAda/global_constant.adb (original) +++ llvm/trunk/test/FrontendAda/global_constant.adb Mon Jul 23 08:41:53 2007 @@ -1,4 +1,4 @@ --- RUN: %llvmgcc -c %s -o /dev/null +-- RUN: %llvmgcc -c %s -I%p/Support package body Global_Constant is begin raise An_Error; Removed: llvm/trunk/test/FrontendAda/global_constant.ads URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/global_constant.ads?rev=40435&view=auto ============================================================================== --- llvm/trunk/test/FrontendAda/global_constant.ads (original) +++ llvm/trunk/test/FrontendAda/global_constant.ads (removed) @@ -1,4 +0,0 @@ -package Global_Constant is - pragma Elaborate_Body; - An_Error : exception; -end; Modified: llvm/trunk/test/FrontendAda/non_lvalue.adb URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/non_lvalue.adb?rev=40436&r1=40435&r2=40436&view=diff ============================================================================== --- llvm/trunk/test/FrontendAda/non_lvalue.adb (original) +++ llvm/trunk/test/FrontendAda/non_lvalue.adb Mon Jul 23 08:41:53 2007 @@ -1,4 +1,4 @@ --- RUN: %llvmgcc -c %s -o /dev/null +-- RUN: %llvmgcc -c %s -I%p/Support package body Non_LValue is function A (Y : U) return String is begin Removed: llvm/trunk/test/FrontendAda/non_lvalue.ads URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/non_lvalue.ads?rev=40435&view=auto ============================================================================== --- llvm/trunk/test/FrontendAda/non_lvalue.ads (original) +++ llvm/trunk/test/FrontendAda/non_lvalue.ads (removed) @@ -1,11 +0,0 @@ -package Non_LValue is - type T (Length : Natural) is record - A : String (1 .. Length); - B : String (1 .. Length); - end record; - type T_Ptr is access all T; - type U is record - X : T_Ptr; - end record; - function A (Y : U) return String; -end; Modified: llvm/trunk/test/FrontendAda/switch.adb URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/switch.adb?rev=40436&r1=40435&r2=40436&view=diff ============================================================================== --- llvm/trunk/test/FrontendAda/switch.adb (original) +++ llvm/trunk/test/FrontendAda/switch.adb Mon Jul 23 08:41:53 2007 @@ -1,4 +1,4 @@ --- RUN: %llvmgcc -c %s -o /dev/null +-- RUN: %llvmgcc -c %s function Switch (N : Integer) return Integer is begin case N is Modified: llvm/trunk/test/FrontendAda/unc_constructor.adb URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/unc_constructor.adb?rev=40436&r1=40435&r2=40436&view=diff ============================================================================== --- llvm/trunk/test/FrontendAda/unc_constructor.adb (original) +++ llvm/trunk/test/FrontendAda/unc_constructor.adb Mon Jul 23 08:41:53 2007 @@ -1,4 +1,4 @@ --- RUN: %llvmgcc -c %s -o /dev/null +-- RUN: %llvmgcc -c %s -I%p/Support package body Unc_Constructor is procedure P (X : A) is begin Removed: llvm/trunk/test/FrontendAda/unc_constructor.ads URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/unc_constructor.ads?rev=40435&view=auto ============================================================================== --- llvm/trunk/test/FrontendAda/unc_constructor.ads (original) +++ llvm/trunk/test/FrontendAda/unc_constructor.ads (removed) @@ -1,8 +0,0 @@ -package Unc_Constructor is - type C is null record; - type A is array (Positive range <>) of C; - A0 : constant A; - procedure P (X : A); -private - A0 : aliased constant A := (1 .. 0 => (null record)); -end; Modified: llvm/trunk/test/FrontendAda/var_size.adb URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/var_size.adb?rev=40436&r1=40435&r2=40436&view=diff ============================================================================== --- llvm/trunk/test/FrontendAda/var_size.adb (original) +++ llvm/trunk/test/FrontendAda/var_size.adb Mon Jul 23 08:41:53 2007 @@ -1,4 +1,4 @@ --- RUN: %llvmgcc -c %s -o /dev/null +-- RUN: %llvmgcc -c %s -I%p/Support package body Var_Size is function A (X : T) return String is begin Removed: llvm/trunk/test/FrontendAda/var_size.ads URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/var_size.ads?rev=40435&view=auto ============================================================================== --- llvm/trunk/test/FrontendAda/var_size.ads (original) +++ llvm/trunk/test/FrontendAda/var_size.ads (removed) @@ -1,7 +0,0 @@ -package Var_Size is - type T (Length : Natural) is record - A : String (1 .. Length); - B : String (1 .. Length); - end record; - function A (X : T) return String; -end; Modified: llvm/trunk/test/FrontendAda/vce.adb URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/vce.adb?rev=40436&r1=40435&r2=40436&view=diff ============================================================================== --- llvm/trunk/test/FrontendAda/vce.adb (original) +++ llvm/trunk/test/FrontendAda/vce.adb Mon Jul 23 08:41:53 2007 @@ -1,4 +1,4 @@ --- RUN: %llvmgcc -c %s -o /dev/null +-- RUN: %llvmgcc -c %s procedure VCE is S : String (1 .. 2); B : Character := 'B'; Modified: llvm/trunk/test/FrontendAda/vce_lv.adb URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/test/FrontendAda/vce_lv.adb?rev=40436&r1=40435&r2=40436&view=diff ============================================================================== --- llvm/trunk/test/FrontendAda/vce_lv.adb (original) +++ llvm/trunk/test/FrontendAda/vce_lv.adb Mon Jul 23 08:41:53 2007 @@ -1,4 +1,4 @@ --- RUN: %llvmgcc -c %s -o /dev/null +-- RUN: %llvmgcc -c %s procedure VCE_LV is type P is access String ; type T is new P (5 .. 7); _______________________________________________ llvm-commits mailing list llvm-commits@cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/llvm-commits