Compiling error by gfortran-10

以下のようなエラーがでる。

/Users/yu/FrontISTR/hecmw1/src/common/hecmw_dist_copy_c2f_f.f90:1085:52:
 1079 |     call hecmw_dist_copy_c2f_set_if(sname, vname, cpair%n_pair, ierr)
      |                                                  2  
......
 1085 |       call hecmw_dist_copy_c2f_set_if(sname, vname, cpair%name, ierr)
      |                                                    1
Error: Type mismatch between actual argument at (1) and actual argument at (2) (CHARACTER(63)/INTEGER(4)).
/Users/yu/FrontISTR/hecmw1/src/common/hecmw_dist_copy_c2f_f.f90:1090:52:
 1079 |     call hecmw_dist_copy_c2f_set_if(sname, vname, cpair%n_pair, ierr)
      |                                                  2  
......
 1090 |       call hecmw_dist_copy_c2f_set_if(sname, vname, cpair%type, ierr)
      |                                                    1
                 1

-DCMAKE_Fortran_FLAGS -fallow-argument-mismatchで回避しても、OpenMP部分でエラーが出る。

/Users/yu/FrontISTR/fistr1/src/lib/contact/fstr_contact_def.F90:374:0:
  374 |         if( contact%algtype /= CONTACTFSLID .or. (.not. present(B)) ) then   ! small slide problem
      | 
Error: 'b' not specified in enclosing 'parallel'
/Users/yu/FrontISTR/fistr1/src/lib/contact/fstr_contact_def.F90:362:0:
  362 |       if( contact%states(i)%state==CONTACTSTICK .or. contact%states(i)%state==CONTACTSLIP ) then
      | 
Error: enclosing 'parallel'