A functionalist approach to shame and guilt.