Dragonegg cannot output bitcode, only human readable IR, so use -S rather
authorDuncan Sands <baldrick@free.fr>
Thu, 25 Nov 2010 21:21:59 +0000 (21:21 +0000)
committerDuncan Sands <baldrick@free.fr>
Thu, 25 Nov 2010 21:21:59 +0000 (21:21 +0000)
than -c.

git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@120157 91177308-0d34-0410-b5e6-96231b3b80d8

21 files changed:
test/FrontendAda/array_constructor.adb
test/FrontendAda/array_range_ref.adb
test/FrontendAda/array_ref.adb
test/FrontendAda/array_size.adb
test/FrontendAda/asm.adb
test/FrontendAda/debug_var_size.ads
test/FrontendAda/emit_var.ads
test/FrontendAda/fat_fields.adb
test/FrontendAda/field_order.ads
test/FrontendAda/global_constant.adb
test/FrontendAda/init_size.ads
test/FrontendAda/negative_field_offset.adb
test/FrontendAda/non_bitfield.ads
test/FrontendAda/non_lvalue.adb
test/FrontendAda/placeholder.adb
test/FrontendAda/switch.adb
test/FrontendAda/unc_constructor.adb
test/FrontendAda/var_offset.adb
test/FrontendAda/var_size.adb
test/FrontendAda/vce.adb
test/FrontendAda/vce_lv.adb

index de64b45a1e3e630a92f932e934dfab0393144547..13517c7565a53c154d95fc6dfc41484e904baaa1 100644 (file)
@@ -1,4 +1,4 @@
--- RUN: %llvmgcc -c %s
+-- RUN: %llvmgcc -S %s
 procedure Array_Constructor is
    A : array (Integer range <>) of Boolean := (True, False);
 begin
