URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Only display areas with differences |
Details |
Blame |
View Log
Rev 304 |
Rev 338 |
package body Misaligned_Param_Pkg is
|
package body Misaligned_Param_Pkg is
|
|
|
type IP is access all Integer;
|
type IP is access all Integer;
|
|
|
function Channel_Eth (Kind : IP) return Integer;
|
function Channel_Eth (Kind : IP) return Integer;
|
pragma Export (Ada, Channel_Eth, "channel_eth");
|
pragma Export (Ada, Channel_Eth, "channel_eth");
|
|
|
function Channel_Eth (Kind : IP) return Integer is
|
function Channel_Eth (Kind : IP) return Integer is
|
begin
|
begin
|
Kind.all := 111;
|
Kind.all := 111;
|
return 0;
|
return 0;
|
end;
|
end;
|
|
|
end Misaligned_Param_Pkg;
|
end Misaligned_Param_Pkg;
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.