Skip to content

Instantly share code, notes, and snippets.

@vivainio
Last active December 5, 2016 21:55
Show Gist options
  • Select an option

  • Save vivainio/006f5a47de1856f6ab5f01707af90763 to your computer and use it in GitHub Desktop.

Select an option

Save vivainio/006f5a47de1856f6ab5f01707af90763 to your computer and use it in GitHub Desktop.
open FSharp.Data
open System.IO
type provider = XmlProvider<"./sample.xml">
[<EntryPoint>]
let main argv =
let path = @"C:\blah.csproj"
let f = File.ReadAllText path
let data = provider.Parse f
let refs = data.ItemGroups |> Array.collect (fun ig -> ig.References) |> Array.map (fun r -> r.Include)
0 // return an integer exit code
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment