diff options
Diffstat (limited to 'testsuite/tests/basic/recvalues.ml')
-rw-r--r-- | testsuite/tests/basic/recvalues.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/testsuite/tests/basic/recvalues.ml b/testsuite/tests/basic/recvalues.ml index c00ced8273..df32f5e702 100644 --- a/testsuite/tests/basic/recvalues.ml +++ b/testsuite/tests/basic/recvalues.ml @@ -8,7 +8,7 @@ let _ = then print_string "Test 1: passed\n" else print_string "Test 1: FAILED\n"; let one = 1 in - let rec y = (one, one+1) :: y in + let rec y = (one, one+1) :: y in if match y with (1,2) :: y' -> y == y' | _ -> false |