We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 326f061 commit c672b87Copy full SHA for c672b87
src/Moat/Pretty/Kotlin.hs
@@ -8,7 +8,6 @@ import Data.Functor ((<&>))
8
import Data.List (intercalate)
9
import qualified Data.Map as Map
10
import Data.Maybe (catMaybes, mapMaybe)
11
-import Debug.Trace
12
import Moat.Pretty.Doc.KDoc
13
import Moat.Types
14
@@ -83,13 +82,8 @@ prettyStructFields indents fields deprecatedFields = go fields
83
82
++ ",\n"
84
go [] = ""
85
go (field@(Field fieldName _ _) : fs) =
86
- traceShow deprecatedFieldsMap $
87
- traceShow fieldName $
88
- traceShow fields $
89
- traceShow fs $
90
case Map.lookup fieldName deprecatedFieldsMap of
91
Just mComment ->
92
- traceShow "test" $
93
maybe "" (\comment -> "// " ++ comment ++ "\n") mComment
94
++ "//"
95
++ prettyField field
0 commit comments