r71974 - in /branches/upstream/libkinosearch-perl/current: ./ core/KinoSearch/Index/ core/KinoSearch/Plan/ core/KinoSearch/Test/Index/ core/KinoSearch/Test/Plan/ lib/ lib/KinoSearch/ t/binding/ t/core/

gregoa at users.alioth.debian.org gregoa at users.alioth.debian.org
Fri Mar 25 15:07:11 UTC 2011


Author: gregoa
Date: Fri Mar 25 15:06:47 2011
New Revision: 71974

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=71974
Log:
[svn-upgrade] new version libkinosearch-perl (0.313)

Added:
    branches/upstream/libkinosearch-perl/current/core/KinoSearch/Test/Index/TestPolyReader.c
    branches/upstream/libkinosearch-perl/current/core/KinoSearch/Test/Index/TestPolyReader.cfh
    branches/upstream/libkinosearch-perl/current/core/KinoSearch/Test/Plan/TestFieldType.c
    branches/upstream/libkinosearch-perl/current/core/KinoSearch/Test/Plan/TestFieldType.cfh
    branches/upstream/libkinosearch-perl/current/t/core/225-polyreader.t
    branches/upstream/libkinosearch-perl/current/t/core/234-field_type.t
Modified:
    branches/upstream/libkinosearch-perl/current/Changes
    branches/upstream/libkinosearch-perl/current/MANIFEST
    branches/upstream/libkinosearch-perl/current/META.yml
    branches/upstream/libkinosearch-perl/current/core/KinoSearch/Index/PolyReader.c
    branches/upstream/libkinosearch-perl/current/core/KinoSearch/Plan/FieldType.c
    branches/upstream/libkinosearch-perl/current/lib/KinoSearch.pm
    branches/upstream/libkinosearch-perl/current/lib/KinoSearch.pod
    branches/upstream/libkinosearch-perl/current/lib/KinoSearch/Test.pm
    branches/upstream/libkinosearch-perl/current/t/binding/702-sample.t

Modified: branches/upstream/libkinosearch-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libkinosearch-perl/current/Changes?rev=71974&op=diff
==============================================================================
--- branches/upstream/libkinosearch-perl/current/Changes (original)
+++ branches/upstream/libkinosearch-perl/current/Changes Fri Mar 25 15:06:47 2011
@@ -1,4 +1,11 @@
 Revision history for KinoSearch
+
+0.313 2011-03-24
+
+    * Make FieldType checking more stringent.
+    * Fix a latent bug which might theoretically result in incorrect search
+      results on highly customized systems.
+    * Fix a test which was failing on automated testing systems.
 
 0.312 2011-03-23
 
@@ -6,8 +13,7 @@
       left behind or not cleaned up, etc.
     * Guard against excessive search size requests.
     * Skip a test which was prone to failure on automated testing systems.
-    * Tweak META.yml for the so that the Clownfish build files get excluded
-      properly.
+    * Tweak META.yml so that the Clownfish build files get excluded properly.
 
 0.311 2010-12-28
 

Modified: branches/upstream/libkinosearch-perl/current/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libkinosearch-perl/current/MANIFEST?rev=71974&op=diff
==============================================================================
--- branches/upstream/libkinosearch-perl/current/MANIFEST (original)
+++ branches/upstream/libkinosearch-perl/current/MANIFEST Fri Mar 25 15:06:47 2011
@@ -420,6 +420,8 @@
 core/KinoSearch/Test/Index/TestHighlightWriter.cfh
 core/KinoSearch/Test/Index/TestIndexManager.c
 core/KinoSearch/Test/Index/TestIndexManager.cfh
+core/KinoSearch/Test/Index/TestPolyReader.c
+core/KinoSearch/Test/Index/TestPolyReader.cfh
 core/KinoSearch/Test/Index/TestPostingListWriter.c
 core/KinoSearch/Test/Index/TestPostingListWriter.cfh
 core/KinoSearch/Test/Index/TestSegment.c
@@ -450,6 +452,8 @@
 core/KinoSearch/Test/Plan/TestArchitecture.cfh
 core/KinoSearch/Test/Plan/TestBlobType.c
 core/KinoSearch/Test/Plan/TestBlobType.cfh
+core/KinoSearch/Test/Plan/TestFieldType.c
+core/KinoSearch/Test/Plan/TestFieldType.cfh
 core/KinoSearch/Test/Plan/TestFullTextType.c
 core/KinoSearch/Test/Plan/TestFullTextType.cfh
 core/KinoSearch/Test/Plan/TestNumericType.c
@@ -1057,9 +1061,11 @@
 t/core/221-highlight_writer.t
 t/core/222-posting_list_writer.t
 t/core/223-seg_writer.t
+t/core/225-polyreader.t
 t/core/230-full_text_type.t
 t/core/231-blob_type.t
 t/core/232-numeric_type.t
+t/core/234-field_type.t
 t/core/301-segment.t
 t/core/501-termquery.t
 t/core/502-phrasequery.t

Modified: branches/upstream/libkinosearch-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libkinosearch-perl/current/META.yml?rev=71974&op=diff
==============================================================================
--- branches/upstream/libkinosearch-perl/current/META.yml (original)
+++ branches/upstream/libkinosearch-perl/current/META.yml Fri Mar 25 15:06:47 2011
@@ -449,6 +449,8 @@
     - core/KinoSearch/Test/Index/TestHighlightWriter.cfh
     - core/KinoSearch/Test/Index/TestIndexManager.c
     - core/KinoSearch/Test/Index/TestIndexManager.cfh
+    - core/KinoSearch/Test/Index/TestPolyReader.c
+    - core/KinoSearch/Test/Index/TestPolyReader.cfh
     - core/KinoSearch/Test/Index/TestPostingListWriter.c
     - core/KinoSearch/Test/Index/TestPostingListWriter.cfh
     - core/KinoSearch/Test/Index/TestSegWriter.c
@@ -479,6 +481,8 @@
     - core/KinoSearch/Test/Plan/TestArchitecture.cfh
     - core/KinoSearch/Test/Plan/TestBlobType.c
     - core/KinoSearch/Test/Plan/TestBlobType.cfh
+    - core/KinoSearch/Test/Plan/TestFieldType.c
+    - core/KinoSearch/Test/Plan/TestFieldType.cfh
     - core/KinoSearch/Test/Plan/TestFullTextType.c
     - core/KinoSearch/Test/Plan/TestFullTextType.cfh
     - core/KinoSearch/Test/Plan/TestNumericType.c
@@ -987,9 +991,11 @@
     - t/core/221-highlight_writer.t
     - t/core/222-posting_list_writer.t
     - t/core/223-seg_writer.t
+    - t/core/225-polyreader.t
     - t/core/230-full_text_type.t
     - t/core/231-blob_type.t
     - t/core/232-numeric_type.t
+    - t/core/234-field_type.t
     - t/core/301-segment.t
     - t/core/501-termquery.t
     - t/core/502-phrasequery.t
@@ -1052,7 +1058,7 @@
     file: lib/KSx/Simple.pm
   KinoSearch:
     file: lib/KinoSearch.pm
-    version: 0.312
+    version: 0.313
   KinoSearch::Analysis::Analyzer:
     file: lib/KinoSearch/Analysis/Analyzer.pm
   KinoSearch::Analysis::CaseFolder:
@@ -1366,4 +1372,4 @@
   Parse::RecDescent: 0
 resources:
   license: http://dev.perl.org/licenses/
-version: 0.312
+version: 0.313

