From aa4348908503da271484def8a17037c43e3095b5 Mon Sep 17 00:00:00 2001
From: Mischa POSLAWSKY <perl@shiar.org>
Date: Sat, 7 Sep 2019 00:52:43 +0200
Subject: [PATCH] graph length rounded to nearest integer

Even distribution, and fixes unexpected overflows due to inexact float
representation after size calculation (round decimals being decremented).
---
 graph | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/graph b/graph
index ea17d45..1a70964 100755
--- a/graph
+++ b/graph
@@ -123,7 +123,7 @@ while ($nr <= $#lines) {
 	}
 	my $line = $lines[$nr] =~ s/\n/$val/r;
 	printf '%-*s', $len + length($val), $line;
-	print $barmark[$_] // '-' for 1 .. $size && (($values[$nr] || 0) - $minval) * $size;
+	print $barmark[$_] // '-' for 1 .. $size && (($values[$nr] || 0) - $minval) * $size + .5;
 	say '';
 	$nr++;
 }
-- 
2.30.0