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

Fix some more spelling errors.

Browse Source 
git-svn-id: trunk@52490 -
This commit is contained in:
bart 2016-06-12 16:32:39 +00:00
parent 2a41a0e2f4
commit e12b65390b
6 changed files with 11 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/codetools/finddeclarationtool.pas
View File

@ -3514,7 +3514,7 @@ function TFindDeclarationTool.FindIdentifierInContext(
Params: TFindDeclarationParams; var IdentFoundResult: TIdentifierFoundResult Params: TFindDeclarationParams; var IdentFoundResult: TIdentifierFoundResult
): boolean; ): boolean;
{ searches an identifier in context node { searches an identifier in context node
It does not care about code in front of the identifier like 'a.Identifer'. It does not care about code in front of the identifier like 'a.Identifier'.
Params: Params:
Identifier Identifier

6
components/codetools/ide/codyidentifiersdlg.pas
View File

@ -233,7 +233,7 @@ type
TQuickFixIdentifierNotFoundShowDictionary = class(TMsgQuickFix) TQuickFixIdentifierNotFoundShowDictionary = class(TMsgQuickFix)
public public
function IsApplicable(Msg: TMessageLine; out Identifer: string): boolean; function IsApplicable(Msg: TMessageLine; out Identifier: string): boolean;
procedure CreateMenuItems(Fixes: TMsgQuickFixes); override; procedure CreateMenuItems(Fixes: TMsgQuickFixes); override;
procedure QuickFix({%H-}Fixes: TMsgQuickFixes; Msg: TMessageLine); override; procedure QuickFix({%H-}Fixes: TMsgQuickFixes; Msg: TMessageLine); override;
end; end;
@ -367,11 +367,11 @@ end;
{ TQuickFixIdentifierNotFoundShowDictionary } { TQuickFixIdentifierNotFoundShowDictionary }
function TQuickFixIdentifierNotFoundShowDictionary.IsApplicable( function TQuickFixIdentifierNotFoundShowDictionary.IsApplicable(
Msg: TMessageLine; out Identifer: string): boolean; Msg: TMessageLine; out Identifier: string): boolean;
var var
Dummy: string; Dummy: string;
begin begin
Result:=IDEFPCParser.MsgLineIsId(Msg,5000,Identifer,Dummy); Result:=IDEFPCParser.MsgLineIsId(Msg,5000,Identifier,Dummy);
end; end;
procedure TQuickFixIdentifierNotFoundShowDictionary.CreateMenuItems( procedure TQuickFixIdentifierNotFoundShowDictionary.CreateMenuItems(

2
components/debuggerintf/dbgintfdebuggerbase.pp
View File

@ -1889,7 +1889,7 @@ type
property OnCurrent: TDBGCurrentLineEvent read FOnCurrent write FOnCurrent; // Passes info about the current line being debugged property OnCurrent: TDBGCurrentLineEvent read FOnCurrent write FOnCurrent; // Passes info about the current line being debugged
property OnDbgOutput: TDBGOutputEvent read FOnDbgOutput write FOnDbgOutput; // Passes all debuggeroutput property OnDbgOutput: TDBGOutputEvent read FOnDbgOutput write FOnDbgOutput; // Passes all debuggeroutput
property OnDbgEvent: TDBGEventNotify read FOnDbgEvent write FOnDbgEvent; // Passes recognized debugger events, like library load or unload property OnDbgEvent: TDBGEventNotify read FOnDbgEvent write FOnDbgEvent; // Passes recognized debugger events, like library load or unload
property OnException: TDBGExceptionEvent read FOnException write FOnException; // Fires when the debugger received an exeption property OnException: TDBGExceptionEvent read FOnException write FOnException; // Fires when the debugger received an ecxeption
property OnOutput: TDBGOutputEvent read FOnOutput write FOnOutput; // Passes all output of the debugged target property OnOutput: TDBGOutputEvent read FOnOutput write FOnOutput; // Passes all output of the debugged target
property OnBeforeState: TDebuggerStateChangedEvent read FOnBeforeState write FOnBeforeState; // Fires when the current state of the debugger changes property OnBeforeState: TDebuggerStateChangedEvent read FOnBeforeState write FOnBeforeState; // Fires when the current state of the debugger changes
property OnState: TDebuggerStateChangedEvent read FOnState write FOnState; // Fires when the current state of the debugger changes property OnState: TDebuggerStateChangedEvent read FOnState write FOnState; // Fires when the current state of the debugger changes

2
components/fpdebug/fpdbgdisasx86.pp
View File

@ -378,7 +378,7 @@ var
begin begin
case Mode of case Mode of
0: begin 0: begin
if rm = 6 // disp16 -> exeption to the regs if rm = 6 // disp16 -> exception to the regs
then AddOperand('%s', ASize, 2, [hvfSigned, hvfIncludeHexchar], [ofMemory]) then AddOperand('%s', ASize, 2, [hvfSigned, hvfIncludeHexchar], [ofMemory])
else AddOperand(REGS16[rm], ASize, 0, [], [ofMemory]); else AddOperand(REGS16[rm], ASize, 0, [], [ofMemory]);
end; end;

8
components/fpdebug/fppascalparser.pas
View File

@ -2255,8 +2255,8 @@ begin
// BinaryOperator... // BinaryOperator...
// foo // foo
// Identifer // Identifier
// "Identifer" can hane a binary-op next. But it must be applied to the parent. // "Identifier" can hane a binary-op next. But it must be applied to the parent.
// So it is not valid here. // So it is not valid here.
// If new operator has a higher precedence, it go down to the child again and replace it // If new operator has a higher precedence, it go down to the child again and replace it
if (APrevPart.Parent <> nil) and (APrevPart.Parent.HasPrecedence) then if (APrevPart.Parent <> nil) and (APrevPart.Parent.HasPrecedence) then
@ -2403,8 +2403,8 @@ begin
// BinaryOperator... // BinaryOperator...
// foo // foo
// Identifer // Identifier
// "Identifer" can hane a binary-op next. But it must be applied to the parent. // "Identifier" can hane a binary-op next. But it must be applied to the parent.
// So it is not valid here. // So it is not valid here.
// If new operator has a higher precedence, it go down to the child again and replace it // If new operator has a higher precedence, it go down to the child again and replace it
if (APrevPart.Parent <> nil) and (APrevPart.Parent is TFpPascalExpressionPartOperator) then if (APrevPart.Parent <> nil) and (APrevPart.Parent is TFpPascalExpressionPartOperator) then

2
components/synedit/synregexpr.pas
View File

@ -554,7 +554,7 @@ const
function ExecRegExpr (const ARegExpr, AInputStr : RegExprString) : boolean; function ExecRegExpr (const ARegExpr, AInputStr : RegExprString) : boolean;
// true if string AInputString match regular expression ARegExpr // true if string AInputString match regular expression ARegExpr
// ! will raise exeption if syntax errors in ARegExpr // ! will raise exception if syntax errors in ARegExpr
procedure SplitRegExpr (const ARegExpr, AInputStr : RegExprString; APieces : TStrings); procedure SplitRegExpr (const ARegExpr, AInputStr : RegExprString; APieces : TStrings);
// Split AInputStr into APieces by r.e. ARegExpr occurencies // Split AInputStr into APieces by r.e. ARegExpr occurencies