tibtoa: Fixed while condition

1 files changed, 1 insertions, 1 deletions

diff --git a/bin/tibtoa b/bin/tibtoa
index 2837880..cdf5bdb 100755
--- a/bin/tibtoa
+++ b/bin/tibtoa
@@ -629,7 +629,7 @@ substr($program, -$footer, $footer, '');
 $length = length($program);
 $offset = 0;
 
-while($offset <= $length) {
+while($offset < $length) {
 	$char = ord(substr($program, $offset++, 1));
 	if (exists($all{$char})) {
 		$out = $all{$char};