fourmolu-0.2.0.0: data/examples/declaration/class/default-implementations-comments-four-out.hs

module Main where

-- | Baz
class Baz a where
    foobar :: a -> a
    foobar a =
        barbaz (bazbar a)

    -- | Bar baz
    barbaz ::
        a -> a

    -- | Baz bar
    bazbar ::
        a ->
        a

    -- First comment
    barbaz a =
        bazbar -- Middle comment
            a

    -- Last comment
    bazbar a =
        barbaz
            a