fpcsrc/tests/tbs/tb0271.pp


1
2
3
4
5
6
7
8
9
10

{ %OPT= -Sen -vn }

{ Old file: tbs0317.pp }

{ This shouldn't give a warning, because it can be used in another program }
var
  exportedc : longint;cvar;public;
begin
  exportedc:=0;
end.