44subroutine  vec_type_test (arg1 , arg2 , arg3 , arg4 )
55! ERROR: Assumed-shape entity of vector(real(4)) type is not supported
66  vector(real ) ::  arg1(:)
7- ! ERROR: Assumed Rank  entity of vector(unsigned(4)) type is not supported
7+ ! ERROR: Assumed rank  entity of vector(unsigned(4)) type is not supported
88  vector(unsigned) ::  arg2(..)
99! ERROR: Deferred-shape entity of vector(integer(4)) type is not supported
1010  vector(integer ), allocatable  ::  arg3(:)
@@ -19,7 +19,7 @@ end subroutine vec_type_test
1919subroutine  vec_pair_type_test (arg1 , arg2 , arg3 , arg4 )
2020! ERROR: Assumed-shape entity of __vector_pair type is not supported
2121  __vector_pair ::  arg1(:)
22- ! ERROR: Assumed Rank  entity of __vector_pair type is not supported
22+ ! ERROR: Assumed rank  entity of __vector_pair type is not supported
2323  __vector_pair ::  arg2(..)
2424! ERROR: Deferred-shape entity of __vector_pair type is not supported
2525  __vector_pair, allocatable  ::  arg3(:)
@@ -34,7 +34,7 @@ end subroutine vec_pair_type_test
3434subroutine  vec_quad_type_test (arg1 , arg2 , arg3 , arg4 )
3535! ERROR: Assumed-shape entity of __vector_quad type is not supported
3636  __vector_quad ::  arg1(:)
37- ! ERROR: Assumed Rank  entity of __vector_quad type is not supported
37+ ! ERROR: Assumed rank  entity of __vector_quad type is not supported
3838  __vector_quad ::  arg2(..)
3939! ERROR: Deferred-shape entity of __vector_quad type is not supported
4040  __vector_quad, allocatable  ::  arg3(:)
0 commit comments