Procházet zdrojové kódy

[debug] setlogger cannot be null

Exilon před 4 roky
rodič
revize
010ce060c0
1 změnil soubory, kde provedl 1 přidání a 0 odebrání
  1. 1 0
      Quick.Debug.Utils.pas

+ 1 - 0
Quick.Debug.Utils.pas

@@ -198,6 +198,7 @@ end;
 
 class procedure TDebugger.SetLogger(aLogger: ILogger);
 begin
+  if aLogger = nil then raise Exception.Create('Debugger logger cannot be nil!');
   fLogger := aLogger;
   fShowTime := False;
 end;