[fpc-devel] Passing consts to const

Alexey Barkovoy clootie at ixbt.com
Tue Jun 7 20:47:30 CEST 2005

> procedure TestBuf(const Buf; Size: Integer);
> begin
> end;
> It should work. AFAIR, typed constants are treated exactly as variables with 
> an initial value.

Actually untyped parameters accept anything except numeral or untyped numeric 
constant in Delphi. The meaning of const in this example is contract that 
function will not change passed value. 

More information about the fpc-devel mailing list