17 lines
210 B
ObjectPascal
17 lines
210 B
ObjectPascal
program pg2want;
|
|
|
|
{$APPTYPE CONSOLE}
|
|
|
|
uses
|
|
SysUtils,
|
|
p2wantUtils in 'p2wantUtils.pas';
|
|
|
|
begin
|
|
try
|
|
Run;
|
|
except
|
|
on E:Exception do
|
|
writeln('ERROR: ', E.Message);
|
|
end;
|
|
end.
|
|
|