Add shl and shr missing casts

Author: GuillaumeGomez

src/builder.rs

@@ -252,7 +252,8 @@ impl<'a, 'gcc, 'tcx> Builder<'a, 'gcc, 'tcx> {
                     {
                         self.context.new_cast(self.location, actual_val, expected_ty)
                     } else if on_stack_param_indices.contains(&index) {
-                        actual_val.dereference(self.location).to_rvalue()
+                        let new_val = self.context.new_cast(None, actual_val, expected_ty.make_pointer());
+                        new_val.dereference(self.location).to_rvalue()
                     } else {
                         assert!(
                             (!expected_ty.is_vector() || actual_ty.is_vector())