Modified: branches/upstream/libkinosearch-perl/current/core/KinoSearch/Index/PolyReader.c
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libkinosearch-perl/current/core/KinoSearch/Index/PolyReader.c?rev=71974&op=diff
==============================================================================
--- branches/upstream/libkinosearch-perl/current/core/KinoSearch/Index/PolyReader.c (original)
+++ branches/upstream/libkinosearch-perl/current/core/KinoSearch/Index/PolyReader.c Fri Mar 25 15:06:47 2011
@@ -469,28 +469,37 @@
 uint32_t
 PolyReader_sub_tick(I32Array *offsets, int32_t doc_id)
 {
-    uint32_t lo = 0;
-    uint32_t hi_tick = I32Arr_Get_Size(offsets) - 1;
-    uint32_t hi = hi_tick;
+    int32_t size = I32Arr_Get_Size(offsets);
+    if (size == 0) {
+        return 0;
+    }
     
-    while (hi >= lo) {
-        uint32_t mid = lo + ((hi - lo) / 2);
-        int32_t mid_start = I32Arr_Get(offsets, mid) + 1;
-        if (doc_id < mid_start) {
-            hi = mid - 1;
-        }
-        else if (doc_id > mid_start) {
-            lo = mid + 1;
-        }
+    int32_t lo     = -1; 
+    int32_t hi     = size;
+    while (hi - lo > 1) {
+        int32_t mid = lo + ((hi - lo) / 2); 
+        int32_t offset = I32Arr_Get(offsets, mid);
+        if (doc_id <= offset) {
+            hi = mid;
+        }   
         else {
-            while (   mid < hi_tick 
-                   && I32Arr_Get(offsets, mid + 1) == mid_start
-            ) {
-                mid++;
-            }
-            return mid;
-        }
-    }
+            lo = mid;
+        }   
+    }
+    if (hi == size) {
+        hi--;
+    }
+
+    while (hi > 0) {
+        int32_t offset = I32Arr_Get(offsets, hi);
+        if (doc_id <= offset) {
+            hi--;
+        }
+        else {
+            break;
+        }
+    }
+
     return hi;
 }
     

