paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-22 01:09:27 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ use IsExe var to know if we need to call ppas

Browse Source
This commit is contained in:
pierre 1999-11-18 13:49:56 +00:00
parent fd1e583ead
commit 77729d0118
1 changed files with 7 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
ide/text/fpcompil.pas
View File

@ -93,7 +93,7 @@ uses
{$endif}
Dos,Video,
App,Commands,tokens,
CompHook, systems, browcol,
CompHook, Compiler, systems, browcol,
WUtils,WEditor,
FPRedir,
FPIde,FPConst,FPVars,FPUtils,FPIntf,FPSwitch;
@ -585,10 +585,10 @@ begin
FileName:='-B '+FileName;
{ tokens are created and distroed by compiler.compile !! PM }
DoneTokens;
Compile(FileName);
Compiler.Compile(FileName);
{ tokens are created and distroed by compiler.compile !! PM }
InitTokens;
if LinkAfter and
if LinkAfter and IsExe and
(CompilationPhase<>cpAborted) and
(status.errorCount=0) then
begin
@ -745,7 +745,10 @@ end;
end.
{
$Log$
Revision 1.42 1999-11-10 17:20:41 pierre
Revision 1.43 1999-11-18 13:49:56 pierre
+ use IsExe var to know if we need to call ppas
Revision 1.42 1999/11/10 17:20:41 pierre
* Use fpredir.dosexecute
Revision 1.41 1999/10/25 16:34:19 pierre