fpcsrc/tests/webtbf/tw4103.pp


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

{ %fail }

{ Source provided for Free Pascal Bug Report 4103 }
{ Submitted by "Daniël Mantione" on  2005-06-21 }
{ e-mail: daniel@freepascal.org }
uses uw4103;

var j:junk;

begin
  j:=1;
end.