diff --git a/src/Juvix/Compiler/Concrete/Pretty/Base.hs b/src/Juvix/Compiler/Concrete/Pretty/Base.hs
index 8ca186ef8..8c253c21f 100644
--- a/src/Juvix/Compiler/Concrete/Pretty/Base.hs
+++ b/src/Juvix/Compiler/Concrete/Pretty/Base.hs
@@ -516,7 +516,8 @@ instance (SingI s) => PrettyCode (Case s) where
 instance (SingI s) => PrettyCode (Lambda s) where
   ppCode Lambda {..} = do
     lambdaClauses' <- bracesIndent <$> ppPipeBlock _lambdaClauses
-    return $ kwLambda <+> lambdaClauses'
+    lambdaKw' <- ppCode _lambdaKw
+    return $ lambdaKw' <+> lambdaClauses'
 
 instance (SingI s) => PrettyCode (FunctionClause s) where
   ppCode FunctionClause {..} = do