git.iko.soy/elk
on master help sign in
get rid of unused imports
commit0e5d29384edd689b7c31c2f8e5b778fd14f2e05f authorEvan Czaplicki <info@elm-lang.org> dateSun 26 Oct 2014, 01:25 (12 years ago) parent9b794d1
2 files changed+9−6
compare with master
unifiedsplit
src/Type/Fragment.hs−1 src/Type/PrettyPrint.hs+9−5
src/Type/Fragment.hs−1
@@ -4,7 +4,6 @@ import qualified Data.List as List
44import qualified Data.Map as Map
55
66import Type.Type
7−import AST.Pattern
87import AST.Annotation (noneNoDocs)
98
109data Fragment = Fragment
src/Type/PrettyPrint.hs+9−5
@@ -1,16 +1,20 @@
1−
21module Type.PrettyPrint where
32
43import Text.PrettyPrint
5−import qualified AST.PrettyPrint as Src
4+
65
76data ParensWhen = Fn | App | Never
87
8+
99class PrettyType a where
10− pretty :: ParensWhen -> a -> Doc
10+ pretty :: ParensWhen -> a -> Doc
11+
1112
1213commaSep :: [Doc] -> Doc
13−commaSep docs = sep (punctuate comma docs)
14+commaSep docs =
15+ sep (punctuate comma docs)
16+
1417
1518parensIf :: Bool -> Doc -> Doc
16−parensIf bool doc = if bool then parens doc else doc
19+parensIf bool doc =
20+ if bool then parens doc else doc