paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-14 10:29:24 +02:00
Code Issues Packages Projects Releases Wiki Activity

* @ is now required for FPC for procedure address passing in functions

Browse Source
This commit is contained in:
pierre 1999-06-02 11:19:13 +00:00
parent 0b7957291d
commit 0b95d5840c
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
ide/text/fpviews.pas
View File

@ -2583,7 +2583,7 @@ begin
with MI do with MI do
if (Attributes and vesa_vma_GraphicsMode)=0 then if (Attributes and vesa_vma_GraphicsMode)=0 then
RegisterVideoMode(XResolution,YResolution, RegisterVideoMode(XResolution,YResolution,
(Attributes and vesa_vma_ColorMode)<>0,VESASetVideoModeProc,ML.Modes[I]); (Attributes and vesa_vma_ColorMode)<>0,{$ifdef FPC}@{$endif}VESASetVideoModeProc,ML.Modes[I]);
end; end;
end; end;
{$endif} {$endif}
@ -2607,7 +2607,10 @@ end;
END. END.
{ {
$Log$ $Log$
Revision 1.30 1999-05-22 13:44:33 peter Revision 1.31 1999-06-02 11:19:13 pierre
* @ is now required for FPC for procedure address passing in functions
Revision 1.30 1999/05/22 13:44:33 peter
* fixed couple of bugs * fixed couple of bugs
Revision 1.29 1999/04/15 08:58:08 peter Revision 1.29 1999/04/15 08:58:08 peter