Browse Source

[macro] don't lose position in `get_type`

closes #7465
Simon Krajewski 7 years ago
parent
commit
f3620b3eca
1 changed files with 1 additions and 1 deletions
  1. 1 1
      src/typing/macroContext.ml

+ 1 - 1
src/typing/macroContext.ml

@@ -152,7 +152,7 @@ let make_macro_api ctx p =
 						{ tpackage = fst path; tname = snd path; tparams = []; tsub = None }
 						{ tpackage = fst path; tname = snd path; tparams = []; tsub = None }
 				in
 				in
 				try
 				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
 					m
 				with Error (Module_not_found _,p2) when p == p2 ->
 				with Error (Module_not_found _,p2) when p == p2 ->
 					None
 					None