From addca7afa938dded1332c536f11fe3626e2a708b Mon Sep 17 00:00:00 2001 From: Alasdair Date: Tue, 5 Sep 2023 00:49:22 +0100 Subject: [PATCH] Remove non-existent function from overload --- model/prelude.sail | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/model/prelude.sail b/model/prelude.sail index 5ff8a1213..632f37e7f 100644 --- a/model/prelude.sail +++ b/model/prelude.sail @@ -153,8 +153,8 @@ overload operator - = {sub_vec, sub_vec_int} val quot_round_zero = {ocaml: "quot_round_zero", interpreter: "quot_round_zero", lem: "hardware_quot", c: "tdiv_int", coq: "Z.quot"} : (int, int) -> int val rem_round_zero = {ocaml: "rem_round_zero", interpreter: "rem_round_zero", lem: "hardware_mod", c: "tmod_int", coq: "Z.rem"} : (int, int) -> int -/* The following should get us euclidean modulus, and is compatible with pre and post 0.9 versions of sail */ -overload operator % = {emod_int, mod} +/* The following defines % as euclidean modulus */ +overload operator % = {emod_int} val min_int = {ocaml: "min_int", interpreter: "min_int", lem: "min", coq: "min_atom", c: "min_int"} : forall 'x 'y. (int('x), int('y)) -> {'z, ('x <= 'y & 'z == 'x) | ('x > 'y & 'z == 'y). int('z)}