Procházet zdrojové kódy

[eval] add hx position to assert in EvalMisc.get_binop_fun (#10305)

Aleksandr Kuzmenko před 4 roky
rodič
revize
90d2fe0208
1 změnil soubory, kde provedl 1 přidání a 1 odebrání
  1. 1 1
      src/macro/eval/evalMisc.ml

+ 1 - 1
src/macro/eval/evalMisc.ml

@@ -284,7 +284,7 @@ let get_binop_fun op p = match op with
 	| OpShr -> op_shr p
 	| OpUShr -> op_ushr p
 	| OpMod -> op_mod p
-	| OpAssign | OpBoolAnd | OpBoolOr | OpAssignOp _ | OpInterval | OpArrow | OpIn -> die "" __LOC__
+	| OpAssign | OpBoolAnd | OpBoolOr | OpAssignOp _ | OpInterval | OpArrow | OpIn -> die ~p "" __LOC__
 
 let prepare_callback v n =
 	match v with