From b9cd5a8cd344595bef73ed478dba55da59d5dfac Mon Sep 17 00:00:00 2001
From: Sebastian Ehlert <28669218+awvwgk@users.noreply.github.com>
Date: Sat, 22 Jan 2022 08:49:41 +0100
Subject: [PATCH 1/2] Rewrite procedure pointer access

- allows compilation with GCC5
---
 src/mstore.f90 | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/mstore.f90 b/src/mstore.f90
index 4eff9ac..bc531a8 100644
--- a/src/mstore.f90
+++ b/src/mstore.f90
@@ -102,7 +102,9 @@ subroutine get_record(mol, collection, record, error)
       return
    end if
 
-   call store%collections(is)%records(ir)%get(mol)
+   associate(record => store%collections(is)%records(ir)) 
+      call record%get(mol)
+   end associate
 
 end subroutine get_record
 

From 9cef87c3806fa3ca67511086bc99483aa336f2c7 Mon Sep 17 00:00:00 2001
From: Sebastian Ehlert <28669218+awvwgk@users.noreply.github.com>
Date: Sat, 22 Jan 2022 09:25:49 +0100
Subject: [PATCH 2/2] Update GCC version

---
 .github/workflows/build.yml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/.github/workflows/build.yml b/.github/workflows/build.yml
index cd8feac..b127843 100644
--- a/.github/workflows/build.yml
+++ b/.github/workflows/build.yml
@@ -16,7 +16,7 @@ jobs:
 
     env:
       FC: gfortran
-      GCC_V: 9
+      GCC_V: 10
 
     steps:
     - name: Checkout code