|
@@ -757,6 +757,7 @@ let type_macro ctx mode cpath f (el:Ast.expr list) p =
|
|
|
|
|
|
let call_macro ctx path meth args p =
|
|
|
let mctx, (margs,_,mclass,mfield), call = load_macro ctx false path meth p in
|
|
|
+ mctx.curclass <- null_class;
|
|
|
let el, _ = Calls.unify_call_args mctx args margs t_dynamic p false false in
|
|
|
call (List.map (fun e -> try Interp.make_const e with Exit -> error "Parameter should be a constant" e.epos) el)
|
|
|
|