浏览代码

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

pierre 26 年之前
父节点
当前提交
77729d0118
共有 1 个文件被更改,包括 7 次插入4 次删除
  1. 7 4
      ide/text/fpcompil.pas

+ 7 - 4
ide/text/fpcompil.pas

@@ -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