From 4ba440d842e9a0502b429fbc04e2be41c8037a4c Mon Sep 17 00:00:00 2001
From: Yann Herklotz <ymherklotz@gmail.com>
Date: Sat, 19 Jan 2019 19:20:33 +0000
Subject: Add brittany formatting instead of stylish-haskell

---
 src/VeriFuzz/Verilog/Helpers.hs | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

(limited to 'src/VeriFuzz/Verilog/Helpers.hs')

diff --git a/src/VeriFuzz/Verilog/Helpers.hs b/src/VeriFuzz/Verilog/Helpers.hs
index 554b8ba..53d219b 100644
--- a/src/VeriFuzz/Verilog/Helpers.hs
+++ b/src/VeriFuzz/Verilog/Helpers.hs
@@ -13,7 +13,7 @@ Defaults and common functions.
 module VeriFuzz.Verilog.Helpers where
 
 import           Control.Lens
-import           Data.Text            (Text)
+import           Data.Text                      ( Text )
 import           VeriFuzz.Verilog.AST
 
 regDecl :: Identifier -> ModItem
@@ -38,16 +38,16 @@ addDescription :: Description -> VerilogSrc -> VerilogSrc
 addDescription desc = getVerilogSrc %~ (:) desc
 
 testBench :: ModDecl
-testBench =
-  ModDecl "main" [] []
+testBench = ModDecl
+  "main"
+  []
+  []
   [ regDecl "a"
   , regDecl "b"
   , wireDecl "c"
-  , ModInst "and" "and_gate"
-    [ ModConn $ Id "c"
-    , ModConn $ Id "a"
-    , ModConn $ Id "b"
-    ]
+  , ModInst "and"
+            "and_gate"
+            [ModConn $ Id "c", ModConn $ Id "a", ModConn $ Id "b"]
   , Initial $ SeqBlock
     [ BlockAssign . Assign (RegId "a") Nothing $ Number 1 1
     , BlockAssign . Assign (RegId "b") Nothing $ Number 1 1
-- 
cgit