From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 30580 invoked by alias); 13 Apr 2007 13:48:37 -0000 Received: (qmail 30543 invoked by alias); 13 Apr 2007 13:48:22 -0000 Date: Fri, 13 Apr 2007 13:48:00 -0000 Message-ID: <20070413134822.30542.qmail@sourceware.org> X-Bugzilla-Reason: CC References: Subject: [Bug fortran/18937] quadratic behaviour with many label "spaghetti" code In-Reply-To: Reply-To: gcc-bugzilla@gcc.gnu.org To: gcc-bugs@gcc.gnu.org From: "tobi at gcc dot gnu dot org" Mailing-List: contact gcc-bugs-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Id: List-Archive: List-Post: List-Help: Sender: gcc-bugs-owner@gcc.gnu.org X-SW-Source: 2007-04/txt/msg00915.txt.bz2 ------- Comment #15 from tobi at gcc dot gnu dot org 2007-04-13 14:48 ------- Subject: Bug 18937 Author: tobi Date: Fri Apr 13 14:48:08 2007 New Revision: 123789 URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=123789 Log: PR fortran/18937 fortran/ * resolve.c: Include obstack.h and bitmap.h. New variable labels_obstack. (code_stack): Add tail and reachable_labels fields. (reachable_labels): New function. (resolve_branch): Rework to use new fields in code_stack. (resolve_code): Call reachable_labels. (resolve_codes): Allocate and free labels_obstack. testsuite/ * gfortran.dg/goto_2.f90: New. * gfortran.dg/goto_3.f90: New. * gfortran.dg/pr17708.f90: Rename to ... * gfortran.dg/goto_4.f90: ... this, add comment pointing to PR. Added: trunk/gcc/testsuite/gfortran.dg/goto_2.f90 trunk/gcc/testsuite/gfortran.dg/goto_3.f90 trunk/gcc/testsuite/gfortran.dg/goto_4.f90 - copied, changed from r123784, trunk/gcc/testsuite/gfortran.dg/pr17708.f90 Removed: trunk/gcc/testsuite/gfortran.dg/pr17708.f90 Modified: trunk/gcc/fortran/ChangeLog trunk/gcc/fortran/resolve.c trunk/gcc/testsuite/ChangeLog -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=18937