Sha256: 00d847677bde84d1cbf3119e7bdf38fb9e6c3f706d9d1bdfadca232463d0b308
Contents?: true
Size: 525 Bytes
Versions: 100
Compression:
Stored size: 525 Bytes
Contents
(* Test/exercise version: "1.0.0" *)
open Core
open OUnit2
open Leap
let ae exp got _test_ctxt = assert_equal exp got
let tests = [
"year not divisible by 4: common year" >::
ae false (leap_year 2015);
"year divisible by 4, not divisible by 100: leap year" >::
ae true (leap_year 2016);
"year divisible by 100, not divisible by 400: common year" >::
ae false (leap_year 2100);
"year divisible by 400: leap year" >::
ae true (leap_year 2000);
]
let () =
run_test_tt_main ("leap tests" >::: tests)
Version data entries
100 entries across 100 versions & 1 rubygems