Sfoglia il codice sorgente

Fix TGPUDriver.Create for DYNLINK

maciej-izak 7 anni fa
parent
commit
e9bbe0f84a
1 ha cambiato i file con 0 aggiunte e 4 eliminazioni
  1. 0 4
      Units/PascalCoin/UGPUMining.pas

+ 0 - 4
Units/PascalCoin/UGPUMining.pas

@@ -105,11 +105,7 @@ end;
 constructor TGPUDriver.Create;
 begin
   FPlatforms := Nil;
-  {$IFDEF DYNLINK}
   FHasOpenCL:=InitOpenCL;
-  {$ELSE}
-  FHasOpenCL:=true;
-  {$ENDIF}
   _GPUDriver := Self;
 end;