URL
https://opencores.org/ocsvn/idea/idea/trunk
Subversion Repositories idea
[/] [idea/] [trunk/] [behavioral/] [key_regulator/] [leftshiftregister2.vbe] - Rev 9
Compare with Previous | Blame | View Log
-- File Name : leftshiftregister2.vbe
-- Description : Shift register left
-- Author : Mas Adit
-- Date : 29 Agustus 2001
ENTITY leftshiftregister2 IS
PORT(
p : IN BIT_VECTOR (16 DOWNTO 0);
q : IN BIT;
r : OUT BIT_VECTOR (33 DOWNTO 0);
vdd : IN BIT;
vss : IN BIT
);
END leftshiftregister2;
ARCHITECTURE VBE OF leftshiftregister2 IS
SIGNAL s : BIT_VECTOR (33 DOWNTO 0);
BEGIN
ASSERT ((vdd and not (vss)) = '1')
REPORT "power supply is missing on leftshiftregister2"
SEVERITY WARNING;
s <= ('0' & '0' & '0' & '0' & '0' & '0' & '0' & '0' & '0'
& '0' & '0' & '0' & '0' & '0' & '0' & p & '0' & '0') WHEN (q = "1")
ELSE "0000000000000000000000000000000000";
r <= s;
END VBE;