[Clucene-cvs] SF.net SVN: clucene: [2478] trunk/bindings/perl/xs/IndexWriter.xs

[<tho...@us...>]

Revision: 2478
          http://svn.sourceforge.net/clucene/?rev=2478&view=rev
Author:   thomas_busch
Date:     2006-12-08 03:50:34 -0800 (Fri, 08 Dec 2006)

Log Message:
-----------
added more exception handling

Modified Paths:
--------------
    trunk/bindings/perl/xs/IndexWriter.xs

Modified: trunk/bindings/perl/xs/IndexWriter.xs
===================================================================
--- trunk/bindings/perl/xs/IndexWriter.xs	2006-12-08 11:48:04 UTC (rev 2477)
+++ trunk/bindings/perl/xs/IndexWriter.xs	2006-12-08 11:50:34 UTC (rev 2478)
@@ -24,7 +24,11 @@
 IndexWriter* self
 Document* document
     CODE:
-        self->addDocument(document);
+        try {
+          self->addDocument(document);
+        } catch (CLuceneError& e) {
+          die("[Lucene::Index::IndexWriter->addDocument()] %s\n", e.what());
+        }
     OUTPUT:
 
 void
@@ -35,7 +39,11 @@
         Directory* directories[1];
         directories[0] = directory;
         directories[1] = NULL;
-        self->addIndexes(directories);
+        try {
+          self->addIndexes(directories);
+        } catch (CLuceneError& e) {
+          die("[Lucene::Index::IndexWriter->addIndexes()] %s\n", e.what());
+        }
 
 
 void setMaxFieldLength(self, max_tokens)
@@ -121,7 +129,11 @@
 optimize(self)
 IndexWriter* self
     CODE:
-        self->optimize();
+        try {
+          self->optimize();
+        } catch (CLuceneError& e) {
+          die("[Lucene::Index::IndexWriter->optimize()] %s\n", e.what());
+        }
     OUTPUT:
 
 int


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.