aboutsummaryrefslogtreecommitdiffstats
path: root/testsuite/synth/fsm01/fsm_5s.vhdl
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/synth/fsm01/fsm_5s.vhdl')
-rw-r--r--testsuite/synth/fsm01/fsm_5s.vhdl50
1 files changed, 50 insertions, 0 deletions
diff --git a/testsuite/synth/fsm01/fsm_5s.vhdl b/testsuite/synth/fsm01/fsm_5s.vhdl
new file mode 100644
index 000000000..8e7b387c7
--- /dev/null
+++ b/testsuite/synth/fsm01/fsm_5s.vhdl
@@ -0,0 +1,50 @@
+library ieee;
+use ieee.std_logic_1164.all;
+
+entity fsm_5s is
+ port (clk : std_logic;
+ rst : std_logic;
+ d : std_logic;
+ done : out std_logic);
+end fsm_5s;
+
+architecture behav of fsm_5s is
+ type state_t is (S0_1, S1_0, S2_0, S3_1, S4_0);
+ signal s : state_t;
+begin
+ process (clk)
+ begin
+ if rising_edge(clk) then
+ if rst = '1' then
+ s <= S0_1;
+ done <= '0';
+ else
+ -- Reset by default
+ s <= S0_1;
+ done <= '0';
+ case s is
+ when S0_1 =>
+ if d = '1' then
+ s <= S1_0;
+ end if;
+ when S1_0 =>
+ if d = '0' then
+ s <= S2_0;
+ end if;
+ when S2_0 =>
+ if d = '0' then
+ s <= S3_1;
+ end if;
+ when S3_1 =>
+ if d = '1' then
+ s <= S4_0;
+ end if;
+ when S4_0 =>
+ if d = '0' then
+ done <= '1';
+ end if;
+ end case;
+ end if;
+ end if;
+ end process;
+end behav;