paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-03 01:00:34 +02:00
Code Issues Packages Projects Releases Wiki Activity

codetools: clean up

Browse Source 
git-svn-id: trunk@29541 -
This commit is contained in:
mattias 2011-02-13 23:23:10 +00:00
parent 38d6797573
commit 4654e9dfb1
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/codetools/examples/h2pastest.lpr
View File

@ -75,7 +75,7 @@ begin
if Filenames.Count=0 then
Filenames.Add(CleanAndExpandFilename(GetCurrentDir+'/scanexamples/test.h'));
// Step 1: load all input filenames
// Step 1: load all input files
Src:='';
for i:=0 to Filenames.Count-1 do begin
Filename:=Filenames[i];

2
components/codetools/h2pastool.pas
View File

@ -37,13 +37,13 @@
-> $define macroname
#define macroname constant
-> const macroname = constant
simplifies conditional directives (e.g. deletes #ifdef nonexisting)
ToDos:
add comments for skipped items
insert auto generated types in front of current node
c comments
const char a; -> const a: char;
simplify conditional directives (e.g. #ifdef)
#define name value -> alias (const, var, type, proc)
more complex expressions and statements
}