anchor.diff:      let expected = "Name: John Doe, IsVip: true, BirthDate: 1990-04-20, Balance: 150000.50, LoyaltyPoints: 137"
   
       let result =
  -        (endAction, ctx)
  -        ||> app
  +        app (Some >> async.Return) ctx
           |> Async.RunSynchronously
   
       match result with
  
positive.code:     ctx.Response.Body.Position <- 0L
      use reader = new StreamReader(ctx.Response.Body, Encoding.UTF8)
      reader.ReadToEnd()
  
  let endAction : HttpAction = Some >> async.Return
  
  [<CLIMutable>]
  type ModelWithOption =
  
negative.code:     let expected = "Name: John Doe, IsVip: true, BirthDate: 1990-04-20, Balance: 150000.50, LoyaltyPoints: 137"
  
      let result =
          app (Some >> async.Return) ctx
          |> Async.RunSynchronously
  
      match result with
  