Skip to content

Instantly share code, notes, and snippets.

@brendanhay

brendanhay/gist:6d576a8bef5ba139af01

Created September 27, 2015 09:25
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save brendanhay/6d576a8bef5ba139af01 to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save brendanhay/6d576a8bef5ba139af01 to your computer and use it in GitHub Desktop.
Download ZIP

Revisions

  1. brendanhay created this gist Sep 27, 2015.
    7 changes: 7 additions & 0 deletions gistfile1.txt
    View file
    Original file line number Diff line number Diff line change
    @@ -0,0 +1,7 @@
    λ: type ExampleResource = "foo" :> "bar" :> Capture "alt" Text :> QueryParam "quote" Bool :> Get '[JSON] Text
    λ: let p = Proxy :: Proxy ExampleResource
    λ: let u = BaseUrl Http
    λ: let u = BaseUrl Http "localhost" 8080
    λ: let example = client p u
    λ: :t example
    example :: Text -> Maybe Bool -> EitherT ServantError IO Text