OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gfortran.dg/] [g77/] [19990525-0.f] - Blame information for rev 816

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 149 jeremybenn
c { dg-do compile }
2
* Mailing-List: contact egcs-bugs-help@egcs.cygnus.com; run by ezmlm
3
* Precedence: bulk
4
* Sender: owner-egcs-bugs@egcs.cygnus.com
5
* From: "Bjorn R. Bjornsson" <brb@halo.hi.is>
6
* Subject: g77 char expr. as arg to subroutine bug
7
* To: egcs-bugs@egcs.cygnus.com
8
* Date: Tue, 25 May 1999 14:45:56 +0000 (GMT)
9
* Content-Type: text/plain; charset=US-ASCII
10
* X-UIDL: 06000c94269ed6dfe826493e52a818b9
11
*
12
* The following bug is in all snapshots starting
13
* from April 18.  I have only tested this on Alpha linux,
14
* and with FFECOM_FASTER_ARRAY_REFS set to 1.
15
*
16
* Run the following through g77:
17
*
18
      subroutine a
19
      character*2 string1
20
      character*2 string2
21
      character*4 string3
22
      string1 = 's1'
23
      string2 = 's2'
24
c
25
c the next 2 lines are ok.
26
      string3 = (string1 // string2)
27
      call b(string1//string2)
28
c
29
c this line gives gcc/f/com.c:10660: failed assertion `hook'
30
      call b((string1//string2))
31
      end
32
*
33
* the output from:
34
*
35
* /usr/local/egcs-19990418/bin/g77 --verbose -c D.f
36
*
37
* is:
38
*
39
* on egcs-2.93.19 19990418 (gcc2 ss-980929 experimental) (from FSF-g77 version 0.5.24-19990418)
40
* Reading specs from /usr/local/egcs-19990418/lib/gcc-lib/alphaev56-unknown-linux-gnu/egcs-2.93.19/specs
41
* gcc version egcs-2.93.19 19990418 (gcc2 ss-980929 experimental)
42
*  /usr/local/egcs-19990418/lib/gcc-lib/alphaev56-unknown-linux-gnu/egcs-2.93.19/f771 D.f -quiet -dumpbase D.f -version -fversion -o /tmp/ccNpaaaa.s
43
* GNU F77 version egcs-2.93.19 19990418 (gcc2 ss-980929 experimental) (alphaev56-unknown-linux-gnu) compiled by GNU C version egcs-2.93.19 19990418 (gcc2 ss-980929 experimental).
44
* GNU Fortran Front End version 0.5.24-19990418
45
* ../../../egcs-19990418/gcc/f/com.c:10351: failed assertion `hook'
46
* g77: Internal compiler error: program f771 got fatal signal 6
47
*
48
* Yours,
49
*
50
* Bjorn R. Bjornsson
51
* brb@halo.hi.is

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.