diff options
| author | Robert Norton | 2018-03-27 16:45:14 +0100 |
|---|---|---|
| committer | Robert Norton | 2018-03-27 16:45:14 +0100 |
| commit | 3e6cd07f4edebedfbcbd7bb4f3b80ddbba3cf420 (patch) | |
| tree | f061e42edd75537a0b3a53990c16715141b6756e /mips | |
| parent | a1127a39d7a49e6cb1cf50f5cc528628669b4725 (diff) | |
Fix infinite loop in cheri/mips cast_unit_vec caused by lack of eq_bit in = operator. Introduced by e33c8546.
Diffstat (limited to 'mips')
| -rw-r--r-- | mips/prelude.sail | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/mips/prelude.sail b/mips/prelude.sail index cf44f6de..9607e508 100644 --- a/mips/prelude.sail +++ b/mips/prelude.sail @@ -23,7 +23,7 @@ val "reg_deref" : forall ('a : Type). register('a) -> 'a effect {rreg} /* sneaky deref with no effect necessary for bitfield writes */ val _reg_deref = "reg_deref" : forall ('a : Type). register('a) -> 'a -overload operator == = {eq_atom, eq_int, eq_vec, eq_string, eq_real, eq_anything} +overload operator == = {eq_atom, eq_int, eq_bit, eq_vec, eq_string, eq_real, eq_anything} val vector_subrange = {ocaml: "subrange", lem: "subrange_vec_dec"} : forall ('n : Int) ('m : Int) ('o : Int), 'o <= 'm <= 'n. (bits('n), atom('m), atom('o)) -> bits('m - ('o - 1)) |
