OSDN Git Service

* arith.c (gfc_check_real_range): Remove multiple returns
authorkargl <kargl@138bc75d-0d04-0410-961f-82ee72b054a4>
Sun, 27 Feb 2005 17:32:26 +0000 (17:32 +0000)
committerkargl <kargl@138bc75d-0d04-0410-961f-82ee72b054a4>
Sun, 27 Feb 2005 17:32:26 +0000 (17:32 +0000)
commitaf8545317282deb4d50d6d58f3c5c307f2d73d29
tree6c09d914d9cba7f26679428c447183fd7d3355d4
parent35117c831318699547f1c6201b5492b501f9bfec
* arith.c (gfc_check_real_range):  Remove multiple returns
  (check_result): New function.
  (gfc_arith_uminus,gfc_arith_plus,gfc_arith_times,
  gfc_arith_divide,gfc_arith_power,gfc_arith_minus): Use it.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@95624 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/fortran/ChangeLog
gcc/fortran/arith.c