[Bug fortran/89981] New: [8/9 Regression] gfortran -pedantic rejects code in 8.3.1 that is accepted with 8.3.0

[doko at debian dot org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=89981

            Bug ID: 89981
           Summary: [8/9 Regression] gfortran -pedantic rejects code in
                    8.3.1 that is accepted with 8.3.0
           Product: gcc
           Version: 8.3.1
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: doko at debian dot org
  Target Milestone: ---

Created attachment 46091
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=46091&action=edit
test case

works with r269936 on the gcc-8-branch, fails with r270110, and on the trunk:

$ gfortran -c -pedantic sadmvnt.f 
sadmvnt.f:80:15:

       INFORM = MVNNIT( N, CORREL, LOWER, UPPER, INFIN, INFIS, D, E )
               1
Error: More actual than formal arguments in procedure call at (1)
sadmvnt.f:1432:15:

       INFORM = MVTNIT( N, NU, CORREL, LOWER, UPPER, INFIN, INFIS, D, E )
               1
Error: Type mismatch in argument 'w' at (1); passed INTEGER(4) to REAL(8)