* Removed unused variables

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2354 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
loesje_
2012-03-19 13:45:20 +00:00
parent 3d88234802
commit ffbc7d0761

View File

@ -158,7 +158,6 @@ type TParseState = (psBegin,
var
PriorState: TParseState;
ParseState: TParseState;
LineNr: integer;
IDLString: string;
pCurrent: pchar;
AWord: string;
@ -192,8 +191,6 @@ var
end;
function CheckStartWord(ASetParseState, ASetPriorParseState: TParseState; AllowMinus: boolean = false): boolean;
var
c: char;
begin
result := false;
wordchars:=['a'..'z','A'..'Z','0'..'9','_'];