mirror of
https://github.com/github/semantic.git
synced 2024-11-25 11:04:00 +03:00
Revert "Define a class for projecting out the members of a sum."
This reverts commit b7a93aed3d
.
This commit is contained in:
parent
2572900858
commit
f613113dda
@ -178,8 +178,3 @@ instance {-# OVERLAPPABLE #-}
|
||||
=> Element t (l :+: r) where
|
||||
prj (R1 r) = prj r
|
||||
prj _ = Nothing
|
||||
|
||||
|
||||
class GSum t where
|
||||
type Members t :: (* -> *)
|
||||
gmembers :: t a -> Members t a
|
||||
|
Loading…
Reference in New Issue
Block a user