[SOLVED] Code clean up at utils/h2pas/scan.pas procedure writetree

Forum > FPC development

(1/1)

lagprogramming:
utils/h2pas/scan.pas has procedure writetree(p: presobject);
This procedure has a useless variable declaration: "i : integer;".
Here is a patch:

--- Code: Pascal [+][-]window.onload = function(){var x1 = document.getElementById("main_content_section"); if (x1) { var x = document.getElementsByClassName("geshi");for (var i = 0; i < x.length; i++) { x[i].style.maxHeight='none'; x[i].style.height = Math.min(x[i].clientHeight+15,306)+'px'; x[i].style.resize = "vertical";}};} ---diff --git a/utils/h2pas/scan.pas b/utils/h2pas/scan.pasindex 957bf65f31..fcbc2ba6ff 100644--- a/utils/h2pas/scan.pas+++ b/utils/h2pas/scan.pas@@ -257,7 +257,6 @@ procedure writetree(p: presobject); var- i : integer; localp: presobject; localp1: presobject; currentlevel : integer;

marcov:
scan.pas is generated from scan.l.

But anyway, I did it.

AlexTP:
Too micro fix for my taste. my ATSynEdit has several such issues with vars.

Navigation

[0] Message Index