Przeglądaj źródła

* avoid warnings

florian 3 lat temu
rodzic
commit
bee87583de
2 zmienionych plików z 2 dodań i 0 usunięć
  1. 1 0
      compiler/aasmtai.pas
  2. 1 0
      compiler/wasm32/nwasmflw.pas

+ 1 - 0
compiler/aasmtai.pas

@@ -2320,6 +2320,7 @@ implementation
 
     function tai_realconst.datasize: word;
       begin
+        result:=0;
         case realtyp of
           aitrealconst_s32bit:
             result:=4;

+ 1 - 0
compiler/wasm32/nwasmflw.pas

@@ -362,6 +362,7 @@ implementation
         oldContinueLabel:=nil;
         continuefinallylabel:=nil;
         breakfinallylabel:=nil;
+        oldLoopBreakBr:=0;
 
         in_loop:=assigned(current_procinfo.CurrBreakLabel);