Merge branch 'feature/writeGitCommit' into 'development'

Adds the commit to the output folder See merge request JorgeGonz/fpakc!40
2023-02-09 15:50:36 +00:00 · 2023-02-09 15:50:36 +00:00 · 167e25e276
commit 167e25e276
parent f815c8f192 60477481dd
1 changed files with 5 additions and 0 deletions
--- a/src/modules/solver/moduleSolver.f90
+++ b/src/modules/solver/moduleSolver.f90
@ -518,6 +518,11 @@ MODULE moduleSolver

      INTEGER, INTENT(in):: t

+      IF (t == tInitial) THEN
+        CALL SYSTEM('git rev-parse HEAD > ' // path // folder // '/' // 'fpack_commit.txt')
+
+      END IF
+
      counterOutput = counterOutput + 1
      IF (counterOutput >= triggerOutput .OR. &
          t == tFinal .OR. t == tInitial) THEN