Browse Source

* use V_Error
* set status.verbosity

peter 27 years ago
parent
commit
cca4b5a413
1 changed files with 9 additions and 3 deletions
  1. 9 3
      ide/fake/compiler.pas

+ 9 - 3
ide/fake/compiler.pas

@@ -14,14 +14,20 @@ uses
 
 function Compile(const cmd:string):longint;
 begin
-  do_comment(V_Info,'Fake Compiler');
-  do_comment(V_Info,'Cmd = "'+cmd+'"');
+  status.verbosity:=V_Default;
+  status.maxerrorcount:=50;
+  do_comment(V_Error,'Fake Compiler');
+  do_comment(V_Error,'Cmd = "'+cmd+'"');
 end;
 
 end.
 {
   $Log$
-  Revision 1.1  1998-12-22 14:27:54  peter
+  Revision 1.2  1998-12-28 15:44:59  peter
+    * use V_Error
+    * set status.verbosity
+
+  Revision 1.1  1998/12/22 14:27:54  peter
     * moved
 
   Revision 1.1  1998/12/10 23:54:28  peter