[fpc-devel] Freepascal in microcontrollers

[Daniël Mantione]

Op Wed, 27 Feb 2008, schreef Marco van de Voort:

> function ByteIO(var p):puchar; inline;
>
> begin
>  result:=puchar(@p);
> end;

> const port = puchar(_port); // !??!?
> port^:=$55;

Nope, don't forget that we have a nice arsenal of constructs to do system 
programming, like the mem array, the port array, absolute etc. The above 
can be replaced by:

mem[_port]:=$55;

Daniël