search-xapian/t/symbol-test/SymbolTest.xs

   1 #include <xapian.h>
   2
   3 extern "C" {
   4 #include "EXTERN.h"
   5 #include "perl.h"
   6 #include "XSUB.h"
   7 }
   8
   9 MODULE = SymbolTest     PACKAGE = SymbolTest
  10
  11 PROTOTYPES: ENABLE
  12
  13 void
  14 throw_from_libxapian()
  15     CODE:
  16         try {
  17             Xapian::WritableDatabase db("/dev/null", Xapian::DB_CREATE_OR_OPEN);
  18         } catch (const Xapian::Error & error) {
  19             croak("%s caught in SymbolTest", error.get_type());
  20         } catch (...) {
  21             croak("Unknown C++ exception caught in SymbolTest");
  22         }