compilation/flap/tests/02-Interpreter/51-match-10.eval.hopix.human-readable

let test =
    match (K (K ("OK"))) {
    | K (x & K (y)) ->
      match (x) {
      | K (z) ->
         print_string ("This test is ");
         print_string (y);
         print_string (".\n")
      }
    }