Skip to content

S
sv2v
Commit 8f4e783f by Zachary Snow
Options

remove empty generate loops

parent fcaca6c3
Showing with 2 additions and 0 deletions
src/Convert/ForDecl.hs
......@@ -22,6 +22,8 @@ convert =
)
convertGenItem :: GenItem -> GenItem
convertGenItem (GenFor (True, _, _) _ _ GenNull) = GenNull
convertGenItem (GenFor (True, _, _) _ _ (GenBlock _ [])) = GenNull
convertGenItem (GenFor (True, x, e) a b c) =
GenBlock "" genItems
where
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment