Skip to content

Instantly share code, notes, and snippets.

@davidgrenier

davidgrenier/StructuralTyping.fsx

Created August 4, 2013 18:10
Show Gist options
  • Save davidgrenier/6151260 to your computer and use it in GitHub Desktop.
Save davidgrenier/6151260 to your computer and use it in GitHub Desktop.
Download ZIP
StructuralTyping
Raw
StructuralTyping.fsx
let inline itemsProp arg = (^a : (member Items : ItemCollection) arg)
let inline withBackground brush e = (^a : (member set_Background : Brush -> unit) (e, brush))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment