
tcfail115.hs:9:24:
    Couldn't match kind `ArgKind' against `(#)'
    Kind incompatibility when matching types:
      t0 :: ArgKind
      (# Int, Int #) :: (#)
    In the expression: (r :: (# Int, Int #))
    In a case alternative: r -> (r :: (# Int, Int #))

tcfail115.hs:12:25:
    The variable `r' cannot have an unboxed tuple type: (# Int, Int #)
    In a case alternative: r -> r
    In the expression: case t x of { r -> r }
    In the expression: \ x -> case t x of { r -> r }
