Testing Oxygene formatter

method MainForm.Factorial(n : Integer) : Integer;
begin
  if n <= 0 then
    exit 0;

  if n <= 2 then
    result := n
  else
    result := n * Factorial(n-1);
end;