mirror of
https://github.com/github/semantic.git
synced 2024-12-25 16:02:43 +03:00
Spacing.
This commit is contained in:
parent
da227888ce
commit
3051c8cace
@ -19,6 +19,7 @@ instance (Element' side sub sup, side ~ Find sub sup) => Element sub sup where
|
||||
pattern Prj :: Element sub sup => sub a -> sup a
|
||||
pattern Prj sub <- (prj -> Just sub)
|
||||
|
||||
|
||||
data Side = None | Here | L | R
|
||||
|
||||
type family Find sub sup :: Side where
|
||||
|
Loading…
Reference in New Issue
Block a user