[Bug fortran/46846] New: Warning of AINT as actual argument ain't right

[Bug fortran/46846] New: Warning of AINT as actual argument ain't right

[burnus at gcc dot gnu.org]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=46846

           Summary: Warning of AINT as actual argument ain't right
           Product: gcc
           Version: 4.6.0
            Status: UNCONFIRMED
          Keywords: diagnostic, documentation, wrong-code
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned@gcc.gnu.org
        ReportedBy: burnus@gcc.gnu.org


http://groups.google.com/group/comp.lang.fortran/browse_thread/thread/8ac296b9404b3245

lnblnk is a GNU extension.
char, ichar, int, and len_trim are also rejected by other compilers.

Currently, gfortran prints the warning

  Warning: Interface mismatch in dummy procedure 'fun' at (1): '%s' has
           the wrong number of arguments

for the intrinsics aint, anint, index, len and nint.

"13.6 Specific names for standard intrinsic functions"
Speci\fc Name    Generic Name Argument    Type and Kind
AINT           AINT                     default real
ANINT          ANINT                    default real
INDEX          INDEX                    default character
LEN            LEN                      default character
NINT           NINT                     default real

The problem is that all those functions have an optional KIND= argument -
which, however, is not included in the specific functions (as backward
compatibility to Fortran 77). Thus, the warning is bogus - but another question
is whether this can lead to wrong code by not passing NULL as second argument.


I have not checked, but maybe the documentation should also be improved (cf.
James' posting to c.l.f)

[Bug fortran/46846] Warning of AINT as actual argument ain't right

[burnus at gcc dot gnu.org]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=46846

--- Comment #1 from Tobias Burnus <burnus at gcc dot gnu.org> 2010-12-08 19:31:57 UTC ---
Cf. also
http://groups.google.com/group/comp.lang.fortran/browse_thread/thread/8cdbfa22b5b1ab00

[Bug fortran/46846] Warning of AINT as actual argument ain't right

[burnus at gcc dot gnu.org]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=46846

--- Comment #2 from Tobias Burnus <burnus at gcc dot gnu.org> 2010-12-08 19:47:50 UTC ---
Cf. also for REAL:
http://groups.google.com/group/comp.lang.fortran/browse_thread/thread/bc0e811575b758ab
-- The documentation seems to be OK, but an ICE is shown at the very end (in
gfc_typenode_for_spec).

[Bug fortran/46846] Warning of AINT as actual argument ain't right

[burnus at gcc dot gnu.org]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=46846

--- Comment #3 from Tobias Burnus <burnus at gcc dot gnu.org> 2010-12-09 08:05:31 UTC ---
Another post by James about REAL:
http://groups.google.com/group/comp.lang.fortran/browse_thread/thread/991e2a17662a3bde