BUG: Fix public statement for YEAR.

MilanSkocic · Dec 2, 2023 · a73f718 · a73f718
1 parent fcd98b4
commit a73f718
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/srcgen/utilities.f90 b/srcgen/utilities.f90
@@ -406,7 +406,7 @@ subroutine write_all_constants(fcodata, ffortran, fcheader, fpython, fcpython, p
     end do
 
     ! fortran
-    write(ffortran, "(A,/)") 'integer(c_int), protected, bind(C,name="YEAR") :: YEAR = ' // props%year
+    write(ffortran, "(A,/)") 'integer(c_int), protected, public, bind(C,name="YEAR") :: YEAR = ' // props%year
     ! C Code
     write(fcheader, "(A,/)") "ADD_IMPORT extern const int YEAR;"
     ! python