class TestCase::UseResource::Mylib2 {
   
  use TestCase::Resource::Mylib1;
  use TestCase::Resource::Mylib2;
   
  native static method mylib2_source1_func1 : string ();
  native static method mylib2_source1_func2 : string ();
   
  static method test : int () {
     
    # Call mylib1_source1_func1 from mylib2
    {
      my $result = &mylib2_source1_func1;
      unless ($result eq "Mylib1__mylib1_source1_func1") {
        return 0;
      }
    }
    {
      my $result = &mylib2_source1_func2;
      unless ($result eq "Mylib2__mylib2_source1_func2") {
        return 0;
      }
    }
     
    return 1;
  }
}