2
0
Эх сурвалжийг харах

[typer] remove Forbid_package try/with

This is from a time (issue #1152) when module resolution was reflected on the call stack. With the typer pass system it's unlikely to ever catch anything we want to catch.
Simon Krajewski 1 жил өмнө
parent
commit
19517c00ad

+ 1 - 4
src/typing/typeloadModule.ml

@@ -809,10 +809,7 @@ let load_module' ctx g m p =
 				loop ctx.com.load_extern_type
 			in
 			let is_extern = !is_extern in
-			try
-				type_module ctx m file ~is_extern decls p
-			with Forbid_package (inf,pl,pf) when p <> null_pos ->
-				raise (Forbid_package (inf,p::pl,pf))
+			type_module ctx m file ~is_extern decls p
 
 let load_module ctx m p =
 	let m2 = load_module' ctx ctx.g m p in