------- Comment #1 from manfred99 at gmx dot ch 2008-01-17 22:45 ------- shorter version: Logical*1 :: bmp(1),bmpv(1)
bmp(1)=.false. bmpv(1)=.true. if ( ANY(bmp(1:1) .NEQV. bmpv(1:1)) ) then print*,"hello" endif end "Logical", "Logical*2" and "Logical*4" in variable definition work. "Logical*1" breaks. -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=34838