cosmetic: use better style in a do block
commit22bd40534e37736e9f58f023c3321a1f2cc4fdd8
authorEvan Czaplicki <info@elm-lang.org>
dateMon 17 Feb 2014, 17:55 (13 years ago)
parentfd74685
compiler/Parse/Helpers.hs+2−1
@@ -169,7 +169,8 @@ betwixt a b c = do char a ; out <- c
169169 char b <?> "closing '" ++ [b] ++ "'" ; return out
170170
171171surround a z name p = do
172− char a ; v <- padded p
172+ char a
173+ v <- padded p
173174 char z <?> unwords ["closing", name, show z]
174175 return v
175176