diff --git a/src/Potentials/IPModel_GAP.f95 b/src/Potentials/IPModel_GAP.f95
index 7d90fd060..1352d5c6d 100644
--- a/src/Potentials/IPModel_GAP.f95
+++ b/src/Potentials/IPModel_GAP.f95
@@ -934,6 +934,8 @@ subroutine IPModel_GAP_read_params_xml(this, param_str)
        characters_handler = IPModel_characters_handler)
      call close_xml_t(fxml)
 
+     call finalise(parse_cur_data)
+
      if(.not. parse_in_ip_done) &
      call  system_abort('IPModel_GAP_read_params_xml: could not initialise GAP potential. No GAP_params present?')
      this%initialised = .true.
diff --git a/src/Potentials/IPModel_vdW.f95 b/src/Potentials/IPModel_vdW.f95
index bb30dac10..1a1607f26 100644
--- a/src/Potentials/IPModel_vdW.f95
+++ b/src/Potentials/IPModel_vdW.f95
@@ -863,6 +863,8 @@ subroutine IPModel_vdW_read_params_xml(this, param_str)
        characters_handler = IPModel_characters_handler)
      call close_xml_t(fxml)
 
+     call finalise(parse_cur_data)
+
      if(.not. parse_in_ip_done) &
      call  system_abort('IPModel_vdW_read_params_xml: could not initialise vdW potential. No vdW_params present?')
      this%initialised = .true.