aboutsummaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
Diffstat (limited to 'gcc')
-rw-r--r--gcc/fortran/ChangeLog5
-rw-r--r--gcc/fortran/decl.c1
2 files changed, 6 insertions, 0 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 587a010..f89d3a5 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,5 +1,10 @@
2012-08-14 Mikael Morin <mikael@gcc.gnu.org>
+ * decl.c (match_ppc_decl): Copy the procedure interface's symbol
+ as procedure interface's result.
+
+2012-08-14 Mikael Morin <mikael@gcc.gnu.org>
+
* trans-expr.c (gfc_trans_scalar_assign): Rename argument,
extend comment.
diff --git a/gcc/fortran/decl.c b/gcc/fortran/decl.c
index 083326e..87eb8a0 100644
--- a/gcc/fortran/decl.c
+++ b/gcc/fortran/decl.c
@@ -5050,6 +5050,7 @@ match_ppc_decl (void)
{
c->ts = ts;
c->ts.interface = gfc_new_symbol ("", gfc_current_ns);
+ c->ts.interface->result = c->ts.interface;
c->ts.interface->ts = ts;
c->ts.interface->attr.flavor = FL_PROCEDURE;
c->ts.interface->attr.function = 1;