add tests/todo/RecordAccessors.hs