From b58cf5bf0784fc1aa72664ca257b0c1bc7404fd2 Mon Sep 17 00:00:00 2001 From: Zachary Snow Date: Sun, 7 Jun 2020 14:26:53 -0400 Subject: [PATCH] remove empty generate conditionals --- src/Convert/Traverse.hs | 1 + 1 file changed, 1 insertion(+) diff --git a/src/Convert/Traverse.hs b/src/Convert/Traverse.hs index 43af5d6..9dd7655 100644 --- a/src/Convert/Traverse.hs +++ b/src/Convert/Traverse.hs @@ -1062,6 +1062,7 @@ traverseNestedModuleItemsM mapper = fullMapper return $ case moduleItem' of Generate subItems -> GenBlock "" subItems _ -> GenModuleItem moduleItem' + genItemMapper (GenIf _ GenNull GenNull) = return GenNull genItemMapper (GenIf (Number "1") s _) = return s genItemMapper (GenIf (Number "0") _ s) = return s genItemMapper (GenBlock "" [item]) = return item