Permit pattern matching on records in case-expressions.
Cosmetic changes