ocaml-ounit/ounit-strict-formats.diff

32 lines
1.6 KiB
Diff

http://forge.ocamlcore.org/tracker/index.php?func=detail&aid=1422&group_id=162&atid=732
diff -r -u ounit.2.0.0.orig/src/oUnitLoggerHTML.ml ounit.2.0.0/src/oUnitLoggerHTML.ml
--- ounit.2.0.0.orig/src/oUnitLoggerHTML.ml 2013-09-30 02:22:18.000000000 +0200
+++ ounit.2.0.0/src/oUnitLoggerHTML.ml 2014-09-03 00:29:39.000000000 +0200
@@ -198,22 +198,22 @@
<div class='ounit-test %s'>
<h2>%s (%s)</h2>
<div class='ounit-started-at'>Started at: %s</div>
- <div class='ounit-duration'>Test duration: %0.3fs</div>
+ <div class='ounit-duration'>Test duration: %.3fs</div>
<div class='ounit-log'>\n"
class_result
(html_escaper test_data.test_name)
(html_escaper text_result)
(date_iso8601 test_data.timestamp_start)
(test_data.timestamp_end -. test_data.timestamp_start);
- printf "<span class='ounit-timestamp'>%0.3fs</span>Start<br/>\n"
+ printf "<span class='ounit-timestamp'>%.3fs</span>Start<br/>\n"
0.0;
List.iter (fun (tmstp, svrt, str) ->
printf "\
<span class='%s'>
- <span class='ounit-timestamp'>%0.3fs</span>%s</span><br/>\n"
+ <span class='ounit-timestamp'>%.3fs</span>%s</span><br/>\n"
(class_severity_opt svrt) tmstp (html_escaper str))
test_data.log_entries;
- printf "<span class='ounit-timestamp'>%0.3fs</span>End<br/>\n"
+ printf "<span class='ounit-timestamp'>%.3fs</span>End<br/>\n"
(test_data.timestamp_end -. test_data.timestamp_start);
printf "<div class='ounit-result'>";
begin