procedure test;
begin
  raise Exception.Create('Sample Exception');
end;