mirror of
https://github.com/anoma/juvix.git
synced 2024-12-13 19:49:20 +03:00
parent
33a0675c99
commit
d2eb020f1f
@ -516,7 +516,8 @@ instance (SingI s) => PrettyCode (Case s) where
|
|||||||
instance (SingI s) => PrettyCode (Lambda s) where
|
instance (SingI s) => PrettyCode (Lambda s) where
|
||||||
ppCode Lambda {..} = do
|
ppCode Lambda {..} = do
|
||||||
lambdaClauses' <- bracesIndent <$> ppPipeBlock _lambdaClauses
|
lambdaClauses' <- bracesIndent <$> ppPipeBlock _lambdaClauses
|
||||||
return $ kwLambda <+> lambdaClauses'
|
lambdaKw' <- ppCode _lambdaKw
|
||||||
|
return $ lambdaKw' <+> lambdaClauses'
|
||||||
|
|
||||||
instance (SingI s) => PrettyCode (FunctionClause s) where
|
instance (SingI s) => PrettyCode (FunctionClause s) where
|
||||||
ppCode FunctionClause {..} = do
|
ppCode FunctionClause {..} = do
|
||||||
|
Loading…
Reference in New Issue
Block a user