stylish

soulomoon · soulomoon · commit acaa7ba831e2 · 2024-06-29T01:23:13.000+08:00
diff --git a/ghcide/src/Development/IDE/Core/ProgressReporting.hs b/ghcide/src/Development/IDE/Core/ProgressReporting.hs
@@ -62,7 +62,6 @@ data ProgressReporting m = ProgressReporting
     progressReportingInner :: ProgressReportingNoTrace m
   }
 
-
 class ProgressReportingClass a where
     type M a :: * -> *
     progressUpdate ::  a -> ProgressEvent -> M a ()
@@ -136,7 +135,6 @@ data InProgressState
         currentVar :: STM.Map NormalizedFilePath Int
       }
 
-
 newInProgress :: IO InProgressState
 newInProgress = InProgressState <$> newTVarIO 0 <*> newTVarIO 0 <*> STM.newIO
 

Original file line number	Diff line number	Diff line change
`@@ -62,7 +62,6 @@ data ProgressReporting m = ProgressReporting`
`62`	`62`	`progressReportingInner :: ProgressReportingNoTrace m`
`63`	`63`	`}`
`64`	`64`
`65`		`-`
`66`	`65`	`class ProgressReportingClass a where`
`67`	`66`	`type M a :: * -> *`
`68`	`67`	`progressUpdate :: a -> ProgressEvent -> M a ()`
`@@ -136,7 +135,6 @@ data InProgressState`
`136`	`135`	`currentVar :: STM.Map NormalizedFilePath Int`
`137`	`136`	`}`
`138`	`137`
`139`		`-`
`140`	`138`	`newInProgress :: IO InProgressState`
`141`	`139`	`newInProgress = InProgressState <$> newTVarIO 0 <> newTVarIO 0 <> STM.newIO`
`142`	`140`