فهرست منبع

[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