perl -p -i -e "s/PCI_CLOCK'event and PCI_CLOCK = '1'/rising_edge(PCI_CLOCK)/" *.vhd

[raggedstone] / dhwk / source / pci / comm_dec.vhd

diff --git a/dhwk/source/pci/comm_dec.vhd b/dhwk/source/pci/comm_dec.vhd
index c28d22224dd8631f0a2c758f15e2e4176e9302b3..2cd7bebb7ef2b13f25ab019c7f8efe19a2f3c0f0 100644 (file)
--- a/dhwk/source/pci/comm_dec.vhd
+++ b/dhwk/source/pci/comm_dec.vhd
@@ -89,7 +89,7 @@ begin
         process (PCI_CLOCK, PCI_RSTn)
         begin
                 if PCI_RSTn = '0' then FRAME_REG_REGn <= '1';
-        elsif (PCI_CLOCK'event and PCI_CLOCK = '1') then
+        elsif (rising_edge(PCI_CLOCK)) then
 
                 FRAME_REG_REGn <= FRAME_REGn;