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