lucy-commits mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From mar...@apache.org
Subject svn commit: r930567 - in /lucene/lucy/trunk/perl/lib/Lucy: Object/Obj.pm Store/InStream.pm Test.pm
Date Sat, 03 Apr 2010 19:24:57 GMT
Author: marvin
Date: Sat Apr  3 19:24:57 2010
New Revision: 930567

URL: http://svn.apache.org/viewvc?rev=930567&view=rev
Log:
Switch over manual XS binding code to C99-style line comments.

Modified:
    lucene/lucy/trunk/perl/lib/Lucy/Object/Obj.pm
    lucene/lucy/trunk/perl/lib/Lucy/Store/InStream.pm
    lucene/lucy/trunk/perl/lib/Lucy/Test.pm

Modified: lucene/lucy/trunk/perl/lib/Lucy/Object/Obj.pm
URL: http://svn.apache.org/viewvc/lucene/lucy/trunk/perl/lib/Lucy/Object/Obj.pm?rev=930567&r1=930566&r2=930567&view=diff
==============================================================================
--- lucene/lucy/trunk/perl/lib/Lucy/Object/Obj.pm (original)
+++ lucene/lucy/trunk/perl/lib/Lucy/Object/Obj.pm Sat Apr  3 19:24:57 2010
@@ -43,7 +43,7 @@ PPCODE:
         LUCY_DECREF(file_handle);
         LUCY_DECREF(target);
 
-        if (SvCUR(retval) == 0) { /* Thwart Storable bug */
+        if (SvCUR(retval) == 0) { // Thwart Storable bug 
             THROW(LUCY_ERR, "Calling serialize produced an empty string");
         }
         ST(0) = sv_2mortal(retval);
@@ -87,7 +87,7 @@ PPCODE:
     LUCY_DECREF(file_handle);
     LUCY_DECREF(instream);
 
-    /* Catch bad deserialize() override. */
+    // Catch bad deserialize() override. 
     if (deserialized != self) {
         THROW(LUCY_ERR, "Error when deserializing obj of class %o", klass);
     }

Modified: lucene/lucy/trunk/perl/lib/Lucy/Store/InStream.pm
URL: http://svn.apache.org/viewvc/lucene/lucy/trunk/perl/lib/Lucy/Store/InStream.pm?rev=930567&r1=930566&r2=930567&view=diff
==============================================================================
--- lucene/lucy/trunk/perl/lib/Lucy/Store/InStream.pm (original)
+++ lucene/lucy/trunk/perl/lib/Lucy/Store/InStream.pm Sat Apr  3 19:24:57 2010
@@ -41,7 +41,7 @@ CODE:
     RETVAL = newSV(len + 1);
     SvCUR_set(RETVAL, len);
     SvPOK_on(RETVAL);
-    SvUTF8_on(RETVAL); /* Trust source.  Reconsider if API goes public. */
+    SvUTF8_on(RETVAL); // Trust source.  Reconsider if API goes public. 
     *SvEND(RETVAL) = '\0';
     ptr = SvPVX(RETVAL);
     Lucy_InStream_Read_Bytes(self, ptr, len);

Modified: lucene/lucy/trunk/perl/lib/Lucy/Test.pm
URL: http://svn.apache.org/viewvc/lucene/lucy/trunk/perl/lib/Lucy/Test.pm?rev=930567&r1=930566&r2=930567&view=diff
==============================================================================
--- lucene/lucy/trunk/perl/lib/Lucy/Test.pm (original)
+++ lucene/lucy/trunk/perl/lib/Lucy/Test.pm Sat Apr  3 19:24:57 2010
@@ -14,11 +14,11 @@ run_tests(package)
     char *package;
 PPCODE:
 {
-    /* Lucy::Index */
+    // Lucy::Index 
     if (strEQ(package, "TestSegment")) {
         lucy_TestSeg_run_tests();
     }
-    /* Lucy::Object */
+    // Lucy::Object 
     else if (strEQ(package, "TestObj")) {
         lucy_TestObj_run_tests();
     }
@@ -46,7 +46,7 @@ PPCODE:
     else if (strEQ(package, "TestVArray")) {
         lucy_TestVArray_run_tests();
     }
-    /* Lucy::Store */
+    // Lucy::Store 
     else if (strEQ(package, "TestCompoundFileReader")) {
         lucy_TestCFReader_run_tests();
     }
@@ -86,7 +86,7 @@ PPCODE:
     else if (strEQ(package, "TestRAMFolder")) {
         lucy_TestRAMFolder_run_tests();
     }
-    /* Lucy::Util */
+    // Lucy::Util 
     else if (strEQ(package, "TestAtomic")) {
         lucy_TestAtomic_run_tests();
     }



Mime
View raw message