Template Haskell for generating ToJSON and FromJSON instances for GADTs - View it on GitHub