File tree Expand file tree Collapse file tree 2 files changed +2
-2
lines changed
test/ppx_deriving_qcheck/deriver Expand file tree Collapse file tree 2 files changed +2
-2
lines changed Original file line number Diff line number Diff line change @@ -813,7 +813,7 @@ let test_recursive_poly_variant () =
813813 *)
814814 let ocaml_release =
815815 Scanf. sscanf Sys. ocaml_version " %i.%i" (fun major minor -> (major,minor)) in
816- if ocaml_release < (5 ,1 )
816+ if ocaml_release < = (5 ,1 )
817817 then ()
818818 else check_eq ~expected ~actual " deriving recursive polymorphic variants"
819819
Original file line number Diff line number Diff line change @@ -725,7 +725,7 @@ let test_recursive_poly_variant () =
725725 *)
726726 let ocaml_release =
727727 Scanf. sscanf Sys. ocaml_version " %i.%i" (fun major minor -> (major,minor)) in
728- if ocaml_release < (5 ,1 )
728+ if ocaml_release < = (5 ,1 )
729729 then ()
730730 else check_eq ~expected ~actual " deriving recursive polymorphic variants"
731731
You can’t perform that action at this time.
0 commit comments