path: root/fpcsrc/tests/webtbf/tw9499.pp

{ %fail }

program Project1;

var
  i: Longint;
begin
  i := 2 div 0;
end.