Răsfoiți Sursa

* Write unknwon compiler proc using Comment and only in Extdebug

peter 23 ani în urmă
părinte
comite
ebbf4d8d14
1 a modificat fișierele cu 7 adăugiri și 2 ștergeri
  1. 7 2
      compiler/ncal.pas

+ 7 - 2
compiler/ncal.pas

@@ -703,7 +703,9 @@ implementation
          if not assigned(srsym) or
             (srsym.typ <> procsym) then
            begin
-             writeln('unknown compilerproc ',name);
+{$ifdef EXTDEBUG}
+             Comment(V_Error,'unknown compilerproc '+name);
+{$endif EXTDEBUG}
              internalerror(200107271);
            end;
          self.create(params,tprocsym(srsym),symowner,nil);
@@ -2630,7 +2632,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.103  2002-10-05 12:43:25  carl
+  Revision 1.104  2002-10-05 15:15:45  peter
+    * Write unknwon compiler proc using Comment and only in Extdebug
+
+  Revision 1.103  2002/10/05 12:43:25  carl
     * fixes for Delphi 6 compilation
      (warning : Some features do not work under Delphi)