freepascal.compiler/tests/tppu/implinline3/src2/implinline3_bird.pas

unit implinline3_bird;

{$mode objfpc}

interface

procedure Walk;

implementation

uses implinline3_ant;

procedure Walk; inline;
begin
  writeln(Times123(2));
end;

end.