Modified: branches/upstream/libkinosearch-perl/current/core/KinoSearch/Plan/FieldType.c
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libkinosearch-perl/current/core/KinoSearch/Plan/FieldType.c?rev=71974&op=diff
==============================================================================
--- branches/upstream/libkinosearch-perl/current/core/KinoSearch/Plan/FieldType.c (original)
+++ branches/upstream/libkinosearch-perl/current/core/KinoSearch/Plan/FieldType.c Fri Mar 25 15:06:47 2011
@@ -71,6 +71,7 @@
 {
     FieldType *evil_twin = (FieldType*)other;
     if (evil_twin == self) return true;
+    if (FType_Get_VTable(self) != FType_Get_VTable(evil_twin)) return false;
     if (self->boost != evil_twin->boost) return false;
     if (!!self->indexed    != !!evil_twin->indexed)    return false;
     if (!!self->stored     != !!evil_twin->stored)     return false;

Added: branches/upstream/libkinosearch-perl/current/core/KinoSearch/Test/Index/TestPolyReader.c
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libkinosearch-perl/current/core/KinoSearch/Test/Index/TestPolyReader.c?rev=71974&op=file
==============================================================================
--- branches/upstream/libkinosearch-perl/current/core/KinoSearch/Test/Index/TestPolyReader.c (added)
+++ branches/upstream/libkinosearch-perl/current/core/KinoSearch/Test/Index/TestPolyReader.c Fri Mar 25 15:06:47 2011
@@ -1,0 +1,41 @@
+#define C_KINO_TESTPOLYREADER
+#include "KinoSearch/Util/ToolSet.h"
+
+#include "KinoSearch/Test.h"
+#include "KinoSearch/Test/Index/TestPolyReader.h"
+#include "KinoSearch/Index/PolyReader.h"
+
+static void
+test_sub_tick(TestBatch *batch)
+{
+  size_t num_segs = 255;
+  int32_t *ints = (int32_t*)MALLOCATE(num_segs * sizeof(int32_t));
+  size_t i;
+  for (i = 0; i < num_segs; i++) {
+    ints[i] = i;
+  }
+  I32Array *offsets = I32Arr_new(ints, num_segs);
+  for (i = 1; i < num_segs; i++) {
+    if (PolyReader_sub_tick(offsets, i) != i - 1) { break; }
+  }
+  TEST_INT_EQ(batch, i, num_segs, "got all sub_tick() calls right");
+  DECREF(offsets);
+}
+
+void
+TestPolyReader_run_tests()
+{
+    TestBatch *batch = TestBatch_new(1);
+    TestBatch_Plan(batch);
+
+    test_sub_tick(batch);
+
+    DECREF(batch);
+}
+
+/* Copyright 2010-2011 Marvin Humphrey
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * under the same terms as Perl itself.
+ */
+

Added: branches/upstream/libkinosearch-perl/current/core/KinoSearch/Test/Index/TestPolyReader.cfh
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libkinosearch-perl/current/core/KinoSearch/Test/Index/TestPolyReader.cfh?rev=71974&op=file
==============================================================================
--- branches/upstream/libkinosearch-perl/current/core/KinoSearch/Test/Index/TestPolyReader.cfh (added)
+++ branches/upstream/libkinosearch-perl/current/core/KinoSearch/Test/Index/TestPolyReader.cfh Fri Mar 25 15:06:47 2011
@@ -1,0 +1,13 @@
+parcel KinoSearch cnick Kino;
+
+inert class KinoSearch::Test::Index::TestPolyReader {
+    inert void
+    run_tests();
+}
+
+/* Copyright 2010-2011 Marvin Humphrey
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * under the same terms as Perl itself.
+ */
+

Added: branches/upstream/libkinosearch-perl/current/core/KinoSearch/Test/Plan/TestFieldType.c
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libkinosearch-perl/current/core/KinoSearch/Test/Plan/TestFieldType.c?rev=71974&op=file
==============================================================================
--- branches/upstream/libkinosearch-perl/current/core/KinoSearch/Test/Plan/TestFieldType.c (added)
+++ branches/upstream/libkinosearch-perl/current/core/KinoSearch/Test/Plan/TestFieldType.c Fri Mar 25 15:06:47 2011
@@ -1,0 +1,98 @@
+#define C_KINO_TESTFIELDTYPE
+#define C_KINO_DUMMYFIELDTYPE
+#include "KinoSearch/Util/ToolSet.h"
+
+#include "KinoSearch/Test.h"
+#include "KinoSearch/Test/Plan/TestFieldType.h"
+#include "KinoSearch/Test/TestUtils.h"
+
+DummyFieldType*
+DummyFieldType_new()
+{
+    DummyFieldType *self = (DummyFieldType*)VTable_Make_Obj(DUMMYFIELDTYPE);
+    return (DummyFieldType*)FType_init((FieldType*)self);
+}
+
+static FieldType*
+S_alt_field_type()
+{
+    ZombieCharBuf *name = ZCB_WRAP_STR("DummyFieldType2", 15);
+    VTable *vtable = VTable_singleton((CharBuf*)name, DUMMYFIELDTYPE);
+    FieldType *self = (FieldType*)VTable_Make_Obj(vtable);
+    return FType_init(self);
+}
+
+static void
+test_Dump_Load_and_Equals(TestBatch *batch)
+{
+    FieldType   *type          = (FieldType*)DummyFieldType_new();
+    FieldType   *other         = (FieldType*)DummyFieldType_new();
+    FieldType   *class_differs = S_alt_field_type();
+    FieldType   *boost_differs = (FieldType*)DummyFieldType_new();
+    FieldType   *indexed       = (FieldType*)DummyFieldType_new();
+    FieldType   *stored        = (FieldType*)DummyFieldType_new();
+
+    FType_Set_Boost(other, 1.0);
+    FType_Set_Indexed(indexed, false);
+    FType_Set_Stored(stored, false);
+
+    FType_Set_Boost(boost_differs, 1.5);
+    FType_Set_Indexed(indexed, true);
+    FType_Set_Stored(stored, true);
+
+    TEST_TRUE(batch, FType_Equals(type, (Obj*)other),
+        "Equals() true with identical stats");
+    TEST_FALSE(batch, FType_Equals(type, (Obj*)class_differs),
+        "Equals() false with subclass");
+    TEST_FALSE(batch, FType_Equals(type, (Obj*)class_differs),
+        "Equals() false with super class");
+    TEST_FALSE(batch, FType_Equals(type, (Obj*)boost_differs),
+        "Equals() false with different boost");
+    TEST_FALSE(batch, FType_Equals(type, (Obj*)indexed),
+        "Equals() false with indexed => true");
+    TEST_FALSE(batch, FType_Equals(type, (Obj*)stored),
+        "Equals() false with stored => true");
+
+    DECREF(stored);
+    DECREF(indexed);
+    DECREF(boost_differs);
+    DECREF(other);
+    DECREF(type);
+}
+
+static void
+test_Compare_Values(TestBatch *batch)
+{
+    FieldType     *type = (FieldType*)DummyFieldType_new();
+    ZombieCharBuf *a    = ZCB_WRAP_STR("a", 1);
+    ZombieCharBuf *b    = ZCB_WRAP_STR("b", 1);
+
+    TEST_TRUE(batch, 
+        FType_Compare_Values(type, (Obj*)a, (Obj*)b) < 0,
+        "a less than b");
+    TEST_TRUE(batch, 
+        FType_Compare_Values(type, (Obj*)b, (Obj*)a) > 0,
+        "b greater than a");
+    TEST_TRUE(batch, 
+        FType_Compare_Values(type, (Obj*)b, (Obj*)b) == 0,
+        "b equals b");
+
+    DECREF(type);
+}
+
+void
+TestFType_run_tests()
+{
+    TestBatch *batch = TestBatch_new(9);
+    TestBatch_Plan(batch);
+    test_Dump_Load_and_Equals(batch);
+    test_Compare_Values(batch);
+    DECREF(batch);
+}
+
+/* Copyright 2005-2011 Marvin Humphrey
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * under the same terms as Perl itself.
+ */
+

Added: branches/upstream/libkinosearch-perl/current/core/KinoSearch/Test/Plan/TestFieldType.cfh
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libkinosearch-perl/current/core/KinoSearch/Test/Plan/TestFieldType.cfh?rev=71974&op=file
==============================================================================
--- branches/upstream/libkinosearch-perl/current/core/KinoSearch/Test/Plan/TestFieldType.cfh (added)
+++ branches/upstream/libkinosearch-perl/current/core/KinoSearch/Test/Plan/TestFieldType.cfh Fri Mar 25 15:06:47 2011
@@ -1,0 +1,18 @@
+parcel KinoSearch cnick Kino;
+
+inert class KinoSearch::Test::Plan::TestFieldType cnick TestFType {
+    inert void
+    run_tests();
+}
+
+class KinoSearch::Test::Plan::DummyFieldType inherits KinoSearch::Plan::FieldType {
+    inert incremented DummyFieldType*
+    new();
+}
+
+/* Copyright 2005-2011 Marvin Humphrey
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * under the same terms as Perl itself.
+ */
+

Modified: branches/upstream/libkinosearch-perl/current/lib/KinoSearch.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libkinosearch-perl/current/lib/KinoSearch.pm?rev=71974&op=diff
==============================================================================
--- branches/upstream/libkinosearch-perl/current/lib/KinoSearch.pm (original)
+++ branches/upstream/libkinosearch-perl/current/lib/KinoSearch.pm Fri Mar 25 15:06:47 2011
@@ -6,12 +6,12 @@
 use 5.008003;
 use Exporter;
 
-our $VERSION = '0.312';
+our $VERSION = '0.313';
 $VERSION = eval $VERSION;
 
 use XSLoader;
 # This loads a large number of disparate subs.
-BEGIN { XSLoader::load( 'KinoSearch', '0.312' ) }
+BEGIN { XSLoader::load( 'KinoSearch', '0.313' ) }
 
 BEGIN {
     push our @ISA, 'Exporter';

Modified: branches/upstream/libkinosearch-perl/current/lib/KinoSearch.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libkinosearch-perl/current/lib/KinoSearch.pod?rev=71974&op=diff
==============================================================================
--- branches/upstream/libkinosearch-perl/current/lib/KinoSearch.pod (original)
+++ branches/upstream/libkinosearch-perl/current/lib/KinoSearch.pod Fri Mar 25 15:06:47 2011
@@ -4,7 +4,7 @@
 
 =head1 VERSION
 
-0.312
+0.313
 
 =head1 SYNOPSIS
 

Modified: branches/upstream/libkinosearch-perl/current/lib/KinoSearch/Test.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libkinosearch-perl/current/lib/KinoSearch/Test.pm?rev=71974&op=diff
==============================================================================
--- branches/upstream/libkinosearch-perl/current/lib/KinoSearch/Test.pm (original)
+++ branches/upstream/libkinosearch-perl/current/lib/KinoSearch/Test.pm Fri Mar 25 15:06:47 2011
@@ -63,6 +63,9 @@
     else if (strEQ(package, "TestBlobType")) {
         kino_TestBlobType_run_tests();
     }
+    else if (strEQ(package, "TestFieldType")) {
+        kino_TestFType_run_tests();
+    }
     else if (strEQ(package, "TestFullTextType")) {
         kino_TestFullTextType_run_tests();
     }
@@ -81,6 +84,9 @@
     }
     else if (strEQ(package, "TestIndexManager")) {
         kino_TestIxManager_run_tests();
+    }
+    else if (strEQ(package, "TestPolyReader")) {
+        kino_TestPolyReader_run_tests();
     }
     else if (strEQ(package, "TestPostingListWriter")) {
         kino_TestPListWriter_run_tests();

Modified: branches/upstream/libkinosearch-perl/current/t/binding/702-sample.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libkinosearch-perl/current/t/binding/702-sample.t?rev=71974&op=diff
==============================================================================
--- branches/upstream/libkinosearch-perl/current/t/binding/702-sample.t (original)
+++ branches/upstream/libkinosearch-perl/current/t/binding/702-sample.t Fri Mar 25 15:06:47 2011
@@ -1,20 +1,19 @@
 use strict;
 use warnings;
 use lib 'buildlib';
-use Test::More;
+use Test::More tests => 1;
 use File::Spec::Functions qw( catfile catdir );
 use File::Path qw( rmtree );
 
-system("$^X -MJSON::XS -e1");
-if ($?) {
-    plan( skip_all => 'complicated @INC issue' );
-}
-else {
-    plan( tests => 1 );
-}
-
 my $search_cgi_orig_path = catfile(qw( sample search.cgi ));
 my $indexer_pl_orig_path = catfile(qw( sample indexer.pl ));
+
+# Ensure that all @INC dirs make it into the scripts.  We can't use PERL5LIB
+# because search.cgi runs with taint mode and environment vars are tainted.
+my $blib_arch = catdir(qw( blib arch ));
+my $blib_lib  = catdir(qw( blib lib ));
+my @inc_dirs  = map {"use lib '$_';"} ( $blib_arch, $blib_lib, @INC );
+my $use_dirs  = join( "\n", @inc_dirs );
 
 for my $filename (qw( search.cgi indexer.pl )) {
     my $orig_path = catfile( 'sample', $filename );
@@ -25,10 +24,7 @@
         or die "no match";
     my $uscon_source = catdir(qw( sample us_constitution ));
     $content =~ s/(uscon_source\s+=\s+).*?;/$1'$uscon_source';/;
-    my $blib_arch = catdir(qw( blib arch ));
-    my $blib_lib  = catdir(qw( blib lib ));
-    my $blib      = "use lib '$blib_arch';\nuse lib '$blib_lib'\n";
-    $content =~ s/^use/$blib;\nuse/m;
+    $content =~ s/^use/$use_dirs;\nuse/m;
     open( $fh, '>', "_$filename" ) or die $!;
     print $fh $content;
     close $fh or die "Close failed: $!";

Added: branches/upstream/libkinosearch-perl/current/t/core/225-polyreader.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libkinosearch-perl/current/t/core/225-polyreader.t?rev=71974&op=file
==============================================================================
--- branches/upstream/libkinosearch-perl/current/t/core/225-polyreader.t (added)
+++ branches/upstream/libkinosearch-perl/current/t/core/225-polyreader.t Fri Mar 25 15:06:47 2011
@@ -1,0 +1,6 @@
+use strict;
+use warnings;
+
+use KinoSearch::Test;
+KinoSearch::Test::run_tests("TestPolyReader");
+

Added: branches/upstream/libkinosearch-perl/current/t/core/234-field_type.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libkinosearch-perl/current/t/core/234-field_type.t?rev=71974&op=file
==============================================================================
--- branches/upstream/libkinosearch-perl/current/t/core/234-field_type.t (added)
+++ branches/upstream/libkinosearch-perl/current/t/core/234-field_type.t Fri Mar 25 15:06:47 2011
@@ -1,0 +1,6 @@
+use strict;
+use warnings;
+
+use KinoSearch::Test;
+KinoSearch::Test::run_tests("TestFieldType");
+




More information about the Pkg-perl-cvs-commits mailing list