aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran
diff options
context:
space:
mode:
authorThomas Schwinge <thomas@codesourcery.com>2023-02-12 16:20:58 +0100
committerThomas Schwinge <thomas@codesourcery.com>2023-02-12 16:20:58 +0100
commit81007c525482143fdee017545ac44438b37da0e6 (patch)
treeeb3910b6002d21d3652fd7b706f05da75432d93c /gcc/fortran
parent3a8c8d0d41b57fbb49ab39715b70495d5d1e8dd1 (diff)
parente165214777acfe5621ad36e55b16e098d50e1596 (diff)
downloadgcc-81007c525482143fdee017545ac44438b37da0e6.zip
gcc-81007c525482143fdee017545ac44438b37da0e6.tar.gz
gcc-81007c525482143fdee017545ac44438b37da0e6.tar.bz2
Merge commit '95dc11475dac06b5eecd904079de8aa94827a36a^' into HEAD
Diffstat (limited to 'gcc/fortran')
-rw-r--r--gcc/fortran/ChangeLog6
-rw-r--r--gcc/fortran/parse.cc2
2 files changed, 7 insertions, 1 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 4535398..cbb0ecf 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,9 @@
+2022-12-13 Steve Kargl <kargl@gcc.gnu.org>
+
+ PR fortran/107423
+ * parse.cc (parse_spec): Avoid NULL pointer dereference when parsing
+ a function and an error occured.
+
2022-12-12 Harald Anlauf <anlauf@gmx.de>
PR fortran/102180
diff --git a/gcc/fortran/parse.cc b/gcc/fortran/parse.cc
index cdae43f..bc2b218 100644
--- a/gcc/fortran/parse.cc
+++ b/gcc/fortran/parse.cc
@@ -4015,7 +4015,7 @@ parse_spec (gfc_statement st)
gfc_symbol* proc = gfc_current_ns->proc_name;
gcc_assert (proc);
- if (proc->result->ts.type == BT_UNKNOWN)
+ if (proc->result && proc->result->ts.type == BT_UNKNOWN)
function_result_typed = true;
}