tests/webtbf/tw27378.pp


1
2
3
4
5
6
7
8
9
10
11
12
13
14

{ %FAIL }
{ %OPT=-B -Sen }

{ we want the "Local variable "Var2" not used" hint as an error; if we don't
  get the error then resetting the verbosity when switching the unit failed }

program tw27378;

uses
  uw27378a, uw27378b;

begin

end.