Преглед на файлове

Set ba variable upfront to avoid warning treated as error

Pierre Muller преди 1 година
родител
ревизия
728fb7c58c
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      compiler/ogelf.pas

+ 1 - 1
compiler/ogelf.pas

@@ -697,6 +697,7 @@ implementation
           end;
         if target_info.endian<>source_info.endian then
           begin
+            ba.q:=0;
             if (len<=sizeof(data)) then
               case len of
                 1 : ba.b:=byte(data);
@@ -715,7 +716,6 @@ implementation
               else
                 begin
                   internalerror(2024012501);
-		  ba.q:=0;
 		end;
               end;
             CurrObjSec.write(ba,len);