(executable
 (name print)
 (modules print))

(rule
 (with-stdout-to print.ml
  (echo "let () = print_endline \"MESSAGE\"")))

(rule
 (alias runtest)
 (action
  (progn
   (with-stdout-to output.expected (echo "MESSAGE\n"))
   (with-stdout-to output.actual (run ./print.exe))
   (diff? output.expected output.actual))))