Commit aca5c204 by Dominique d'Humieres Committed by Dominique d'Humieres

warn_conversion_4.f90: Adjust test.

2014-04-05  Dominique d'Humieres <dominiq@lps.ens.fr>

	* gfortran.dg/warn_conversion_4.f90: Adjust test.

From-SVN: r209151
parent 576ba35c
2014-04-05 Dominique d'Humieres <dominiq@lps.ens.fr>
* gfortran.dg/warn_conversion_4.f90: Adjust test.
2014-05-04 Pitchumani Sivanupandi <Pitchumani.S@atmel.com> 2014-05-04 Pitchumani Sivanupandi <Pitchumani.S@atmel.com>
* gcc.target/avr/dev-specific-rmw.c: New test. * gcc.target/avr/dev-specific-rmw.c: New test.
......
...@@ -11,8 +11,8 @@ contains ...@@ -11,8 +11,8 @@ contains
subroutine test subroutine test
integer :: x integer :: x
x = int (abs (cmplx(2.3,0.1))) x = int (abs (cmplx(2.3,0.1)))
x = int (abs (cmplx(2.3_dp,0.1))) ! { dg-warning "Conversion from REAL.8. to default-kind COMPLEX.4. at .1. might loose precision, consider using the KIND argument" } x = int (abs (cmplx(2.3_dp,0.1))) ! { dg-warning "Conversion from REAL.8. to default-kind COMPLEX.4. at .1. might lose precision, consider using the KIND argument" }
x = int (abs (cmplx(2.3,0.1_dp))) ! { dg-warning "Conversion from REAL.8. to default-kind COMPLEX.4. at .1. might loose precision, consider using the KIND argument" } x = int (abs (cmplx(2.3,0.1_dp))) ! { dg-warning "Conversion from REAL.8. to default-kind COMPLEX.4. at .1. might lose precision, consider using the KIND argument" }
x = int (abs (cmplx(2.3_dp,0.1_dp))) ! { dg-warning "Conversion from REAL.8. to default-kind COMPLEX.4. at .1. might loose precision, consider using the KIND argument" } x = int (abs (cmplx(2.3_dp,0.1_dp))) ! { dg-warning "Conversion from REAL.8. to default-kind COMPLEX.4. at .1. might lose precision, consider using the KIND argument" }
end subroutine test end subroutine test
end module fft_mod end module fft_mod
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