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

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

diff --git a/dhwk/source/pci/io_reg.vhd b/dhwk/source/pci/io_reg.vhd
index ecbd9d67dbdbae908d0cc8cad8947b66e2361736..3003c367563076b62053cf9deef580566625a2dd 100644 (file)
--- a/dhwk/source/pci/io_reg.vhd
+++ b/dhwk/source/pci/io_reg.vhd
@@ -49,7 +49,7 @@ begin
                         REG_IDSEL <= '0';
                         REG_PAR <= '0';
 
-                elsif (PCI_CLOCK'event and PCI_CLOCK = '1') then
+                elsif (rising_edge(PCI_CLOCK)) then
                         REG_AD <= IO_DATA;
                         REG_CBEn <= PCI_CBEn;
                         REG_FRAMEn <= PCI_FRAMEn;