mirror of
https://github.com/ilyakooo0/ormolu.git
synced 2024-10-27 03:28:33 +03:00
18 lines
208 B
Haskell
18 lines
208 B
Haskell
{-# LANGUAGE PatternSynonyms #-}
|
|
|
|
module ExportSyntax ( A(.., NoA), Q(F,..), G(T,..,U)) where
|
|
|
|
data A = A | B
|
|
|
|
pattern NoA = B
|
|
|
|
data Q a = Q a
|
|
|
|
pattern F a = Q a
|
|
|
|
data G = G | H
|
|
|
|
pattern T = G
|
|
|
|
pattern U = H
|