Lem: print more bitvector types

Especially for return expressions, which fixes a test case

1 files changed, 2 insertions, 1 deletions

diff --git a/test/mono/castreq.sail b/test/mono/castreq.sail
index 3400d650..586aa54b 100644
--- a/test/mono/castreq.sail
+++ b/test/mono/castreq.sail
@@ -15,7 +15,8 @@ function extzv(v) = extz_vec(sizeof('m),v)
 val bitvector_concat = {ocaml: "append", lem: "concat_vec", c: "append"} : forall ('n : Int) ('m : Int).
   (bits('n), bits('m)) -> bits('n + 'm)
 overload append = {bitvector_concat}
-val bitvector_cast = "zeroExtend" : forall 'n. bits('n) -> bits('n) effect pure
+val bitvector_cast_in = "zeroExtend" : forall 'n. bits('n) -> bits('n) effect pure
+val bitvector_cast_out = "zeroExtend" : forall 'n. bits('n) -> bits('n) effect pure
 val bitvector_length = "length" : forall 'n. bits('n) -> atom('n)
 overload length = {bitvector_length}