We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 99906c4 commit 801e1b7Copy full SHA for 801e1b7
test/unit/test_expr.ml
@@ -620,8 +620,8 @@ let test_fp_nan_not_geffects _ =
620
let x = symbol "x" ty in
621
let y = symbol "y" ty in
622
(* x != x makes isNaN(x) *)
623
- let expr = Expr.unop ty Not (Expr.relop ty Ge x y) in
624
- let expected = Expr.unop ty Not (Expr.relop ty Le y x) in
+ let expr = Expr.unop Ty_bool Not (Expr.relop ty Ge x y) in
+ let expected = Expr.unop Ty_bool Not (Expr.relop ty Le y x) in
625
check expr expected
626
627
let test_simplify_concat =
0 commit comments