URL
https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk
Subversion Repositories openrisc_2011-10-31
[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc2/] [gcc/] [testsuite/] [gfortran.dg/] [g77/] [980310-6.f] - Rev 384
Compare with Previous | Blame | View Log
c { dg-do compile } C From: Norbert Conrad <Norbert.Conrad@hrz.uni-giessen.de> C Message-Id: <199711131008.LAA12272@marvin.hrz.uni-giessen.de> C Subject: 971105 g77 bug C To: egcs-bugs@cygnus.com C Date: Thu, 13 Nov 1997 11:08:19 +0100 (CET) C I found a bug in g77 in snapshot 971105 subroutine ai (a) dimension a(-1:*) return end C ai.f: In subroutine `ai': C ai.f:1: C subroutine ai (a) C ^ C Array `a' at (^) is too large to handle C C This happens whenever the lower index boundary is negative and the upper index C boundary is '*'.