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

fixed typos: commited

Browse Source 
git-svn-id: trunk@29442 -
This commit is contained in:
mattias 2011-02-10 09:38:08 +00:00
parent 78a626bf15
commit cfd767ecf2
2 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
components/synedit/synedittexttrimmer.pas
View File

@ -844,7 +844,7 @@ begin
if (LenNS < LogX - 1) and not IsSpaces then if (LenNS < LogX - 1) and not IsSpaces then
LenNs := LogX - 1; LenNs := LogX - 1;
// Trim any existing (commited/real) spaces // skip if we append none-spaces // Trim any existing (committed/real) spaces // skip if we append none-spaces
if (LenNS < Len) and (IsSpaces or (LogX <= len)) then if (LenNS < Len) and (IsSpaces or (LogX <= len)) then
begin begin
EditMoveToTrim(LogY, Len - LenNS); EditMoveToTrim(LogY, Len - LenNS);
@ -913,7 +913,7 @@ begin
end; end;
UpdateLineText(LogY); UpdateLineText(LogY);
// Trim any existing (commited/real) spaces // Trim any existing (committed/real) spaces
t := fSynStrings[LogY - 1]; t := fSynStrings[LogY - 1];
EditMoveToTrim(LogY, length(t) - LastNoneSpacePos(t)); EditMoveToTrim(LogY, length(t) - LastNoneSpacePos(t));
@ -947,7 +947,7 @@ begin
end; end;
UpdateLineText(LogY + 1); UpdateLineText(LogY + 1);
EditInsertTrim(1, LogY + 1, s); EditInsertTrim(1, LogY + 1, s);
// Trim any existing (commited/real) spaces // Trim any existing (committed/real) spaces
s := fSynStrings[LogY - 1]; s := fSynStrings[LogY - 1];
EditMoveToTrim(LogY, length(s) - LastNoneSpacePos(s)); EditMoveToTrim(LogY, length(s) - LastNoneSpacePos(s));
s := fSynStrings[LogY]; s := fSynStrings[LogY];
@ -976,7 +976,7 @@ begin
UpdateLineText(LogY); UpdateLineText(LogY);
EditInsertTrim(1, LogY, s); EditInsertTrim(1, LogY, s);
// Trim any existing (commited/real) spaces // Trim any existing (committed/real) spaces
s := fSynStrings[LogY - 1]; s := fSynStrings[LogY - 1];
EditMoveToTrim(LogY, length(s) - LastNoneSpacePos(s)); EditMoveToTrim(LogY, length(s) - LastNoneSpacePos(s));
end; end;

4
ide/outputfilter.pas
View File

@ -889,7 +889,7 @@ var i, j, FilenameEndPos: integer;
Size of initialized data: 519168 bytes Size of initialized data: 519168 bytes
Size of uninitialized data: 83968 bytes Size of uninitialized data: 83968 bytes
Stack space reserved: 262144 bytes Stack space reserved: 262144 bytes
Stack space commited: 4096 bytes Stack space committed: 4096 bytes
} }
function CheckForExecutableInfo(p: integer): boolean; function CheckForExecutableInfo(p: integer): boolean;
var var
@ -901,7 +901,7 @@ var i, j, FilenameEndPos: integer;
CheckForString(s,p,'Size of initialized data: ') or CheckForString(s,p,'Size of initialized data: ') or
CheckForString(s,p,'Size of uninitialized data: ') or CheckForString(s,p,'Size of uninitialized data: ') or
CheckForString(s,p,'Stack space reserved: ') or CheckForString(s,p,'Stack space reserved: ') or
CheckForString(s,p,'Stack space commited: ') or // message contains typo CheckForString(s,p,'Stack space committed: ') or // message contains typo
CheckForString(s,p,'Stack space committed: ')) then exit; CheckForString(s,p,'Stack space committed: ')) then exit;
if not CheckForNumber(s,p) then exit; if not CheckForNumber(s,p) then exit;
if not CheckForString(s,p,' bytes') then exit; if not CheckForString(s,p,' bytes') then exit;