4 lines
88 B
ObjectPascal
4 lines
88 B
ObjectPascal
procedure HaltAndCatchFire;
|
|
begin
|
|
raise Exception.Create('Burning to the ground');
|
|
end;
|