github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-11-28 01:47:01 +03:00
Code Issues Projects Releases Wiki Activity

🚮GMarshalJSON instance

Browse Source
This commit is contained in:
Ayman Nadeem 2020-01-21 16:38:11 -05:00
parent f839e79ac1
commit 41a1bf1d4c
1 changed files with 0 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
semantic-ast/src/Marshal/JSON.hs
View File

@ -29,8 +29,6 @@ class MarshalJSON t where
default fields :: ( Generic1 t, GFields (Rep1 t), ToJSON a) => [(Text, Value)] -> t a -> [(Text, Value)]
fields acc = gfields acc . from1
-- Create MarshalJSON instances for each type constructor
instance (GMarshalJSON (Rep1 t), Generic1 t) => MarshalJSON t
-- Create MarshalJSON instances for each type constructor
instance (GFields (Rep1 t), Generic1 t) => MarshalJSON t