index ae9bdc6cfcdf66a35cf2590588c484ba08d0aec1..037c5aa8b6f012d1401fcedccc34895da0e55b64 100644 (file)
@@ -1,4 +1,4 @@
--- RUN: %llvmgcc -c %s
+-- RUN: %llvmgcc -S %s
 procedure Array_Range_Ref is
    A : String (1 .. 3);
    B : String := A (A'RANGE)(1 .. 3);
index 9577e21ad70f759224758ef2d1360467228dab7e..2bf4b7988d6d1e205f2ad4bc91b4ca9e01966faf 100644 (file)
@@ -1,4 +1,4 @@
--- RUN: %llvmgcc -c %s
+-- RUN: %llvmgcc -S %s
 procedure Array_Ref is
    type A is array (Natural range <>, Natural range <>) of Boolean;
    type A_Access is access A;
index 2f07d063908200fa7277aa454c3478b5a2b8b2bb..c73616c980798ae811f8a2b9b26676f9e407b2b7 100644 (file)
@@ -1,4 +1,4 @@
--- RUN: %llvmgcc -c %s
+-- RUN: %llvmgcc -S %s
 procedure Array_Size is
    subtype S is String (1 .. 2);
    type R is record
index 575617c087886e74daee502cbf3c8536560cf54e..844885e67152c5b5ec040f8dd9d645411118c81e 100644 (file)
@@ -1,4 +1,4 @@
--- RUN: %llvmgcc -c %s
+-- RUN: %llvmgcc -S %s
 with System.Machine_Code;
 procedure Asm is
 begin
index ea966fbae0fe878df4886374144ecc6572b368a5..e8863cbddf94d73e049a4da5fbcbcb96be61f0e6 100644 (file)
@@ -1,4 +1,4 @@
--- RUN: %llvmgcc -c -g %s
+-- RUN: %llvmgcc -S -g %s
 package Debug_Var_Size is
    subtype Length_Type is Positive range 1 .. 64;
    type T (Length : Length_Type := 1) is record
index 35d45448cb6ddf4df9039a3022e6e41e521a307b..47e2538691aca1fbd4928b8ab61a0801f1bcad84 100644 (file)
@@ -1,4 +1,4 @@
--- RUN: %llvmgcc -c %s
+-- RUN: %llvmgcc -S %s
 with Ada.Finalization;
 package Emit_Var is
    type Search_Type is new Ada.Finalization.Controlled with null record;
index 510105f6840f36471993c1d7f63bb4e6e237f856..443a9b679c5599b577fd2176bff396faf03bd5f4 100644 (file)
@@ -1,5 +1,5 @@
--- RUN: %llvmgcc -c %s -I%p/Support
--- RUN: %llvmgcc -c %s -I%p/Support -O2
+-- RUN: %llvmgcc -S %s -I%p/Support
+-- RUN: %llvmgcc -S %s -I%p/Support -O2
 package body Fat_Fields is
    procedure Proc is
    begin
index b49185d6dd807cb0f1dcb1483d00f0d7efc9927b..9b2b37c20db0024365581609cc7452c4b5769a71 100644 (file)
@@ -1,4 +1,4 @@
--- RUN: %llvmgcc -c %s
+-- RUN: %llvmgcc -S %s
 package Field_Order is
    type Tagged_Type is abstract tagged null record;
    type With_Discriminant (L : Positive) is new Tagged_Type with record
index ce9f406dba58b89d654bcf4ffefbd486bb9f2543..330f97b5d0e0d4bf6871a409ba201a5001e8b49d 100644 (file)
@@ -1,4 +1,4 @@
--- RUN: %llvmgcc -c %s -I%p/Support
+-- RUN: %llvmgcc -S %s -I%p/Support
 package body Global_Constant is
 begin
    raise An_Error;
index 1d76ba24f3414d7b02f5644fd27666343dd690e2..f423682bec72b1c9ce8566a43807533dfabda284 100644 (file)
@@ -1,4 +1,4 @@
--- RUN: %llvmgcc -c %s
+-- RUN: %llvmgcc -S %s
 package Init_Size is
    type T (B : Boolean := False) is record
       case B is
index f8b85108504dbe7530f6405aa0ffa04c925196c6..ec8184dde47b4b0fb9282c23ca498123ebc1d40d 100644 (file)
@@ -1,4 +1,4 @@
--- RUN: %llvmgcc -c %s
+-- RUN: %llvmgcc -S %s
 with System;
 procedure Negative_Field_Offset (N : Integer) is
    type String_Pointer is access String;
index 8f5845adb4316ba5e77bd5568b6ae41181ef9845..8a49d46f6b4286db0f86e6c870681cd1f3594047 100644 (file)
@@ -1,4 +1,4 @@
--- RUN: %llvmgcc -c %s
+-- RUN: %llvmgcc -S %s
 package Non_Bitfield is
    type SP is access String;
    type E is (A, B, C);
index 157f3ddd287fb36c0a2b400272f68c4f70238a4e..71e7e102d05b61ec92e8deba9d0e5aaa33f025e5 100644 (file)
@@ -1,4 +1,4 @@
--- RUN: %llvmgcc -c %s -I%p/Support
+-- RUN: %llvmgcc -S %s -I%p/Support
 package body Non_LValue is
    function A (Y : U) return String is
    begin
index f33c9a5ab89d543ec27e83dbcae605990e2af0c4..88908263f871ee6777c3850d498f824f035f9155 100644 (file)
@@ -1,4 +1,4 @@
--- RUN: %llvmgcc -c %s
+-- RUN: %llvmgcc -S %s
 procedure Placeholder is
    subtype Bounded is Integer range 1 .. 5;
    type Vector is array (Bounded range <>) of Integer;
index f214bca2ec420b3209c633aa51a8e653c172d279..0c83a2e6420e153359da25a4c043af09a5818253 100644 (file)
@@ -1,4 +1,4 @@
--- RUN: %llvmgcc -c %s
+-- RUN: %llvmgcc -S %s
 function Switch (N : Integer) return Integer is
 begin
    case N is
index bc3002c6a95bd514914eef9e1ff9610573eb5952..ee10de6c811d768b5ec249387fb967f96b6947a4 100644 (file)
@@ -1,4 +1,4 @@
--- RUN: %llvmgcc -c %s -I%p/Support
+-- RUN: %llvmgcc -S %s -I%p/Support
 package body Unc_Constructor is
    procedure P (X : A) is
    begin
index 09f1c155a061dedffa6c57bec3932a46ec30a977..1d3ca98fa49d29c4f457894975414483aaf8c926 100644 (file)
@@ -1,4 +1,4 @@
--- RUN: %llvmgcc -c %s -I%p/Support
+-- RUN: %llvmgcc -S %s -I%p/Support
 package body Var_Offset is
    function F (X : T) return Character is
    begin
index b3db9a36fe1b47a806f7db92bce9bac614288aed..291f91d4eebdd6b9bb3d26b4074fc07d9e98e20e 100644 (file)
@@ -1,4 +1,4 @@
--- RUN: %llvmgcc -c %s -I%p/Support
+-- RUN: %llvmgcc -S %s -I%p/Support
 package body Var_Size is
    function A (X : T) return String is
    begin
index f24045cbee3f08db616d6461e373ba8e9348fc26..85cdca066a296080d30fb4e78b971c899afccb66 100644 (file)
@@ -1,4 +1,4 @@
--- RUN: %llvmgcc -c %s
+-- RUN: %llvmgcc -S %s
 procedure VCE is
   S : String (1 .. 2);
   B : Character := 'B';
index 4ca4d5c8b542e0fd47b15015de072c1c0195d563..d1b9e0824f17c3786e37c4215396a195a014e776 100644 (file)
@@ -1,4 +1,4 @@
--- RUN: %llvmgcc -c %s
+-- RUN: %llvmgcc -S %s
 procedure VCE_LV is
    type P is access String ;
    type T is new P (5 .. 7);