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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gnat.dg/] [aggr19_pkg.adb] - Blame information for rev 715

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


package body Aggr19_Pkg is
 
  procedure Proc (Pool : in out Rec5) is
  begin
    Pool.Ent := (Kind => Two, Node => Pool.Ent.Node, I => 0);
  end;
 
end ;

Line No.	Rev	Author	Line
1	696	jeremybenn	`package body Aggr19_Pkg is`
2
3			`procedure Proc (Pool : in out Rec5) is`
4			`begin`
5			`Pool.Ent := (Kind => Two, Node => Pool.Ent.Node, I => 0);`
6			`end;`
7
8			`end ;`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gnat.dg/] [aggr19_pkg.adb] - Blame information for rev 715