소스 검색

allowed enum catches.

Nicolas Cannasse 19 년 전
부모
커밋
70dcf70461
1개의 변경된 파일1개의 추가작업 그리고 1개의 파일을 삭제
  1. 1 1
      typer.ml

+ 1 - 1
typer.ml

@@ -1285,7 +1285,7 @@ and type_expr ctx ?(need_val=true) (e,p) =
 		let catches = List.map (fun (v,t,e) ->
 			let t = load_type ctx (pos e) t in
 			(match follow t with
-			| TInst (_,params) ->
+			| TInst (_,params) | TEnum (_,params) ->
 				List.iter (fun pt ->
 					if pt != t_dynamic then error "Catch class parameter must be Dynamic" p;
 				) params;