Fix: match type applications

Maybe SomeType now matches.

Example:

data AddressType = AddressType
        { name :: Maybe XMLString
        , address :: XMLString
        , city :: XMLString
        , region :: XMLString
        , postalCode :: XMLString
        , country :: XMLString}