Răsfoiți Sursa

pas2js: compile httpcompiler with fpc 3.2.2

mattias 3 ani în urmă
părinte
comite
5d571853ac
1 a modificat fișierele cu 4 adăugiri și 0 ștergeri
  1. 4 0
      utils/pas2js/httpcompiler.pp

+ 4 - 0
utils/pas2js/httpcompiler.pp

@@ -794,7 +794,11 @@ begin
     httprouter.RegisterRoute('$sys/status',rmGet,@DoStatusRequest);
     httprouter.RegisterRoute('$sys/status',rmGet,@DoStatusRequest);
     end;
     end;
   if FAPI<>'' then
   if FAPI<>'' then
+    {$IF FPC_FULLVERSION > 30300}
     TFPWebFileLocationAPIModule.RegisterFileLocationAPI(ExtractWord(1,FAPI,[',']),ExtractWord(2,FAPI,[',']));
     TFPWebFileLocationAPIModule.RegisterFileLocationAPI(ExtractWord(1,FAPI,[',']),ExtractWord(2,FAPI,[',']));
+    {$ELSE}
+    Log(etError,'API support missing, Compile with fpc 3.3.1+');
+    {$ENDIF}
   TSimpleFileModule.RegisterDefaultRoute;
   TSimpleFileModule.RegisterDefaultRoute;
   inherited;
   inherited;
 end;
 end;