foo = Foo
  { foo =
    -- Blah blah
    case x of
      Blah -> 1
      Blim -> 2
  }