MG: fixed typo in keyword list

git-svn-id: trunk@425 -
This commit is contained in:
lazarus 2001-11-16 09:01:15 +00:00
parent a277df0d50
commit 996fa0e40e
2 changed files with 2 additions and 1 deletions

View File

@ -414,6 +414,7 @@ begin
+' '+AnException.Message;
end;
end;
WriteDebugReport(true,false,false,false,false);
writeln('### TCodeToolManager.HandleException: '+AnException.Message);
end;
if not FCatchExceptions then raise AnException;

View File

@ -459,7 +459,7 @@ begin
Add('CONST',{$ifdef FPC}@{$endif}AllwaysTrue);
Add('CONSTRUCTOR',{$ifdef FPC}@{$endif}AllwaysTrue);
Add('CONTINUE',{$ifdef FPC}@{$endif}AllwaysTrue);
Add('DESTRCUTOR',{$ifdef FPC}@{$endif}AllwaysTrue);
Add('DESTRUCTOR',{$ifdef FPC}@{$endif}AllwaysTrue);
Add('DIV',{$ifdef FPC}@{$endif}AllwaysTrue);
Add('DO',{$ifdef FPC}@{$endif}AllwaysTrue);
Add('DOWNTO',{$ifdef FPC}@{$endif}AllwaysTrue);