paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-15 14:19:28 +02:00
Code Issues Packages Projects Releases Wiki Activity

* changed -1 to sw_word(-1) for textend to compile with 1.1

Browse Source
This commit is contained in:
armin 2003-03-28 09:52:03 +00:00
parent b91f0f1f32
commit 4fba6898d0
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
ide/whtmlhlp.pas
View File

@ -931,7 +931,7 @@ begin
if Entered then
begin
if assigned(CurrentTable^.LastLine) and Assigned(CurrentTable^.LastLine^.LastEl) and
(CurrentTable^.LastLine^.LastEl^.TextEnd=-1) then
(CurrentTable^.LastLine^.LastEl^.TextEnd=sw_word(-1)) then
begin
NewEl:=CurrentTable^.LastLine^.LastEl;
NewEl^.TextEnd:=TextPtr;
@ -942,7 +942,7 @@ begin
New(NewEl,Init(PAlignEl));
CurrentTable^.AddElement(NewEl);
NewEl^.TextBegin:=TextPtr;
NewEl^.TextEnd:=-1;
NewEl^.TextEnd:=sw_word(-1);
{ AddText(' - ');}
end
else
@ -1267,7 +1267,10 @@ end;
END.
{
$Log$
Revision 1.7 2003-03-27 14:37:52 pierre
Revision 1.8 2003-03-28 09:52:03 armin
* changed -1 to sw_word(-1) for textend to compile with 1.1
Revision 1.7 2003/03/27 14:37:52 pierre
* try to enhance dispaly of new html docs
Revision 1.6 2002/09/07 15:40:49 peter