4 lines
73 B
Text
4 lines
73 B
Text
procedure test;
|
|
begin
|
|
raise Exception.Create('Sample Exception');
|
|
end;
|