|
@@ -152,7 +152,7 @@ let make_macro_api ctx p =
|
|
|
{ tpackage = fst path; tname = snd path; tparams = []; tsub = None }
|
|
|
in
|
|
|
try
|
|
|
- let m = Some (Typeload.load_instance ctx (tp,null_pos) true) in
|
|
|
+ let m = Some (Typeload.load_instance ctx (tp,p) true) in
|
|
|
m
|
|
|
with Error (Module_not_found _,p2) when p == p2 ->
|
|
|
None
|