diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index b42a391b3f..387d2d5450 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,8 @@
+2021-03-14  Tom Tromey  <tom@tromey.com>
+
+	* dwarf2/read.c (dwarf2_per_cu_data::get_header): Set
+	m_header_read_in.
+
 2021-03-13  Tom Tromey  <tom@tromey.com>
 
 	* dwarf2/read.c (struct partial_die_info): Update.
diff --git a/gdb/dwarf2/read.c b/gdb/dwarf2/read.c
index 3b72a96aff..dcf161fa35 100644
--- a/gdb/dwarf2/read.c
+++ b/gdb/dwarf2/read.c
@@ -24758,6 +24758,8 @@ dwarf2_per_cu_data::get_header () const
 
       read_comp_unit_head (&m_header, info_ptr, this->section,
 			   rcuh_kind::COMPILE);
+
+      m_header_read_in = true;
     }
 
   return &m_header;