Skip to content

Instantly share code, notes, and snippets.

@freshcutdevelopment

freshcutdevelopment/quoteprinter.fs

Created August 8, 2015 19:40
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save freshcutdevelopment/05c5b7581b07cb9dd3d9 to your computer and use it in GitHub Desktop.
Save freshcutdevelopment/05c5b7581b07cb9dd3d9 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
quoteprinter.fs
open System
type quote = {message :string; actor: string;}
[<EntryPoint>]
let main argv =
let quotes = [{message="shaken not stirred"; actor="sean connery"};
{message="i'll be back";actor="terminator"}]
quotes |> List.iter (fun m -> printfn "%s said '%s'" m.actor m.message )
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment