usr/share/fpcsrc/3.2.0/tests/test/opt/tdfa5.pp · beefree / fpc-src v3.2.0 - deb package | Gemfury

beefree / fpc-src deb

Repository URL to install this package:

Details

fpc-src / usr / share / fpcsrc / 3.2.0 / tests / test / opt / tdfa5.pp

{ %OPT=-Oodfa -Sew -vw -S2}
{ %NORUN}

program tdfa5;

function f(i : longint) : longint;
begin
  fillchar(i,sizeof(i),0);
  result:=i;
end;

begin
end.