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

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

diff --git a/dhwk/source/pci/config_3Ch.vhd b/dhwk/source/pci/config_3Ch.vhd
index 2c79f4fcdf0d86732b614c67029c5360fedf130a..00d93ebfac4511336939c5b45eb30164e3da563c 100644 (file)
--- a/dhwk/source/pci/config_3Ch.vhd
+++ b/dhwk/source/pci/config_3Ch.vhd
@@ -47,7 +47,7 @@ begin
                 if PCI_RSTn = '0' then
                         CONF_INT_LINE <= (others => '0');
 
                 if PCI_RSTn = '0' then
                         CONF_INT_LINE <= (others => '0');
 

-                elsif (PCI_CLOCK'event and PCI_CLOCK = '1') then
+                elsif (rising_edge(PCI_CLOCK)) then

                         if CONF_WR_3CH = '1'and CBE_REGn(0) = '0' then
                                 CONF_INT_LINE(7 downto 0) <= AD_REG(7 downto 0);
                         end if;
                         if CONF_WR_3CH = '1'and CBE_REGn(0) = '0' then
                                 CONF_INT_LINE(7 downto 0) <= AD_REG(7 downto 0);
                         end if;