sleexyz · August 5, 2016 01:33
diff --git a/recordwildcards.hs b/recordwildcards.hs
 {-# LANGUAGE RecordWildCards #-}

 data Person = Person {name :: String, address :: String}

 me = Person {name = "Sean", address = "315 Seigel St"}

 foo :: String
 foo =
  let Person{..} = me
  in
  name ++ " lives in " ++ address
	{-# LANGUAGE RecordWildCards #-}

	data Person = Person {name :: String, address :: String}

	me = Person {name = "Sean", address = "315 Seigel St"}

	foo :: String
	foo =
	let Person{..} = me
	in
	name ++ " lives in " ++ address