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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gfortran.fortran-torture/] [compile/] [module_expr.f90] - Blame information for rev 801

Go to most recent revision | Details | Compare with Previous | View Log


! This uncovered a bug in the reading/writing of expressions.
module module_expr_1
   integer a
end module
 
module module_expr_2
   use module_expr_1
contains
 
subroutine myproc (p)
   integer, dimension (a) :: p
end subroutine
end module
 
program module_expr
   use module_expr_1
   use module_expr_2
end program

Line No.	Rev	Author	Line
1	695	jeremybenn	`! This uncovered a bug in the reading/writing of expressions.`
2			`module module_expr_1`
3			`integer a`
4			`end module`
5
6			`module module_expr_2`
7			`use module_expr_1`
8			`contains`
9
10			`subroutine myproc (p)`
11			`integer, dimension (a) :: p`
12			`end subroutine`
13			`end module`
14
15			`program module_expr`
16			`use module_expr_1`
17			`use module_expr_2`
18			`end program`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gfortran.fortran-torture/] [compile/] [module_expr.f90] - Blame information for rev 801