From e79d350b145139128a2aecf32666ee5b1cd05adb Mon Sep 17 00:00:00 2001 From: Yann Herklotz Date: Sun, 24 Nov 2019 15:24:13 +0000 Subject: Fix more changes to for loops --- src/Verismith/Verilog/Mutate.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Verismith/Verilog/Mutate.hs b/src/Verismith/Verilog/Mutate.hs index 318e8e6..586e085 100644 --- a/src/Verismith/Verilog/Mutate.hs +++ b/src/Verismith/Verilog/Mutate.hs @@ -115,7 +115,7 @@ instance Mutate Statement where mutExpr f (TaskEnable a) = TaskEnable $ mutExpr f a mutExpr f (SysTaskEnable a) = SysTaskEnable $ mutExpr f a mutExpr f (CondStmnt a b c) = CondStmnt (f a) (mutExpr f <$> b) $ mutExpr f <$> c - mutExpr f (ForLoop a1 e a2 s) = ForLoop (mutExpr f a1) e (mutExpr f a2) $ mutExpr f s + mutExpr f (ForLoop a1 e a2 s) = ForLoop a1 e a2 $ mutExpr f s instance Mutate Parameter where mutExpr _ = id -- cgit