minor (fixed issue #1384)

matcher.ml

@@ -940,7 +940,7 @@ let match_expr ctx e cases def with_type p =
 			List.map (fun e -> type_expr ctx e Value) el
 		| _ ->
 			let e = type_expr ctx e Value in
-			begin match e.etype with
+			begin match follow e.etype with
 			| TEnum(en,_) when PMap.is_empty en.e_constrs || has_meta ":fakeEnum" en.e_meta ->
 				raise Exit
 			| _ ->