From 3a90d6fa49303e148b8ee717ea74142a4972e50c Mon Sep 17 00:00:00 2001 From: Alasdair Armstrong Date: Fri, 3 Nov 2017 16:54:56 +0000 Subject: Fixed a bug where true and false get mixed up in rewriter --- src/rewriter.ml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src') diff --git a/src/rewriter.ml b/src/rewriter.ml index 34e4bfd4..3cf017d1 100644 --- a/src/rewriter.ml +++ b/src/rewriter.ml @@ -2566,8 +2566,8 @@ let rewrite_constraint = | NC_not_equal (n1, n2) -> E_app_infix (mk_exp (E_sizeof n1), mk_id "!=", mk_exp (E_sizeof n2)) | NC_and (nc1, nc2) -> E_app_infix (rewrite_nc nc1, mk_id "&", rewrite_nc nc2) | NC_or (nc1, nc2) -> E_app_infix (rewrite_nc nc1, mk_id "|", rewrite_nc nc2) - | NC_false -> E_lit (mk_lit L_true) - | NC_true -> E_lit (mk_lit L_false) + | NC_false -> E_lit (mk_lit L_false) + | NC_true -> E_lit (mk_lit L_true) | NC_set (kid, ints) -> unaux_exp (rewrite_nc (List.fold_left (fun nc int -> nc_or nc (nc_eq (nvar kid) (nconstant int))) nc_true ints)) in -- cgit v1.2.3