Ver código fonte

Avoid warning about unintialized 'ba' variable

Pierre Muller 1 ano atrás
pai
commit
79ed0db624
1 arquivos alterados com 4 adições e 1 exclusões
  1. 4 1
      compiler/ogelf.pas

+ 4 - 1
compiler/ogelf.pas

@@ -713,7 +713,10 @@ implementation
                       ba.q:=swapendian(ba.q);
                     end;
               else
-                internalerror(2024012501);
+                begin
+                  internalerror(2024012501);
+		  ba.q:=0;
+		end;
               end;
             CurrObjSec.write(ba,len);
           end