diff --git a/p19/lib/date.ml b/p19/lib/date.ml index e0ccd19..15c7b71 100644 --- a/p19/lib/date.ml +++ b/p19/lib/date.ml @@ -1,5 +1,4 @@ let is_leap year = (year mod 4 = 0 && year mod 100 <> 0) || year mod 400 = 0 - let%test "is_leap for leap year 2000" = is_leap 2000 = true let%test "is_leap for leap year 2020" = is_leap 2020 = true let%test "is_leap for non-leap year 1900" = is_leap 1900 = false diff --git a/p19/lib/dune b/p19/lib/dune index a21146d..c9871fb 100644 --- a/p19/lib/dune +++ b/p19/lib/dune @@ -4,4 +4,4 @@ (inline_tests (flags (-verbose))) (preprocess - (pps ppx_inline_test))) \ No newline at end of file + (pps ppx_inline_test)))