Forum > FPC development

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


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;

scan.pas is generated from scan.l.

But anyway, I did it.

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


[0] Message Index

Go to full version