package TestCase::CompileError::Field::Private {
  use TestCase;
  
  sub main : int () {
    my $test_case = new TestCase;
    $test_case->{private_field};
  }
}