aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran
diff options
context:
space:
mode:
authorFrancois-Xavier Coudert <fxcoudert@gcc.gnu.org>2008-05-19 12:22:39 +0000
committerFrançois-Xavier Coudert <fxcoudert@gcc.gnu.org>2008-05-19 12:22:39 +0000
commit9e23c1aa0d4f08d859104fa56d12155d874f06bb (patch)
treece01b7542749375d7729d24234e61b9aff0992a5 /gcc/fortran
parent425d348e941775a62c00c07dcb862880f200c8a8 (diff)
downloadgcc-9e23c1aa0d4f08d859104fa56d12155d874f06bb.zip
gcc-9e23c1aa0d4f08d859104fa56d12155d874f06bb.tar.gz
gcc-9e23c1aa0d4f08d859104fa56d12155d874f06bb.tar.bz2
simplify.c (gfc_simplify_dble, [...]): Initialize result variable to avoid warnings.
* simplify.c (gfc_simplify_dble, gfc_simplify_real): Initialize result variable to avoid warnings. From-SVN: r135528
Diffstat (limited to 'gcc/fortran')
-rw-r--r--gcc/fortran/ChangeLog5
-rw-r--r--gcc/fortran/simplify.c4
2 files changed, 7 insertions, 2 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index ffbc9c5..3b1617e 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,8 @@
+2008-05-19 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
+
+ * simplify.c (gfc_simplify_dble, gfc_simplify_real): Initialize
+ result variable to avoid warnings.
+
2008-05-18 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
* intrinsic.c (char_conversions, ncharconv): New static variables.
diff --git a/gcc/fortran/simplify.c b/gcc/fortran/simplify.c
index e094a62..8c1c6b3 100644
--- a/gcc/fortran/simplify.c
+++ b/gcc/fortran/simplify.c
@@ -1094,7 +1094,7 @@ gfc_simplify_dcmplx (gfc_expr *x, gfc_expr *y)
gfc_expr *
gfc_simplify_dble (gfc_expr *e)
{
- gfc_expr *result;
+ gfc_expr *result = NULL;
if (e->expr_type != EXPR_CONSTANT)
return NULL;
@@ -3186,7 +3186,7 @@ gfc_simplify_range (gfc_expr *e)
gfc_expr *
gfc_simplify_real (gfc_expr *e, gfc_expr *k)
{
- gfc_expr *result;
+ gfc_expr *result = NULL;
int kind;
if (e->ts.type == BT_COMPLEX)