Mailing List Archive

Author: creamyg
Date: 2008-07-28 10:35:56 -0700 (Mon, 28 Jul 2008)
New Revision: 3654

Modified:
trunk/perl/lib/KinoSearch/Index/IndexFileNames.pm
Log:
Kill off more useless XS bindings in IndexFileNames.


Modified: trunk/perl/lib/KinoSearch/Index/IndexFileNames.pm
===================================================================
--- trunk/perl/lib/KinoSearch/Index/IndexFileNames.pm 2008-07-28 17:17:14 UTC (rev 3653)
+++ trunk/perl/lib/KinoSearch/Index/IndexFileNames.pm 2008-07-28 17:35:56 UTC (rev 3654)
@@ -3,18 +3,9 @@

package KinoSearch::Index::IndexFileNames;
use KinoSearch::Util::ToolSet qw( to_kino );
-
use KinoSearch::base qw( Exporter );

-use KinoSearch::Util::StringHelper qw( to_base36 from_base36 );
-
our @EXPORT_OK = qw(
- read_lock_timeout
- write_lock_name
- write_lock_timeout
- commit_lock_name
- commit_lock_timeout
-
gen_from_filename
unused_files
);
@@ -26,11 +17,6 @@
return _unused_files( to_kino($files), to_kino( \@snapshots ) );
}

-sub latest_gen {
- my ( $filenames, $base, $ext ) = @_;
- return _latest_gen( to_kino($filenames), $base, $ext );
-}
-
1;

__END__
@@ -39,19 +25,6 @@

MODULE = KinoSearch PACKAGE = KinoSearch::Index::IndexFileNames

-SV*
-_latest_gen(file_list, base, ext)
- kino_VArray *file_list;
- kino_CharBuf base;
- kino_CharBuf ext;
-CODE:
-{
- kino_CharBuf *file = kino_IxFileNames_latest_gen(file_list, &base, &ext);
- RETVAL = cb_to_sv(file);
- REFCOUNT_DEC(file);
-}
-OUTPUT: RETVAL
-
UV
gen_from_filename(filename)
kino_CharBuf filename;
@@ -71,36 +44,6 @@
}
OUTPUT:RETVAL

-IV
-read_lock_timeout()
-CODE:
- RETVAL = kino_IxFileNames_read_lock_timeout;
-OUTPUT: RETVAL
-
-SV*
-write_lock_name()
-CODE:
- RETVAL = cb_to_sv(&kino_IxFileNames_write_lock_name);
-OUTPUT: RETVAL
-
-IV
-write_lock_timeout()
-CODE:
- RETVAL = kino_IxFileNames_write_lock_timeout;
-OUTPUT: RETVAL
-
-SV*
-commit_lock_name()
-CODE:
- RETVAL = cb_to_sv(&kino_IxFileNames_commit_lock_name);
-OUTPUT: RETVAL
-
-IV
-commit_lock_timeout()
-CODE:
- RETVAL = kino_IxFileNames_commit_lock_timeout;
-OUTPUT: RETVAL
-
void
set_commit_lock_timeout(value);
chy_u32_t value;


_______________________________________________
kinosearch-commits mailing list
kinosearch-commits@rectangular.com
http://www.rectangular.com/mailman/listinfo/kinosearch-commits