diff --git a/perl++/headers/interpreter.h b/perl++/headers/interpreter.h
index 9f73abf..52c6591 100644
--- a/perl++/headers/interpreter.h
+++ b/perl++/headers/interpreter.h
@@ -473,7 +473,7 @@ namespace perl {
 					TRY_OR_THROW(arg_stack.returns(get_magic_object<T>(arg_stack[0])->*ref));
 				}
 				else {
-					TRY_OR_THROW(arg_stack.returns(get_magic_object<T>(arg_stack[0])->*ref = arg_stack[1]));
+					TRY_OR_THROW(arg_stack.returns(get_magic_object<T>(arg_stack[0])->*ref = typecast_to<A>(arg_stack[1])));
 				}
 			}
 		};