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

Subversion Repositories ahbmaster

[/] [ahbmaster/] [trunk/] [test79_AHBmaster/] [component/] [Actel/] [DirectCore/] [CoreAHBLite/] [5.3.101/] [rtl/] [vhdl/] [core/] [coreahblite_pkg.vhd] - Blame information for rev 3

Details | Compare with Previous | View Log


package coreahblite_pkg is
function SYNC_MODE_SEL( FAMILY: INTEGER) return INTEGER;
end coreahblite_pkg;
 
package body coreahblite_pkg is
 
        FUNCTION SYNC_MODE_SEL (FAMILY: INTEGER) RETURN INTEGER IS
        VARIABLE return_val : INTEGER := 0;
        BEGIN
                IF(FAMILY = 25) THEN
                    return_val := 1;
                ELSE
                    return_val := 0;
                END IF;
                RETURN return_val;
        END SYNC_MODE_SEL;
 
end coreahblite_pkg;

Line No.	Rev	Author	Line
1	3	uson	`package coreahblite_pkg is`
2			`function SYNC_MODE_SEL( FAMILY: INTEGER) return INTEGER;`
3			`end coreahblite_pkg;`
4
5			`package body coreahblite_pkg is`
6
7			`FUNCTION SYNC_MODE_SEL (FAMILY: INTEGER) RETURN INTEGER IS`
8			`VARIABLE return_val : INTEGER := 0;`
9			`BEGIN`
10			`IF(FAMILY = 25) THEN`
11			`return_val := 1;`
12			`ELSE`
13			`return_val := 0;`
14			`END IF;`
15			`RETURN return_val;`
16			`END SYNC_MODE_SEL;`
17
18			`end coreahblite_pkg;`

Browse

Tools

Subversion Repositories ahbmaster

[/] [ahbmaster/] [trunk/] [test79_AHBmaster/] [component/] [Actel/] [DirectCore/] [CoreAHBLite/] [5.3.101/] [rtl/] [vhdl/] [core/] [coreahblite_pkg.vhd] - Blame information for rev 3