Browse Source

fcl-web: less hints

mattias 2 years ago
parent
commit
977d123b32
1 changed files with 2 additions and 0 deletions
  1. 2 0
      packages/fcl-web/src/base/httproute.pp

+ 2 - 0
packages/fcl-web/src/base/httproute.pp

@@ -891,6 +891,8 @@ end;
 procedure THTTPRoute.DoHandleRequest(ARequest: TRequest; AResponse: TResponse);
 procedure THTTPRoute.DoHandleRequest(ARequest: TRequest; AResponse: TResponse);
 begin
 begin
   // Do nothing
   // Do nothing
+  if ARequest=nil then ;
+  if AResponse=nil then ;
 end;
 end;
 
 
 destructor THTTPRoute.Destroy;
 destructor THTTPRoute.Destroy;