class TestCase::Destroy::Data::Basic {
  use TestCase::Minimal;
   
  has y : public int;
  has minimal : public TestCase::Minimal;
   
  static method new : TestCase::Destroy::Data::Basic () {
    return new TestCase::Destroy::Data::Basic;
  }
   
  method DESTROY : void () {
    if ($self->{minimal}) {
      $self->{minimal}->{x} = 3;
    }
     
    $self->{y} = 5;
  }
}