diff options
Diffstat (limited to 'testsuite/tests/lib-marshal/intext.ml')
| -rw-r--r-- | testsuite/tests/lib-marshal/intext.ml | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/testsuite/tests/lib-marshal/intext.ml b/testsuite/tests/lib-marshal/intext.ml index e2805c652b..41f24bb654 100644 --- a/testsuite/tests/lib-marshal/intext.ml +++ b/testsuite/tests/lib-marshal/intext.ml @@ -544,7 +544,8 @@ let test_mutual_rec_regression () = let g () = () in let f q = if test_list q then g () in - test 700 (try ignore (Marshal.to_string f [Marshal.Closures]); true with _ -> false) + test 700 (try ignore (Marshal.to_string f [Marshal.Closures]); true + with _ -> false) let main() = if Array.length Sys.argv <= 2 then begin |