From a4a2544f25830ddb1f362c536c3240101dc5a9eb Mon Sep 17 00:00:00 2001 From: Hiroki Tokunaga Date: Sun, 2 Feb 2025 12:48:39 +0900 Subject: [PATCH] wip --- src/HIndent/Ast/NodeComments.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/HIndent/Ast/NodeComments.hs b/src/HIndent/Ast/NodeComments.hs index 19aa60c21..b945fbd8e 100644 --- a/src/HIndent/Ast/NodeComments.hs +++ b/src/HIndent/Ast/NodeComments.hs @@ -43,7 +43,7 @@ fromEpAnn' GHC.EpAnn {..} = NodeComments {..} commentsAfter = filter (not . isCommentOnSameLine) $ GHC.getFollowingComments comments isCommentOnSameLine (GHC.L comAnn _) = - GHC.srcSpanEndLine (GHC.anchor entry) + GHC.srcSpanEndLine (GHC.al_anchor entry) == GHC.srcSpanStartLine (GHC.al_anchor comAnn) #else fromEpAnn' GHC.EpAnn {..} = NodeComments {..}