summaryrefslogtreecommitdiff
path: root/tests/webtbf/tw25283.pp
blob: cd955c1ec886bc92622979c73459741129ce8386 (plain)
1
2
3
4
5
6
7
8
9
10
11
{ %fail }

program main;
{$ifdef FPC}{$mode objfpc}{$h+}{$endif}
uses bugunit;

begin
  proc( 1, 2 ); // no error with -B compiler flag
end.