blob: c2cfc707e2870c684fa4eb92d09b4d6dd0cfb013 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
--------------------------------------------------------------------------------
module Language.Haskell.Stylish.Step
( Lines
, Step (..)
, makeStep
) where
--------------------------------------------------------------------------------
import Language.Haskell.Stylish.Module
--------------------------------------------------------------------------------
data Step = Step
{ stepName :: String
, stepFilter :: Lines -> Module -> Lines
}
--------------------------------------------------------------------------------
makeStep :: String -> (Lines -> Module -> Lines) -> Step
makeStep = Step
|