소스 검색

[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