diff --git a/tgt-vhdl/stmt.cc b/tgt-vhdl/stmt.cc
index d01f4ec75..c03f0a11d 100644
--- a/tgt-vhdl/stmt.cc
+++ b/tgt-vhdl/stmt.cc
@@ -459,7 +459,7 @@ static int draw_case(vhdl_procedural *proc, stmt_container *container,
       vhdl_expr *when;
       ivl_expr_t net = ivl_stmt_case_expr(stmt, i);
       if (net) {
-         when = translate_expr(net);
+         when = translate_expr(net)->cast(test->get_type());
          if (NULL == when)
             return 1;
       }