فهرست منبع

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

Aleksandr Kuzmenko 4 سال پیش
والد
کامیت
90d2fe0208
1فایلهای تغییر یافته به همراه1 افزوده شده و 1 حذف شده
  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
 	| OpShr -> op_shr p
 	| OpUShr -> op_ushr p
 	| OpUShr -> op_ushr p
 	| OpMod -> op_mod 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 =
 let prepare_callback v n =
 	match v with
 	match v with