namespace BlueprintBaseName._1.Tests open Xunit open Amazon.Lambda.TestUtilities open Amazon.Lambda.APIGatewayEvents open System.IO open Newtonsoft.Json open BlueprintBaseName._1 module ValuesControllerTests = [] let ``Request HTTP Get at /``() = async { let lambdaFunction = LambdaEntryPoint() let requestStr = File.ReadAllText("./SampleRequests/ValuesController-Get.json") let request = JsonConvert.DeserializeObject(requestStr) let context = TestLambdaContext() let! response = lambdaFunction.FunctionHandlerAsync(request, context) |> Async.AwaitTask Assert.Equal(200, response.StatusCode) Assert.Equal("""["value1","value2"]""", response.Body) Assert.True(response.MultiValueHeaders.ContainsKey("Content-Type")) Assert.Equal("application/json; charset=utf-8", response.MultiValueHeaders.Item("Content-Type").[0]) }