open OUnit2
open Disc3
let test_sanity _ =
assert_equal “abc” (concat “ab” “c”) ~msg:”Custom error message”
let suite =
“student” >::: [
“sanity” >:: test_sanity
]
let _ = run_test_tt_main suite
30 $
File Name: CS计算机代考程序代写_open_OUnit2.zip
File Size: 386.22 KB
open OUnit2
open Disc3
let test_sanity _ =
assert_equal “abc” (concat “ab” “c”) ~msg:”Custom error message”
let suite =
“student” >::: [
“sanity” >:: test_sanity
]
let _ = run_test_tt_main suite
Only logged in customers who have purchased this product may leave a review.
Reviews
There are no reviews yet.