4 lines
64 B
ObjectPascal
4 lines
64 B
ObjectPascal
|
begin
|
|||
|
|
var p: procedure :=
|
|||
|
|
()->raise new Exception;
|
|||
|
|
end.
|