Comment 3 Francois-Xavier Coudert 2005-06-02 13:21:41 UTC I think you are seeing two different errors: one with your full code, and one with your reduced testcase. Here is a reduction of your bug (gfortran-20050602 on > i386-linux): > > $ cat a-stripped.f90 > module foo > character(len=l) :: s > contains > end module foo > $ Unit is the number of the unit affected to the messages file ! Unofficial builds of GCC can be found at http://gcc.gnu.org/wiki/GFortranBinaries As it is no regression and as it works in both the latest release and in the development version, I close this have a peek at these guys
This computer-programming-related article is a stub. GNU Fortran comes with NO WARRANTY, to the extent permitted by law. The whole thing is definitly a bit tortured, but this can happen when some code has been growing a lot organically... See
Character ! ========= CHARACTER ( LEN = Input_String_Length ):: bufferString ! ! ! Integer ! ======= INTEGER, PARAMETER :: Screen = 01 ! ! ! Interface for outAusgabe ! ======================== ! Paul Format For Printing -XML -Clone This Bug -Top of page Home | New | Browse | Search | [?] | Reports | Help | NewAccount | Log In Remember [x]
Fortran90 Module for language settings ! ! gnu ! See bug 45170 comment 39 for the outstanding issues. (Using "len=:" as component of a derived type will likely be supported in 4.9; maybe in a month?) In any case: Thanks org [Download message RAW] ------- Additional Comments From fxcoudert at gcc dot gnu dot org 2005-06-06 10:20 ------- Philippe sent me his code.
Contents 1 Examples 1.1 Common C++ compilation errors 1.2 Internal Compiler Errors 2 References Examples Common C++ compilation errors Undeclared identifier, e.g.: doy.cpp: In function `int main()': doy.cpp:25: `DayOfYear' undeclared (first They can sometimes be worked around by making small, insignificant changes to the source code around the line indicated by the error (if such an line is indicated at all), but v t e Retrieved from "https://en.wikipedia.org/w/index.php?title=Compilation_error&oldid=499664280" Categories: DebuggingComputer errorsComputer programming stubsHidden categories: All stub articles Navigation menu Personal tools Not logged inTalkContributionsCreate accountLog in Namespaces Article Talk Variants Views Read Edit useful source New_message ) THEN READ ( UNIT = Unit, FMT = *, IOSTAT = IO_Stat ) & & Number IF ( IO_Stat .NE. 0 ) & & CALL CTN_Error_Interception IF ( Number
Message ) & & EXIT ENDIF ENDDO ! ! Clerman Follow-Ups: [Bug fortran/53035] Internal Compiler Error From: burnus at gcc dot gnu.org [Bug fortran/53035] Internal Compiler Error From: rguenth at gcc dot gnu.org [Bug fortran/53035] Internal Compiler Error From: norm.clerman Meanwhile, I don't understand > how your code (file module_io) is supposed to work: bufferString is declared as > CHARACTER ( LEN = Input_String_Length ):: bufferString > but Input_String_Length is not Error interception ! ------------------ CONTAINS SUBROUTINE CTN_Error_Interception !
I hope it makes sense to someone... http://lists.llvm.org/pipermail/llvm-bugs/2008-March/004804.html New_message ) & & CALL CTN_Error_Interception ENDDO ! ! Check if file is connected ! -------------------------- INQUIRE ( UNIT = Unit, OPENED = Unit_Connected ) IF ( .NOT. Wikipedia® is a registered trademark of the Wikimedia Foundation, Inc., a non-profit organization.
Comment 4 Tobias Burnus 2013-04-13 12:45:15 UTC (In reply to comment #2) > AFAICT the code compiles with gfortran 4.8.0, but not with 4.7.3. Proper reduction showed that his initial bug is PR 17911. Yours truly, Norman S. check my blog You can help Wikipedia by expanding it.
CONTAINS ! ! !======================================================================! ! "Read_Message" !======================================================================! ! Text = " ERROR IN ROUTINE " // TRIM(Name) // "!" CALL Ausgabe ( Screen, TRIM(Text) // "!", "(/A)" ) WRITE ( Text, "(A,I5,A,I3)" ) " MESSAGE NOT FOUND:", & & Comment 1 Francois-Xavier Coudert 2005-06-02 11:41:45 UTC Thanks for reporting!
USE MODULE_IO IMPLICIT NONE LOGICAL :: Unit_Connected INTEGER, INTENT ( IN ) :: Unit, Message, Line INTEGER :: IO_Stat, Number, k CHARACTER ( LEN =Length_Message):: Read_Message CHARACTER ( LEN = * I leave this PR open for the following bug: $ cat a-stripped.f90 module foo character(len=l) :: s contains end module foo $ gfortran a-stripped.f90 a-stripped.f90:0: internal compiler error: in lhd_set_decl_assembler_name, at COLLECT_GCC=gfortran Target: x86_64-unknown-linux-gnu Configured with: ../gcc-4.7-source/gcc-4.7-20120414/configure --enable-languages=c,c++,fortran --enable-checking=release --disable-bootstrap --disable-libmudflap --enable-libgomp --enable-lto --enable-gold --with-plugin-ld=/usr/bin/gold --prefix=/usr/local/gcc-4.7 Thread model: posix gcc version 4.7.1 20120414 (prerelease) (GCC) COLLECT_GCC_OPTIONS='-I' '/home/norm/opcon/gfortran/focus11-bug1-4.7.1-test-dir/include' '-c' '-v' '-Wall' '-Wextra' '-O3' http://mttags.com/internal-compiler/internal-compiler-error-in-make-rtl-for-nonlocal-decl.php Find message ! ------------ DO READ ( Unit, "(A)", IOSTAT = IO_Stat ) Text IF ( IO_Stat .NE. 0 ) & & CALL CTN_Error_Interception IF ( Text(1:10) .EQ.
SUBROUTINE outString ( Unit, String, Fmt ) ! I just removed as much as possible to avoid having too much code (from 1173 to 230 lines), but I just tried to avoid syntax errors and stuff like that, I Place the file in a directory, decompress it, and extract its entire contents. c:158 Please submit a full bug report, with preprocessed source if appropriate.
Previous message: [LLVMbugs] [Bug 2183] Cannot run make test: ERROR: tcl error sourcing /home/edwin/ llvm-svn/llvm/test/site.exp Messages sorted by: [ date ] [ thread ] [ subject ] [ author ] More I've spoted a problem for a couple of weeks now, but I don't seem to be able to make a "nice" case from it... MODULE_SPRACHE.f90: In function ???ctn_error_interception???: MODULE_SPRACHE.f90:120: internal compiler error: in gfc_conv_variable, at fortran/trans-expr.c:350 Please submit a full bug report, with preprocessed source if appropriate. Philippe PS: I can also send the files as a tarball, I just don't know how to... -------------------------------------------------------------------------------- PPS: my version: GNU Fortran 95 (GCC 4.1.0 20050517 (experimental)) Copyright (C) 2005
Unit_Connected ) & & CALL CTN_Error_Interception ! ! Then enter automake autoconf ./configure make When I do this I see the following compiling the file syspars.f90: gfortran -I/home/norm/opcon/gfortran/focus11-bug1-4.7.1-test-dir/include -c -v -Wall -Wextra -O3 -ffast-math -funroll-loops -std=f2003 -fno-backslash -c -o Common function undeclared, e.g.: xyz.cpp: In function `int main()': xyz.cpp:6: `cout' undeclared (first use this function) This means that the programmer most likely forgot to include iostream. Rewind file ! ----------- REWIND ( Unit ) ! !
Character ! ========= ! See