mirror of
https://github.com/github/semantic.git
synced 2024-12-25 16:02:43 +03:00
And switch over to RepositoryPush too.
This commit is contained in:
parent
eb41ab89d1
commit
a69d420aee
@ -14,7 +14,7 @@ import Proto3.Suite
|
|||||||
-- a separate data type for each of these wrappers: we just need to declare 'Named' instances for each instance
|
-- a separate data type for each of these wrappers: we just need to declare 'Named' instances for each instance
|
||||||
-- for which we want to link the Google-named wrapped types.
|
-- for which we want to link the Google-named wrapped types.
|
||||||
newtype Wrapped a = Wrapped { value :: a }
|
newtype Wrapped a = Wrapped { value :: a }
|
||||||
deriving (Eq, Show, Generic, NFData)
|
deriving (Eq, Show, Ord, Generic, NFData)
|
||||||
|
|
||||||
instance Named (Wrapped Text) where nameOf _ = "StringValue"
|
instance Named (Wrapped Text) where nameOf _ = "StringValue"
|
||||||
instance Named (Wrapped ByteString) where nameOf _ = "BytesValue"
|
instance Named (Wrapped ByteString) where nameOf _ = "BytesValue"
|
||||||
|
Loading…
Reference in New Issue
Block a user