Increase filename char allocation

COSIMA · Oct 23, 2024 · 575242b · 575242b
1 parent 1933f94
commit 575242b
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/MOM6/patches/MOM_io_infra.F90.patch b/MOM6/patches/MOM_io_infra.F90.patch
@@ -6,7 +6,7 @@
    character(len=6) :: action_arg, position_arg
 -  character(len=:), allocatable :: filename
 -
-+  character(len=50) :: filename
++  character(len=500) :: filename
    ! NOTE: This function is written to emulate the original behavior of mpp_open
    !   from the FMS1 library, on which the MOM API is still based.  Much of this
    !   can be removed if we choose to drop this compatibility, but for now we