module HIndent.Pretty.Combinators.RhsSeparator
( rhsSeparator
) where
import HIndent.Pretty.Combinators.String
import HIndent.Pretty.Types
import HIndent.Printer
rhsSeparator :: GRHSExprType -> Printer ()
rhsSeparator :: GRHSExprType -> Printer ()
rhsSeparator GRHSExprType
GRHSExprNormal = HasCallStack => String -> Printer ()
String -> Printer ()
string String
"="
rhsSeparator GRHSExprType
GRHSExprCase = HasCallStack => String -> Printer ()
String -> Printer ()
string String
"->"
rhsSeparator GRHSExprType
GRHSExprMultiWayIf = HasCallStack => String -> Printer ()
String -> Printer ()
string String
"->"
rhsSeparator GRHSExprType
GRHSExprLambda = HasCallStack => String -> Printer ()
String -> Printer ()
string String
"->"