sub _potential_value {
my ( $self, $slot_access ) = @_;
- return "( \@_, \@{ $slot_access } )";
+ return "[ \@_, \@{ $slot_access } ]";
+}
+
+sub _inline_optimized_set_new_value {
+ my ( $self, $inv, $new, $slot_access ) = @_;
+
+ return "unshift \@{ $slot_access }, \@_;";
}
1;