int 
length(self)
Hits* self
    CODE:
        RETVAL = self->length();
    OUTPUT:
        RETVAL

Document*
doc(self, num)
Hits* self
int num
    PREINIT:
      const char* CLASS = "Lucene::Document";
    CODE:
       // Get reference on Hits object
       SV* tmp_rv = newRV(SvRV(ST(0)));
       // Get doc identified by num
       Document& doc = self->doc(num);
       RETVAL = &doc;
    OUTPUT:
       RETVAL
    CLEANUP:
        // When the C++ Hits object gets destroyed the C++ Document object
        // gets destroyed as well. Therefore, we need to make sure that if the
        // PERL Document object is alive, the Perl Hits object is alive as well 
        hv_store((HV *) SvRV(ST(0)), "Hits", 4, tmp_rv, 0);
        // Indiquate that Document object is owned by the Hits object and
        // that its destruction shouldn't be handled by Perl.
        MarkObjCppOwned(ST(0));

int 
id(self, num)
Hits* self
int num
   CODE:
      RETVAL = self->id(num);
   OUTPUT:
      RETVAL


float
score(self, num)
Hits* self
int num
   CODE:
      RETVAL = self->score(num);
   OUTPUT:
      RETVAL


void
DESTROY(self)
Hits * self
    CODE:
        delete self;
//        printf("deleted Hits\n");