[Bug fortran/44346] New: gfortran accepts illegal arguments to intrinsics

[zeccav at gmail dot com]

gfortran should not accept the following:

character s,ss(1),pad(1),order(1)
      integer nn(7)
c gfortran should complain that POS and LEN are negative
      print *,ibits(i,-1,-1)
c POS+LEN>BIT_SIZE(i)
      print *,ibits(i,100,100)
c 30+3>32
      call mvbits(n,30,3,n,1)
c 31+2>32
      call mvbits(n,30,2,n,31)
c LEN negative
      call mvbits(n,30,-2,n,30)
c TOPOS negative
      call mvbits(n,30,2,n,-3)
c FROMPOS negative
      call mvbits(n,-1,2,n,3)
      end

Best regards
Vittorio Zecca


-- 
           Summary: gfortran accepts illegal arguments to intrinsics
           Product: gcc
           Version: 4.5.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: zeccav at gmail dot com
  GCC host triplet: x86_64-unknown-linux-gnu


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