From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 27168 invoked by alias); 9 Nov 2008 02:02:50 -0000 Received: (qmail 3935 invoked by uid 48); 9 Nov 2008 02:01:23 -0000 Date: Sun, 09 Nov 2008 02:02:00 -0000 Message-ID: <20081109020123.3934.qmail@sourceware.org> X-Bugzilla-Reason: CC References: Subject: [Bug fortran/33584] FAIL: gfortran.dg/integer_exponentiation_4.f90 -O (internal compiler error) In-Reply-To: Reply-To: gcc-bugzilla@gcc.gnu.org To: gcc-bugs@gcc.gnu.org From: "danglin 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: 2008-11/txt/msg00659.txt.bz2 ------- Comment #8 from danglin at gcc dot gnu dot org 2008-11-09 02:01 ------- (gdb) c Continuing. /xxx/gnu/gcc/gcc/gcc/testsuite/gfortran.dg/integer_exponentiation_4.f90:9.12: print *, 0**(-1) ! { dg-error "Division by zero" } 1 Error: Division by zero at (1) /xxx/gnu/gcc/gcc/gcc/testsuite/gfortran.dg/integer_exponentiation_4.f90:11.12: print *, 0**(-huge(0)-1) ! { dg-error "Division by zero" } 1 Error: Division by zero at (1) /xxx/gnu/gcc/gcc/gcc/testsuite/gfortran.dg/integer_exponentiation_4.f90:13.12: print *, 0**(-(2_8**32)) ! { dg-error "Division by zero" } 1 Error: Division by zero at (1) Breakpoint 2, 0x00589304 in __gmpz_pow_ui () (gdb) p/x $r24 $9 = 0x7fffffff (gdb) frame 1 #1 0x000bf840 in gfc_arith_power (op1=0x400c4aa0, op2=0x400c4ca8, resultp=0x7b03bba8) at ../../gcc/gcc/fortran/arith.c:999 999 switch (op1->ts.type) (gdb) p op1->value.integer $10 = {{_mp_alloc = 2, _mp_size = 1, _mp_d = 0x400c41d0}} (gdb) p/x $r25 $11 = 0x400c4ae8 (gdb) p/x &op1->value.integer $12 = 0x400c4ae8 -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=33584