Procházet zdrojové kódy

- remove unused variable

florian před 3 dny
rodič
revize
a39d48b22d
1 změnil soubory, kde provedl 0 přidání a 1 odebrání
  1. 0 1
      rtl/aarch64/aarch64.inc

+ 0 - 1
rtl/aarch64/aarch64.inc

@@ -118,7 +118,6 @@ procedure RaisePendingExceptions;
 procedure fpc_throwfpuexception;[public,alias:'FPC_THROWFPUEXCEPTION'];
   var
     fpsr : qword;
-    f: TFPUException;
   begin
     { at this point, we know already, that an exception will be risen }
     fpsr:=getfpsr;