From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 13529 invoked by alias); 23 Jan 2005 14:56:20 -0000 Mailing-List: contact gcc-bugs-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-bugs-owner@gcc.gnu.org Received: (qmail 12340 invoked by uid 48); 23 Jan 2005 14:55:21 -0000 Date: Sun, 23 Jan 2005 14:56:00 -0000 From: "manfred99 at gmx dot ch" To: gcc-bugs@gcc.gnu.org Message-ID: <20050123145517.19589.manfred99@gmx.ch> Reply-To: gcc-bugzilla@gcc.gnu.org Subject: [Bug fortran/19589] New: Regression: Error on Data assignment with LOGICAL*1 X-Bugzilla-Reason: CC X-SW-Source: 2005-01/txt/msg03292.txt.bz2 List-Id: PROGRAM logical_data LOGICAL*1 GRD DATA GRD /.TRUE./ END gives: > gfc -v logical_data.f Driving: /usr/local/gfortran/irun/bin/gfortran -static -v logical_data.f -lgfortranbegin -lgfortran -lm Using built-in specs. Configured with: ../gcc/configure --enable-languages=c,f95 --prefix=/usr/work/2005023/irun Thread model: posix gcc version 4.0.0 20050123 (experimental) /usr/local/gfortran/irun/bin/../libexec/gcc/i686-pc-linux-gnu/4.0.0/f951 logical_data.f -ffixed-form -quiet -dumpbase logical_data.f -mtune=pentiumpro -auxbase logical_data -version -o /tmp/cc2uDAa6.s GNU F95 version 4.0.0 20050123 (experimental) (i686-pc-linux-gnu) compiled by GNU C version 4.0.0 20050117 (experimental). GGC heuristics: --param ggc-min-expand=30 --param ggc-min-heapsize=4096 In file logical_data.f:3 DATA GRD /.TRUE./ 1 Error: Incompatible types in assignment at (1), LOGICAL(4) to LOGICAL(1) which is a clear regression, g77 supports this. Of course this error happens also with LOGICAL*2, LOGICAL*8, ... -- Summary: Regression: Error on Data assignment with LOGICAL*1 Product: gcc Version: 4.0.0 Status: UNCONFIRMED Severity: normal Priority: P2 Component: fortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: manfred99 at gmx dot ch CC: gcc-bugs at gcc dot gnu dot org http://gcc.gnu.org/bugzilla/show_bug.cgi?id=19589