Xcysden @1.5.60 build failure in Mojave with Macport 2.5.4

[wcchiu1988]

Xcrysden build failure. Main.log is attached.

Error: Failed to build xcrysden: command execution failed
Error: See /opt/local/var/macports/logs/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_science_xcrysden/xcrysden/main.log for details.
Error: Follow https://guide.macports.org/#project.tickets to report a bug.
Error: Processing of port xcrysden failed

The following is from the main.log

:info:build /opt/local/bin/gfortran-mp-8 -O3  -c -o fhi_inpini2ftn34.o fhi_inpini2ftn34.f
:info:build gengeom.f:735:27:
:info:build           CALL GETCCOOR(DVC,AC,2,X,Y,Z,XC,YC,ZC,I,NATR)
:info:build                            1
:info:build Error: Actual argument contains too few elements for dummy argument 'b33' (6/12) at (1)
:info:build gengeom.f:740:27:
:info:build           CALL GETCCOOR(DVC,BC,2,X,Y,Z,XC,YC,ZC,I,NATR)
:info:build                            1
:info:build Error: Actual argument contains too few elements for dummy argument 'b33' (6/12) at (1)
:info:build gengeom.f:745:27:
:info:build           CALL GETCCOOR(DVC,CC,2,X,Y,Z,XC,YC,ZC,I,NATR)
:info:build                            1
:info:build Error: Actual argument contains too few elements for dummy argument 'b33' (6/12) at (1)
:info:build gengeom.f:759:27:
:info:build           CALL GETCCOOR(DVC,IC,2,X,Y,Z,XC,YC,ZC,I,NATR)
:info:build                            1
:info:build Error: Actual argument contains too few elements for dummy argument 'b33' (6/12) at (1)
:info:build gengeom.f:766:30:
:info:build              CALL GETCCOOR(DVC,RC,IN,X,Y,Z,XC,YC,ZC,I,NATR)
:info:build                               1
:info:build Error: Actual argument contains too few elements for dummy argument 'b33' (9/12) at (1)
:info:build gengeom.f:773:30:
:info:build              CALL GETCCOOR(DVC,HC,IN,X,Y,Z,XC,YC,ZC,I,NATR)
:info:build                               1
:info:build Error: Actual argument contains too few elements for dummy argument 'b33' (9/12) at (1)
:info:build make[1]: *** [gengeom.o] Error 1
:info:build make[1]: *** Waiting for unfinished jobs....
:info:build make[1]: Leaving directory `/opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_science_xcrysden/xcrysden/work/xcrysden-1.5.60/F'
:info:build make: *** [src-F] Error 2
:info:build make: Leaving directory `/opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_science_xcrysden/xcrysden/work/xcrysden-1.5.60'
:info:build Command failed:  cd "/opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_science_xcrysden/xcrysden/work/xcrysden-1.5.60" && /usr/bin/make -j12 -w xcrysden 
:info:build Exit code: 2
:error:build Failed to build xcrysden: command execution failed

Is it the same problem of Fortran compiler as mentioned in #57284?