Commit 5fb4faa1 authored by Andrei Paskevich's avatar Andrei Paskevich

fix examples/bts12244.ml

parent 15ea5190
......@@ -80,9 +80,9 @@ let sum_inline = task_checksum task_inline
let sum_split = task_checksum task_split
let () = printf "@[task == task_inline ? %b same checksums ? %b@]@."
(task == task_inline) (sum = sum_inline)
(Task.task_equal task task_inline) (sum = sum_inline)
let () = printf "@[task == task_split ? %b same checksums ? %b@]@."
(task == task_split) (sum = sum_split)
(Task.task_equal task task_split) (sum = sum_split)
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment