srecord ExpectedAndActual<A>(A expected, A actual) {
  toString { ret expected + " vs " + actual; }
}