瀏覽代碼

[analyzer] split up `return Void` which might be introduced by various typer parts

Simon Krajewski 10 年之前
父節點
當前提交
fc12e68086
共有 1 個文件被更改,包括 2 次插入0 次删除
  1. 2 0
      analyzer.ml

+ 2 - 0
analyzer.ml

@@ -448,6 +448,8 @@ module Simplifier = struct
 										let e = loop e in
 										e :: loop2 el
 								end
+							| TReturn (Some e1) when (match follow e1.etype with TAbstract({a_path=[],"Void"},_) -> true | _ -> false) ->
+								[(loop e1);{e with eexpr = TReturn None}]
 							| _ ->
 								let e = loop e in
 								e :: loop2 el