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)
