Comments
Patch
===================================================================
@@ -129,7 +129,7 @@ subroutine C1241
integer, pointer, contiguous :: a(:)
integer, pointer :: b(:)
call test(a)
- call test(b) ! { dg-error "must be simply contigous" }
+ call test(b) ! { dg-error "must be simply contiguous" }
contains
subroutine test(x)
integer, pointer, contiguous :: x(:)
@@ -169,7 +169,7 @@ end subroutine sect12528
subroutine test34
implicit none
integer, volatile,pointer :: a(:,:),i
- call foo(a(2,2:3:2)) ! { dg-error "must be simply contigous" }
+ call foo(a(2,2:3:2)) ! { dg-error "must be simply contiguous" }
contains
subroutine foo(x)
integer, pointer, contiguous, volatile :: x(:)
===================================================================
@@ -6,7 +6,7 @@
implicit none
procedure(my_dcos), pointer :: f
- f => my_dcos ! { dg-error "invalid in procedure pointer assigment" }
+ f => my_dcos ! { dg-error "invalid in procedure pointer assignment" }
contains
real elemental function my_dcos(x)
real, intent(in) :: x
===================================================================
@@ -1,3 +1,8 @@
+2012-07-26 Tobias Burnus <burnus@net-b.de>
+
+ * gfortran.dg/contiguous_1.f90: Update dg-error.
+ * gfortran.dg/proc_ptr_32.f90: Ditto.
+
2012-07-26 Richard Guenther <rguenther@suse.de>
PR tree-optimization/54098
On 07/25/2012 08:04 PM, Tobias Burnus wrote: > Committed as obvious (Rev. 189859). I just saw that I missed the testsuite changes. I have now committed them as Rev. 189887. Tobias