Skip to content

Instantly share code, notes, and snippets.

View alexbiehl's full-sized avatar

Alexander Biehl alexbiehl

  • Freelancer
  • Hamburg, Germany
View GitHub Profile
@aaronlevin
aaronlevin / 01-simplest-thing-that-works.hs
Last active August 30, 2019 02:49
Proxy Serialization Post
{-# LANGUAGE OverloadedStrings #-}
module SimpleThings where
import Control.Applicative ((<$>), (<*>))
import Control.Monad (mzero)
import Data.Aeson
import qualified Data.Aeson as A
-- | sum type containing all possible payloads