Commit ed1fc0bc by H.J. Lu Committed by H.J. Lu

Revert the last change

	* gnat.dg/specs/addr1.ads: Revert the last change.
	* gnat.dg/specs/atomic1.ads: Likewise.

From-SVN: r204829
parent 37512c03
2013-11-14 H.J. Lu <hongjiu.lu@intel.com>
* gnat.dg/specs/addr1.ads: Revert the last change.
* gnat.dg/specs/atomic1.ads: Likewise.
2013-11-14 Cong Hou <congh@google.com> 2013-11-14 Cong Hou <congh@google.com>
* gcc.dg/vect/vect-alias-check.c: Update. * gcc.dg/vect/vect-alias-check.c: Update.
......
...@@ -21,7 +21,7 @@ package Addr1 is ...@@ -21,7 +21,7 @@ package Addr1 is
for Obj1'Address use A'Address; -- { dg-bogus "(alignment|erroneous)" } for Obj1'Address use A'Address; -- { dg-bogus "(alignment|erroneous)" }
Obj2: Rec2; Obj2: Rec2;
for Obj2'Address use A'Address; -- { dg-bogus "(alignment|erroneous)" "" { xfail mips*-*-* { { i?86-*-* x86_64-*-* } && x32 } } } for Obj2'Address use A'Address; -- { dg-bogus "(alignment|erroneous)" "" { xfail mips*-*-* } }
Obj3: Rec1; Obj3: Rec1;
for Obj3'Address use A(1)'Address; -- { dg-bogus "(alignment|erroneous)" } for Obj3'Address use A(1)'Address; -- { dg-bogus "(alignment|erroneous)" }
......
...@@ -6,11 +6,11 @@ package Atomic1 is ...@@ -6,11 +6,11 @@ package Atomic1 is
type UA is access all Arr; type UA is access all Arr;
U : UA; U : UA;
pragma Atomic (U); -- { dg-error "atomic access" "" { xfail mips*-*-* { { i?86-*-* x86_64-*-* } && x32 } } } pragma Atomic (U); -- { dg-error "atomic access" "" { xfail mips*-*-* } }
type R is record type R is record
U : UA; U : UA;
pragma Atomic (U); -- { dg-error "atomic access" "" { xfail mips*-*-* { { i?86-*-* x86_64-*-* } && x32 } } } pragma Atomic (U); -- { dg-error "atomic access" "" { xfail mips*-*-* } }
end record; end record;
end Atomic1; end Atomic1;
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment