calcrom: pad section size to word

2019-11-06 19:00:01 -05:00
parent 4cad26157e
commit 44109583d8
1 changed files with 4 additions and 0 deletions
@@ -18,6 +18,10 @@ while (my $line = <$file>)
        my $section = $1;
        my $size = hex($2);
        my $dir = $3;
+        if ($size & 3)
+        {
+            $size += 4 - ($size % 3);
+        }

        if ($section =~ /text/)
        {