[fpc-pascal]Inline procedure

[Jonas Maebe]

On woensdag, januari 30, 2002, at 10:05 , Ignacio Flores wrote:

> I'm trying to tanslate an old pas file into fpc pas file but
> I have this error:
>
> Syntax error, : expected but ( Found
>
> and the line is:
>
> inline ($FF/$1E/Errorproc); {CALL DWORD PTR Errorproc}
>
> Somebody knows how can i change this line? or is equivalent?

Just change the declaration of "ErrorProc" from

var
   ErrorProc: pointer; (I suppose it's currently decared like that anyway)

to

var
   ErrorProc: procedure;

Then you can replace the above with simply

ErrorProc;

You may have to change some code which assigns a value to errorproc 
though.


Jonas