git.iko.soy/rowtype-yoga/purescript-native
on golang help sign in
Remove redundant do
5d1ef18Harry Garrood
src/Language/PureScript/Kinds.hs+1−1
compare with golang
unifiedsplit
@@ -48,7 +48,7 @@ kindFromJSON :: Parse Text Kind
48kindFromJSON = do
48kindFromJSON = do
49 t <- key "tag" asText
49 t <- key "tag" asText
50 case t of
50 case t of
51− "KUnknown" -> do
51+ "KUnknown" ->
52 KUnknown <$> key "contents" (nth 0 asIntegral)
52 KUnknown <$> key "contents" (nth 0 asIntegral)
53 "Star" ->
53 "Star" ->
54 pure kindType
54 pure kindType