dec_parameter_1.f (sub1): Remove statement with no effect.

* gfortran.dg/dec_parameter_1.f (sub1): Remove statement with no effect.
	* gfortran.dg/dec_parameter_2.f90 (sub1): Ditto.

From-SVN: r257338
This commit is contained in:
Uros Bizjak 2018-02-02 17:05:27 +01:00 committed by Uros Bizjak
parent 5fb556ce38
commit fc8922bb92
3 changed files with 5 additions and 2 deletions

View File

@ -1,3 +1,8 @@
2017-02-02 Uros Bizjak <ubizjak@gmail.com>
* gfortran.dg/dec_parameter_1.f (sub1): Remove statement with no effect.
* gfortran.dg/dec_parameter_2.f90 (sub1): Ditto.
2018-02-01 Renlin Li <renlin.li@arm.com>
Backport from mainline

View File

@ -22,7 +22,6 @@
two = 2.0d0
x = two * pi_1 * f_1 * t
y = two * pi_2 * f_2 * t
z = two * pi_3 * f_3 * t
return
end subroutine

View File

@ -21,7 +21,6 @@ subroutine sub1(t, x, y)
two = 2.0d0
x = two * pi_1 * f_1 * t
y = two * pi_2 * f_2 * t
z = two * pi_3 * f_3 * t
return
end subroutine