Browse files

fix benchmark result display

  • Loading branch information...
1 parent 0ef5822 commit e2349bfa51ef2627468b9968da900ba7f90fd2c8 @galdor galdor committed Oct 5, 2011
Showing with 1 addition and 1 deletion.
  1. +1 −1 examples/official-benchmarks.lisp
2 examples/official-benchmarks.lisp
@@ -21,7 +21,7 @@
(format t "message size: ~A [B]~%" message-size)
(format t "message count: ~A ~%" message-count)
(format t "mean throughput ~A [msg/s]~%" (round throughput))
- (format t "mean throughput ~A [Mb/s]~%" (round megabits))))))))
+ (format t "mean throughput ~,3F [Mb/s]~%" (round megabits))))))))
(defun remote-thr (address message-size message-count)
(zmq:with-context (context 1)

0 comments on commit e2349bf

Please sign in to comment.