summaryrefslogtreecommitdiff
path: root/compiler/ExpressionsUtils.ml
diff options
context:
space:
mode:
authorSon Ho2022-10-27 17:53:32 +0200
committerSon HO2022-10-28 17:41:04 +0200
commitf45502c131fc6aae08aa5f0049911b85ba13529f (patch)
treed807d3c4ff8c56fc2a51d0f5220288b73bf59c9f /compiler/ExpressionsUtils.ml
parent39196fb24fa5f51f79767a33e28a8d785b67bd9b (diff)
Move some files to the Charon project
Diffstat (limited to 'compiler/ExpressionsUtils.ml')
-rw-r--r--compiler/ExpressionsUtils.ml11
1 files changed, 1 insertions, 10 deletions
diff --git a/compiler/ExpressionsUtils.ml b/compiler/ExpressionsUtils.ml
index c3ccfb15..7dfef101 100644
--- a/compiler/ExpressionsUtils.ml
+++ b/compiler/ExpressionsUtils.ml
@@ -1,10 +1 @@
-module E = Expressions
-
-let unop_can_fail (unop : E.unop) : bool =
- match unop with Neg | Cast _ -> true | Not -> false
-
-let binop_can_fail (binop : E.binop) : bool =
- match binop with
- | BitXor | BitAnd | BitOr | Eq | Lt | Le | Ne | Ge | Gt -> false
- | Div | Rem | Add | Sub | Mul -> true
- | Shl | Shr -> raise Errors.Unimplemented
+include Charon.ExpressionsUtils