소스 검색

* avoid warnings

florian 4 년 전
부모
커밋
bee87583de
2개의 변경된 파일2개의 추가작업 그리고 0개의 파일을 삭제
  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);