浏览代码

* fixed crash with ifs with an empty then clause

git-svn-id: branches/wasm@48055 -
nickysn 4 年之前
父节点
当前提交
5677e7ed81
共有 1 个文件被更改,包括 2 次插入1 次删除
  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