package TestCase::Simple {
  has x : int;
  has y : int;

  sub get_x : int ($self : self) {
    return $self->{x};
  }

  sub set_x : void ($self : self, $x : int) {
    $self->{x} = $x;
  }
  
  sub new : TestCase::Minimal () {
    return new TestCase::Minimal;
  }
}