Procházet zdrojové kódy

* fixed crash with ifs with an empty then clause

git-svn-id: branches/wasm@48055 -
nickysn před 5 roky
rodič
revize
5677e7ed81
1 změnil soubory, kde provedl 2 přidání a 1 odebrání
  1. 2 1
      compiler/wasm32/nwasmflw.pas

+ 2 - 1
compiler/wasm32/nwasmflw.pas

@@ -165,7 +165,8 @@ begin
   thlcgwasm(hlcg).incblock;
   thlcgwasm(hlcg).decstack(current_asmdata.CurrAsmList,1);
 
-  secondpass(right); // then branchs
+  if Assigned(right) then
+    secondpass(right); // then branchs
 
   if Assigned(t1) then // else branch
     begin