Lines 1513-1521
begin
Link Here
|
1513 |
exit; |
1513 |
exit; |
1514 |
end; |
1514 |
end; |
1515 |
|
1515 |
|
1516 |
Params:='-va'; |
1516 |
{Params:='-va';} |
1517 |
if Options<>'' then |
1517 |
{if Options<>'' then |
1518 |
Params:=Params+' '+Options; |
1518 |
Params:=Params+' '+Options;} |
|
|
1519 |
Params:='-va -Pi386 -Tlinux -Fr/usr/lib/fpc/msg/errore.msg'; |
1519 |
Filename:=ExtractFileName(TestFilename); |
1520 |
Filename:=ExtractFileName(TestFilename); |
1520 |
WorkDir:=ExtractFilePath(TestFilename); |
1521 |
WorkDir:=ExtractFilePath(TestFilename); |
1521 |
Params:=Params+' '+Filename; |
1522 |
Params:=Params+' '+Filename; |