Test comment inside refactoring

haskell · Jan 13, 2021 · decf082 · decf082
1 parent 88852f0
commit decf082
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/test/functional/FunctionalCodeAction.hs b/test/functional/FunctionalCodeAction.hs
@@ -203,7 +203,7 @@ hlintTests = testGroup "hlint suggestions" [
                              , "{-# standalone annotation #-}", ""
                              , "-- standalone comment", ""
                              , "-- | haddock comment"
-                             , "f = {- inline comment -} 1 -- ending comment", ""
+                             , "f = {- inline comment -}{- inline comment inside refactored code -} 1 -- ending comment", ""
                              , "-- final comment"
                              ]
 

diff --git a/test/testdata/hlint/ApplyRefact6.hs b/test/testdata/hlint/ApplyRefact6.hs
@@ -6,6 +6,6 @@ module ApplyRefact6 where
 -- standalone comment
 
 -- | haddock comment
-f = {- inline comment -} (1) -- ending comment
+f = {- inline comment -} ({- inline comment inside refactored code -}1) -- ending comment
 
 -- final comment