F# Deserialize

main.fs

open System.Net.Http
open System.Net.Http.Formatting
open Newtonsoft;

// Learn more about F# at http://fsharp.net
// See the 'F# Tutorial' project for more help.
[<CLIMutable>]
type Movie = {
    ID : int;
    Name : string }

let getMovies () =
    let client = new HttpClient()
    async {
        let! response = client.GetAsync("http://nlglff.org/api/films") |> Async.AwaitTask
        response.EnsureSuccessStatusCode () |> ignore
        // has to be done in two steps
        // for some reason ReadAsAsync doesn't deserialize correctly.
        let! content = response.Content.ReadAsStringAsync() |> Async.AwaitTask        
        let result = Json.JsonConvert.DeserializeObject<Movie list>(content)
        return result
    }

[<EntryPoint>]
let main argv = 
    let movies = Async.RunSynchronously <| getMovies ()
    //printfn "%s" movies
    movies |> List.iter (fun m -> printfn "Name: %s; ID: %i" m.Name m.ID)
    0 // return an integer exit code