diff options
author | Son Ho | 2022-10-27 17:53:32 +0200 |
---|---|---|
committer | Son HO | 2022-10-28 17:41:04 +0200 |
commit | f45502c131fc6aae08aa5f0049911b85ba13529f (patch) | |
tree | d807d3c4ff8c56fc2a51d0f5220288b73bf59c9f /compiler/ExpressionsUtils.ml | |
parent | 39196fb24fa5f51f79767a33e28a8d785b67bd9b (diff) |
Move some files to the Charon project
Diffstat (limited to 'compiler/ExpressionsUtils.ml')
-rw-r--r-- | compiler/ExpressionsUtils.ml | 11 |
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 |