Remove Index POD whitelist Methods that weren't documented in the Perl bindings are made private.
Project: http://git-wip-us.apache.org/repos/asf/lucy/repo Commit: http://git-wip-us.apache.org/repos/asf/lucy/commit/21252a9d Tree: http://git-wip-us.apache.org/repos/asf/lucy/tree/21252a9d Diff: http://git-wip-us.apache.org/repos/asf/lucy/diff/21252a9d Branch: refs/heads/master Commit: 21252a9dbe50f0df5ea4c1cc95a88516b3a28df6 Parents: 7533000 Author: Nick Wellnhofer <wellnho...@aevum.de> Authored: Thu Aug 20 22:31:03 2015 +0200 Committer: Nick Wellnhofer <wellnho...@aevum.de> Committed: Sun Aug 23 15:02:56 2015 +0200 ---------------------------------------------------------------------- core/Lucy/Index/DataReader.cfh | 2 +- core/Lucy/Index/DeletionsReader.cfh | 4 +- core/Lucy/Index/DeletionsWriter.cfh | 10 +- core/Lucy/Index/DocReader.cfh | 4 +- core/Lucy/Index/HighlightReader.cfh | 4 +- core/Lucy/Index/IndexManager.cfh | 32 +++--- core/Lucy/Index/IndexReader.cfh | 2 +- core/Lucy/Index/Indexer.cfh | 2 +- core/Lucy/Index/Lexicon.cfh | 4 +- core/Lucy/Index/LexiconReader.cfh | 4 +- core/Lucy/Index/PolyReader.cfh | 2 +- core/Lucy/Index/PostingListReader.cfh | 2 +- core/Lucy/Index/RawLexicon.cfh | 2 +- core/Lucy/Index/SegLexicon.cfh | 2 +- core/Lucy/Index/SegReader.cfh | 2 +- core/Lucy/Index/Segment.cfh | 4 +- core/Lucy/Index/Similarity.cfh | 14 +-- core/Lucy/Index/SortReader.cfh | 2 +- perl/buildlib/Lucy/Build/Binding/Index.pm | 142 ------------------------- 19 files changed, 49 insertions(+), 191 deletions(-) ---------------------------------------------------------------------- http://git-wip-us.apache.org/repos/asf/lucy/blob/21252a9d/core/Lucy/Index/DataReader.cfh ---------------------------------------------------------------------- diff --git a/core/Lucy/Index/DataReader.cfh b/core/Lucy/Index/DataReader.cfh index 38d6259..ce40f04 100644 --- a/core/Lucy/Index/DataReader.cfh +++ b/core/Lucy/Index/DataReader.cfh @@ -91,7 +91,7 @@ public class Lucy::Index::DataReader inherits Clownfish::Obj { * performed upon either the reader or any component subreaders other than * object destruction. */ - public abstract void + abstract void Close(DataReader *self); public void http://git-wip-us.apache.org/repos/asf/lucy/blob/21252a9d/core/Lucy/Index/DeletionsReader.cfh ---------------------------------------------------------------------- diff --git a/core/Lucy/Index/DeletionsReader.cfh b/core/Lucy/Index/DeletionsReader.cfh index c1db617..8826739 100644 --- a/core/Lucy/Index/DeletionsReader.cfh +++ b/core/Lucy/Index/DeletionsReader.cfh @@ -59,7 +59,7 @@ class Lucy::Index::PolyDeletionsReader nickname PolyDelReader incremented Matcher* Iterator(PolyDeletionsReader *self); - public void + void Close(PolyDeletionsReader *self); public void @@ -89,7 +89,7 @@ class Lucy::Index::DefaultDeletionsReader nickname DefDelReader nullable BitVector* Read_Deletions(DefaultDeletionsReader *self); - public void + void Close(DefaultDeletionsReader *self); public void http://git-wip-us.apache.org/repos/asf/lucy/blob/21252a9d/core/Lucy/Index/DeletionsWriter.cfh ---------------------------------------------------------------------- diff --git a/core/Lucy/Index/DeletionsWriter.cfh b/core/Lucy/Index/DeletionsWriter.cfh index e1e4795..6363a27 100644 --- a/core/Lucy/Index/DeletionsWriter.cfh +++ b/core/Lucy/Index/DeletionsWriter.cfh @@ -58,7 +58,7 @@ public abstract class Lucy::Index::DeletionsWriter nickname DelWriter /** Delete the document identified in the PolyReader by the supplied id. */ - public abstract void + abstract void Delete_By_Doc_ID(DeletionsWriter *self, int32_t doc_id); /** Returns true if there are updates that need to be written. @@ -76,7 +76,7 @@ public abstract class Lucy::Index::DeletionsWriter nickname DelWriter * With an offset of 1000, the array in the previous example would be * { 1001, 0, 1002, 1003 }. */ - public incremented I32Array* + incremented I32Array* Generate_Doc_Map(DeletionsWriter *self, Matcher *deletions, int32_t doc_max, int32_t offset); @@ -84,7 +84,7 @@ public abstract class Lucy::Index::DeletionsWriter nickname DelWriter * a component within the PolyReader that was supplied at * construction-time. */ - public abstract incremented nullable Matcher* + abstract incremented nullable Matcher* Seg_Deletions(DeletionsWriter *self, SegReader *seg_reader); /** Return the number of deletions for a given segment. @@ -130,13 +130,13 @@ class Lucy::Index::DefaultDeletionsWriter nickname DefDelWriter public void Delete_By_Query(DefaultDeletionsWriter *self, Query *query); - public void + void Delete_By_Doc_ID(DefaultDeletionsWriter *self, int32_t doc_id); public bool Updated(DefaultDeletionsWriter *self); - public incremented nullable Matcher* + incremented nullable Matcher* Seg_Deletions(DefaultDeletionsWriter *self, SegReader *seg_reader); public int32_t http://git-wip-us.apache.org/repos/asf/lucy/blob/21252a9d/core/Lucy/Index/DocReader.cfh ---------------------------------------------------------------------- diff --git a/core/Lucy/Index/DocReader.cfh b/core/Lucy/Index/DocReader.cfh index 8de9c6e..5a608dc 100644 --- a/core/Lucy/Index/DocReader.cfh +++ b/core/Lucy/Index/DocReader.cfh @@ -62,7 +62,7 @@ class Lucy::Index::PolyDocReader inherits Lucy::Index::DocReader { public incremented HitDoc* Fetch_Doc(PolyDocReader *self, int32_t doc_id); - public void + void Close(PolyDocReader *self); public void @@ -92,7 +92,7 @@ class Lucy::Index::DefaultDocReader nickname DefDocReader void Read_Record(DefaultDocReader *self, ByteBuf *buffer, int32_t doc_id); - public void + void Close(DefaultDocReader *self); public void http://git-wip-us.apache.org/repos/asf/lucy/blob/21252a9d/core/Lucy/Index/HighlightReader.cfh ---------------------------------------------------------------------- diff --git a/core/Lucy/Index/HighlightReader.cfh b/core/Lucy/Index/HighlightReader.cfh index d6cef6d..101bbd2 100644 --- a/core/Lucy/Index/HighlightReader.cfh +++ b/core/Lucy/Index/HighlightReader.cfh @@ -52,7 +52,7 @@ class Lucy::Index::PolyHighlightReader nickname PolyHLReader public incremented DocVector* Fetch_Doc_Vec(PolyHighlightReader *self, int32_t doc_id); - public void + void Close(PolyHighlightReader *self); public void @@ -86,7 +86,7 @@ class Lucy::Index::DefaultHighlightReader nickname DefHLReader Read_Record(DefaultHighlightReader *self, int32_t doc_id, ByteBuf *buffer); - public void + void Close(DefaultHighlightReader *self); public void http://git-wip-us.apache.org/repos/asf/lucy/blob/21252a9d/core/Lucy/Index/IndexManager.cfh ---------------------------------------------------------------------- diff --git a/core/Lucy/Index/IndexManager.cfh b/core/Lucy/Index/IndexManager.cfh index 7a16231..05a22b4 100644 --- a/core/Lucy/Index/IndexManager.cfh +++ b/core/Lucy/Index/IndexManager.cfh @@ -105,45 +105,45 @@ public class Lucy::Index::IndexManager nickname IxManager /** Create the Lock which grants permission to delete obsolete snapshot * files or any file listed within an existing snapshot file. */ - public incremented Lock* + incremented Lock* Make_Deletion_Lock(IndexManager *self); - public incremented Lock* + incremented Lock* Make_Merge_Lock(IndexManager *self); /** Write supplied data to "merge.json". Throw an exception if the write * fails. */ - public void + void Write_Merge_Data(IndexManager *self, int64_t cutoff); /** Look for the "merge.json" file dropped by BackgroundMerger. If it's * not there, return NULL. If it's there but can't be decoded, return an * empty Hash. If successfully decoded, return contents. */ - public incremented Hash* + incremented Hash* Read_Merge_Data(IndexManager *self); - public bool + bool Remove_Merge_Data(IndexManager *self); /** Create a shared lock on a snapshot file, which serves as a proxy for * all the files it lists and indicates that they must not be deleted. */ - public incremented Lock* + incremented Lock* Make_Snapshot_Read_Lock(IndexManager *self, String *filename); /** Return the highest number for a segment directory which contains a * segmeta file in the snapshot. */ - public int64_t + int64_t Highest_Seg_Num(IndexManager *self, Snapshot *snapshot); /** Return the name of a new snapshot file, which shall contain a base-36 * "generation" embedded inside it greater than the generation of any * snapshot file currently in the index folder. */ - public incremented String* + incremented String* Make_Snapshot_Filename(IndexManager *self); /** Setter for write lock timeout. Default: 1000 milliseconds. @@ -168,42 +168,42 @@ public class Lucy::Index::IndexManager nickname IxManager /** Setter for merge lock timeout. Default: 0 milliseconds (no retries). */ - public void + void Set_Merge_Lock_Timeout(IndexManager *self, uint32_t timeout); /** Getter for merge lock timeout. */ - public uint32_t + uint32_t Get_Merge_Lock_Timeout(IndexManager *self); /** Setter for merge lock retry interval. Default: 1000 milliseconds. */ - public void + void Set_Merge_Lock_Interval(IndexManager *self, uint32_t timeout); /** Getter for merge lock retry interval. */ - public uint32_t + uint32_t Get_Merge_Lock_Interval(IndexManager *self); /** Setter for deletion lock timeout. Default: 1000 milliseconds. */ - public void + void Set_Deletion_Lock_Timeout(IndexManager *self, uint32_t timeout); /** Getter for deletion lock timeout. */ - public uint32_t + uint32_t Get_Deletion_Lock_Timeout(IndexManager *self); /** Setter for deletion lock retry interval. Default: 100 milliseconds. */ - public void + void Set_Deletion_Lock_Interval(IndexManager *self, uint32_t timeout); /** Getter for deletion lock retry interval. */ - public uint32_t + uint32_t Get_Deletion_Lock_Interval(IndexManager *self); } http://git-wip-us.apache.org/repos/asf/lucy/blob/21252a9d/core/Lucy/Index/IndexReader.cfh ---------------------------------------------------------------------- diff --git a/core/Lucy/Index/IndexReader.cfh b/core/Lucy/Index/IndexReader.cfh index 77c8875..b5c9365 100644 --- a/core/Lucy/Index/IndexReader.cfh +++ b/core/Lucy/Index/IndexReader.cfh @@ -113,7 +113,7 @@ public class Lucy::Index::IndexReader nickname IxReader public nullable DataReader* Fetch(IndexReader *self, String *api); - public void + void Close(IndexReader *self); Hash* http://git-wip-us.apache.org/repos/asf/lucy/blob/21252a9d/core/Lucy/Index/Indexer.cfh ---------------------------------------------------------------------- diff --git a/core/Lucy/Index/Indexer.cfh b/core/Lucy/Index/Indexer.cfh index 4ee07ef..36d118c 100644 --- a/core/Lucy/Index/Indexer.cfh +++ b/core/Lucy/Index/Indexer.cfh @@ -165,7 +165,7 @@ public class Lucy::Index::Indexer inherits Clownfish::Obj { /** Accessor for seg_writer member var. */ - public SegWriter* + SegWriter* Get_Seg_Writer(Indexer *self); Doc* http://git-wip-us.apache.org/repos/asf/lucy/blob/21252a9d/core/Lucy/Index/Lexicon.cfh ---------------------------------------------------------------------- diff --git a/core/Lucy/Index/Lexicon.cfh b/core/Lucy/Index/Lexicon.cfh index 8025c1a..303ce03 100644 --- a/core/Lucy/Index/Lexicon.cfh +++ b/core/Lucy/Index/Lexicon.cfh @@ -64,7 +64,7 @@ public class Lucy::Index::Lexicon nickname Lex inherits Clownfish::Obj { /** Return the number of documents that the current term appears in at * least once. Deleted documents may be included in the count. */ - public abstract int32_t + abstract int32_t Doc_Freq(Lexicon *self); /** Return the current term, or [](cfish:@null) if the iterator is not in a @@ -73,7 +73,7 @@ public class Lucy::Index::Lexicon nickname Lex inherits Clownfish::Obj { public abstract nullable Obj* Get_Term(Lexicon *self); - public String* + String* Get_Field(Lexicon *self); } http://git-wip-us.apache.org/repos/asf/lucy/blob/21252a9d/core/Lucy/Index/LexiconReader.cfh ---------------------------------------------------------------------- diff --git a/core/Lucy/Index/LexiconReader.cfh b/core/Lucy/Index/LexiconReader.cfh index 916d70f..85e4c72 100644 --- a/core/Lucy/Index/LexiconReader.cfh +++ b/core/Lucy/Index/LexiconReader.cfh @@ -77,7 +77,7 @@ class Lucy::Index::PolyLexiconReader nickname PolyLexReader public uint32_t Doc_Freq(PolyLexiconReader *self, String *field, Obj *term); - public void + void Close(PolyLexiconReader *self); public void @@ -110,7 +110,7 @@ class Lucy::Index::DefaultLexiconReader nickname DefLexReader Fetch_Term_Info(DefaultLexiconReader *self, String *field, Obj *term); - public void + void Close(DefaultLexiconReader *self); public void http://git-wip-us.apache.org/repos/asf/lucy/blob/21252a9d/core/Lucy/Index/PolyReader.cfh ---------------------------------------------------------------------- diff --git a/core/Lucy/Index/PolyReader.cfh b/core/Lucy/Index/PolyReader.cfh index a118d98..970a309 100644 --- a/core/Lucy/Index/PolyReader.cfh +++ b/core/Lucy/Index/PolyReader.cfh @@ -82,7 +82,7 @@ public class Lucy::Index::PolyReader inherits Lucy::Index::IndexReader { Vector* Get_Seg_Readers(PolyReader *self); - public void + void Close(PolyReader *self); public void http://git-wip-us.apache.org/repos/asf/lucy/blob/21252a9d/core/Lucy/Index/PostingListReader.cfh ---------------------------------------------------------------------- diff --git a/core/Lucy/Index/PostingListReader.cfh b/core/Lucy/Index/PostingListReader.cfh index 9bf512c..05cb71a 100644 --- a/core/Lucy/Index/PostingListReader.cfh +++ b/core/Lucy/Index/PostingListReader.cfh @@ -71,7 +71,7 @@ class Lucy::Index::DefaultPostingListReader nickname DefPListReader LexiconReader* Get_Lex_Reader(DefaultPostingListReader *self); - public void + void Close(DefaultPostingListReader *self); public void http://git-wip-us.apache.org/repos/asf/lucy/blob/21252a9d/core/Lucy/Index/RawLexicon.cfh ---------------------------------------------------------------------- diff --git a/core/Lucy/Index/RawLexicon.cfh b/core/Lucy/Index/RawLexicon.cfh index 2dcaf7c..ac47a22 100644 --- a/core/Lucy/Index/RawLexicon.cfh +++ b/core/Lucy/Index/RawLexicon.cfh @@ -45,7 +45,7 @@ class Lucy::Index::RawLexicon nickname RawLex public nullable Obj* Get_Term(RawLexicon *self); - public int32_t + int32_t Doc_Freq(RawLexicon *self); } http://git-wip-us.apache.org/repos/asf/lucy/blob/21252a9d/core/Lucy/Index/SegLexicon.cfh ---------------------------------------------------------------------- diff --git a/core/Lucy/Index/SegLexicon.cfh b/core/Lucy/Index/SegLexicon.cfh index d152d5c..eb4b682 100644 --- a/core/Lucy/Index/SegLexicon.cfh +++ b/core/Lucy/Index/SegLexicon.cfh @@ -68,7 +68,7 @@ class Lucy::Index::SegLexicon nickname SegLex public nullable Obj* Get_Term(SegLexicon *self); - public int32_t + int32_t Doc_Freq(SegLexicon *self); public bool http://git-wip-us.apache.org/repos/asf/lucy/blob/21252a9d/core/Lucy/Index/SegReader.cfh ---------------------------------------------------------------------- diff --git a/core/Lucy/Index/SegReader.cfh b/core/Lucy/Index/SegReader.cfh index 81b7333..9ba3293 100644 --- a/core/Lucy/Index/SegReader.cfh +++ b/core/Lucy/Index/SegReader.cfh @@ -62,7 +62,7 @@ public class Lucy::Index::SegReader inherits Lucy::Index::IndexReader { * interface implemented by `component`. * @param component A DataReader. */ - public void + void Register(SegReader *self, String *api, decremented DataReader *component); http://git-wip-us.apache.org/repos/asf/lucy/blob/21252a9d/core/Lucy/Index/Segment.cfh ---------------------------------------------------------------------- diff --git a/core/Lucy/Index/Segment.cfh b/core/Lucy/Index/Segment.cfh index f51a0af..c30ed95 100644 --- a/core/Lucy/Index/Segment.cfh +++ b/core/Lucy/Index/Segment.cfh @@ -136,7 +136,7 @@ public class Lucy::Index::Segment nickname Seg inherits Clownfish::Obj { /** Write the segdata file. */ - public void + void Write_File(Segment *self, Folder *folder); /** Read the segmeta file for this segment. @@ -144,7 +144,7 @@ public class Lucy::Index::Segment nickname Seg inherits Clownfish::Obj { * @return true if the file is read and decoded successfully, false * otherwise. */ - public bool + bool Read_File(Segment *self, Folder *folder); /** Compare by segment number. http://git-wip-us.apache.org/repos/asf/lucy/blob/21252a9d/core/Lucy/Index/Similarity.cfh ---------------------------------------------------------------------- diff --git a/core/Lucy/Index/Similarity.cfh b/core/Lucy/Index/Similarity.cfh index 61736df..b3f288c 100644 --- a/core/Lucy/Index/Similarity.cfh +++ b/core/Lucy/Index/Similarity.cfh @@ -47,7 +47,7 @@ public class Lucy::Index::Similarity nickname Sim inherits Clownfish::Obj { /** Factory method for creating a Posting. */ - public incremented Posting* + incremented Posting* Make_Posting(Similarity *self); /** Factory method for creating a PostingWriter. @@ -63,7 +63,7 @@ public class Lucy::Index::Similarity nickname Sim inherits Clownfish::Obj { * freqs, since the more times a doc matches, the more relevant it is * likely to be. */ - public float + float TF(Similarity *self, float freq); /** Calculate the Inverse Document Frequecy for a term in a given @@ -72,12 +72,12 @@ public class Lucy::Index::Similarity nickname Sim inherits Clownfish::Obj { * @param doc_freq The number of documents that the term appears in. * @param total_docs The number of documents in the collection. */ - public float + float IDF(Similarity *self, int64_t doc_freq, int64_t total_docs); /** Calculate a score factor based on the number of terms which match. */ - public float + float Coord(Similarity *self, uint32_t overlap, uint32_t max_overlap); /** Dampen the scores of long documents. @@ -101,7 +101,7 @@ public class Lucy::Index::Similarity nickname Sim inherits Clownfish::Obj { /** Normalize a Query's weight so that it is comparable to other Queries. */ - public float + float Query_Norm(Similarity *self, float sum_of_squared_weights); /** encode_norm and decode_norm encode and decode between 32-bit IEEE @@ -123,10 +123,10 @@ public class Lucy::Index::Similarity nickname Sim inherits Clownfish::Obj { public void Destroy(Similarity *self); - public incremented Obj* + incremented Obj* Dump(Similarity *self); - public incremented Similarity* + incremented Similarity* Load(Similarity *self, Obj *dump); public bool http://git-wip-us.apache.org/repos/asf/lucy/blob/21252a9d/core/Lucy/Index/SortReader.cfh ---------------------------------------------------------------------- diff --git a/core/Lucy/Index/SortReader.cfh b/core/Lucy/Index/SortReader.cfh index a36db95..98d0a72 100644 --- a/core/Lucy/Index/SortReader.cfh +++ b/core/Lucy/Index/SortReader.cfh @@ -57,7 +57,7 @@ class Lucy::Index::DefaultSortReader nickname DefSortReader nullable SortCache* Fetch_Sort_Cache(DefaultSortReader *self, String *field); - public void + void Close(DefaultSortReader *self); public void http://git-wip-us.apache.org/repos/asf/lucy/blob/21252a9d/perl/buildlib/Lucy/Build/Binding/Index.pm ---------------------------------------------------------------------- diff --git a/perl/buildlib/Lucy/Build/Binding/Index.pm b/perl/buildlib/Lucy/Build/Binding/Index.pm index d587479..cf049ff 100644 --- a/perl/buildlib/Lucy/Build/Binding/Index.pm +++ b/perl/buildlib/Lucy/Build/Binding/Index.pm @@ -46,8 +46,6 @@ sub bind_all { } sub bind_backgroundmerger { - my @exposed = qw( Commit Prepare_Commit Optimize ); - my $pod_spec = Clownfish::CFC::Binding::Perl::Pod->new; my $synopsis = <<'END_SYNOPSIS'; my $bg_merger = Lucy::Index::BackgroundMerger->new( @@ -63,7 +61,6 @@ END_SYNOPSIS END_CONSTRUCTOR $pod_spec->set_synopsis($synopsis); $pod_spec->add_constructor( alias => 'new', sample => $constructor, ); - $pod_spec->add_method( method => $_, alias => lc($_) ) for @exposed; my $binding = Clownfish::CFC::Binding::Perl::Class->new( parcel => "Lucy", @@ -75,16 +72,6 @@ END_CONSTRUCTOR } sub bind_datareader { - my @exposed = qw( - Get_Schema - Get_Folder - Get_Snapshot - Get_Segments - Get_Segment - Get_Seg_Tick - Aggregator - ); - my $pod_spec = Clownfish::CFC::Binding::Perl::Pod->new; my $synopsis = <<'END_SYNOPSIS'; # Abstract base class. @@ -100,7 +87,6 @@ END_SYNOPSIS END_CONSTRUCTOR $pod_spec->set_synopsis($synopsis); $pod_spec->add_constructor( alias => 'new', sample => $constructor, ); - $pod_spec->add_method( method => $_, alias => lc($_) ) for @exposed; my $binding = Clownfish::CFC::Binding::Perl::Class->new( parcel => "Lucy", @@ -112,21 +98,6 @@ END_CONSTRUCTOR } sub bind_datawriter { - my @exposed = qw( - Add_Inverted_Doc - Add_Segment - Delete_Segment - Merge_Segment - Finish - Format - Metadata - Get_Snapshot - Get_Segment - Get_PolyReader - Get_Schema - Get_Folder - ); - my $pod_spec = Clownfish::CFC::Binding::Perl::Pod->new; my $synopsis = <<END_SYNOPSIS; # Abstract base class. @@ -140,7 +111,6 @@ END_SYNOPSIS END_CONSTRUCTOR $pod_spec->set_synopsis($synopsis); $pod_spec->add_constructor( alias => 'new', sample => $constructor, ); - $pod_spec->add_method( method => $_, alias => lc($_) ) for @exposed; my $binding = Clownfish::CFC::Binding::Perl::Class->new( parcel => "Lucy", @@ -152,13 +122,6 @@ END_CONSTRUCTOR } sub bind_deletionswriter { - my @exposed = qw( - Delete_By_Term - Delete_By_Query - Updated - Seg_Del_Count - ); - my $pod_spec = Clownfish::CFC::Binding::Perl::Pod->new; my $synopsis = <<'END_SYNOPSIS'; my $polyreader = $del_writer->get_polyreader; @@ -169,7 +132,6 @@ sub bind_deletionswriter { } END_SYNOPSIS $pod_spec->set_synopsis($synopsis); - $pod_spec->add_method( method => $_, alias => lc($_) ) for @exposed; my $binding = Clownfish::CFC::Binding::Perl::Class->new( parcel => "Lucy", @@ -181,15 +143,12 @@ END_SYNOPSIS } sub bind_docreader { - my @exposed = qw( Fetch_Doc Aggregator ); - my $pod_spec = Clownfish::CFC::Binding::Perl::Pod->new; my $synopsis = <<'END_SYNOPSIS'; my $doc_reader = $seg_reader->obtain("Lucy::Index::DocReader"); my $doc = $doc_reader->fetch_doc($doc_id); END_SYNOPSIS $pod_spec->set_synopsis($synopsis); - $pod_spec->add_method( method => $_, alias => lc($_) ) for @exposed; my $binding = Clownfish::CFC::Binding::Perl::Class->new( parcel => "Lucy", @@ -201,18 +160,6 @@ END_SYNOPSIS } sub bind_indexmanager { - my @exposed = qw( - Make_Write_Lock - Recycle - Set_Folder - Get_Folder - Get_Host - Set_Write_Lock_Timeout - Get_Write_Lock_Timeout - Set_Write_Lock_Interval - Get_Write_Lock_Interval - ); - my $pod_spec = Clownfish::CFC::Binding::Perl::Pod->new; my $synopsis = <<'END_SYNOPSIS'; use Sys::Hostname qw( hostname ); @@ -241,7 +188,6 @@ END_SYNOPSIS END_CONSTRUCTOR $pod_spec->set_synopsis($synopsis); $pod_spec->add_constructor( alias => 'new', sample => $constructor, ); - $pod_spec->add_method( method => $_, alias => lc($_) ) for @exposed; my $binding = Clownfish::CFC::Binding::Perl::Class->new( parcel => "Lucy", @@ -253,16 +199,6 @@ END_CONSTRUCTOR } sub bind_indexreader { - my @exposed = qw( - Doc_Max - Doc_Count - Del_Count - Seg_Readers - Offsets - Fetch - Obtain - ); - my $pod_spec = Clownfish::CFC::Binding::Perl::Pod->new; my $synopsis = <<'END_SYNOPSIS'; my $reader = Lucy::Index::IndexReader->open( @@ -293,7 +229,6 @@ END_CONSTRUCTOR initializer => 'do_open', sample => $constructor, ); - $pod_spec->add_method( method => $_, alias => lc($_) ) for @exposed; my $xs_code = <<'END_XS_CODE'; MODULE = Lucy PACKAGE = Lucy::Index::IndexReader @@ -330,16 +265,6 @@ END_XS_CODE } sub bind_indexer { - my @exposed = qw( - Add_Index - Optimize - Commit - Prepare_Commit - Delete_By_Term - Delete_By_Query - Delete_By_Doc_ID - Get_Schema - ); my @hand_rolled = qw( Add_Doc ); my $pod_spec = Clownfish::CFC::Binding::Perl::Pod->new; @@ -435,7 +360,6 @@ END_ADD_DOC_POD alias => 'add_doc', pod => $add_doc_pod, ); - $pod_spec->add_method( method => $_, alias => lc($_) ) for @exposed; my $xs_code = <<'END_XS_CODE'; MODULE = Lucy PACKAGE = Lucy::Index::Indexer @@ -516,13 +440,6 @@ END_XS_CODE } sub bind_lexicon { - my @exposed = qw( - Seek - Next - Get_Term - Reset - ); - my $pod_spec = Clownfish::CFC::Binding::Perl::Pod->new; my $synopsis = <<'END_SYNOPSIS'; my $lex_reader = $seg_reader->obtain('Lucy::Index::LexiconReader'); @@ -532,7 +449,6 @@ sub bind_lexicon { } END_SYNOPSIS $pod_spec->set_synopsis($synopsis); - $pod_spec->add_method( method => $_, alias => lc($_) ) for @exposed; my $binding = Clownfish::CFC::Binding::Perl::Class->new( parcel => "Lucy", @@ -544,15 +460,12 @@ END_SYNOPSIS } sub bind_lexiconreader { - my @exposed = qw( Lexicon Doc_Freq ); - my $pod_spec = Clownfish::CFC::Binding::Perl::Pod->new; my $synopsis = <<'END_SYNOPSIS'; my $lex_reader = $seg_reader->obtain("Lucy::Index::LexiconReader"); my $lexicon = $lex_reader->lexicon( field => 'title' ); END_SYNOPSIS $pod_spec->set_synopsis($synopsis); - $pod_spec->add_method( method => $_, alias => lc($_) ) for @exposed; my $binding = Clownfish::CFC::Binding::Perl::Class->new( parcel => "Lucy", @@ -637,14 +550,6 @@ END_XS_CODE } sub bind_postinglist { - my @exposed = qw( - Next - Advance - Get_Doc_ID - Get_Doc_Freq - Seek - ); - my $pod_spec = Clownfish::CFC::Binding::Perl::Pod->new; my $synopsis = <<'END_SYNOPSIS'; my $posting_list_reader @@ -658,7 +563,6 @@ sub bind_postinglist { } END_SYNOPSIS $pod_spec->set_synopsis($synopsis); - $pod_spec->add_method( method => $_, alias => lc($_) ) for @exposed; my $binding = Clownfish::CFC::Binding::Perl::Class->new( parcel => "Lucy", @@ -670,8 +574,6 @@ END_SYNOPSIS } sub bind_postinglistreader { - my @exposed = qw( Posting_List ); - my $pod_spec = Clownfish::CFC::Binding::Perl::Pod->new; my $synopsis = <<'END_SYNOPSIS'; my $posting_list_reader @@ -682,7 +584,6 @@ sub bind_postinglistreader { ); END_SYNOPSIS $pod_spec->set_synopsis($synopsis); - $pod_spec->add_method( method => $_, alias => lc($_) ) for @exposed; my $binding = Clownfish::CFC::Binding::Perl::Class->new( parcel => "Lucy", @@ -714,11 +615,6 @@ END_XS } sub bind_segreader { - my @exposed = qw( - Get_Seg_Name - Get_Seg_Num - ); - my $pod_spec = Clownfish::CFC::Binding::Perl::Pod->new; my $synopsis = <<'END_SYNOPSIS'; my $polyreader = Lucy::Index::IndexReader->open( @@ -737,7 +633,6 @@ sub bind_segreader { } END_SYNOPSIS $pod_spec->set_synopsis($synopsis); - $pod_spec->add_method( method => $_, alias => lc($_) ) for @exposed; my $binding = Clownfish::CFC::Binding::Perl::Class->new( parcel => "Lucy", @@ -749,15 +644,7 @@ END_SYNOPSIS } sub bind_segwriter { - my @exposed = qw( - Add_Doc - Add_Writer - Register - Fetch - ); - my $pod_spec = Clownfish::CFC::Binding::Perl::Pod->new; - $pod_spec->add_method( method => $_, alias => lc($_) ) for @exposed; my $binding = Clownfish::CFC::Binding::Perl::Class->new( parcel => "Lucy", @@ -769,18 +656,6 @@ sub bind_segwriter { } sub bind_segment { - my @exposed = qw( - Add_Field - Store_Metadata - Fetch_Metadata - Field_Num - Field_Name - Get_Name - Get_Number - Set_Count - Get_Count - ); - my $pod_spec = Clownfish::CFC::Binding::Perl::Pod->new; my $synopsis = <<'END_SYNOPSIS'; # Index-time. @@ -814,7 +689,6 @@ sub bind_segment { } END_SYNOPSIS $pod_spec->set_synopsis($synopsis); - $pod_spec->add_method( method => $_, alias => lc($_) ) for @exposed; my $binding = Clownfish::CFC::Binding::Perl::Class->new( parcel => "Lucy", @@ -826,9 +700,6 @@ END_SYNOPSIS } sub bind_similarity { - my @exposed = qw( - Length_Norm - ); my @hand_rolled = qw( Get_Norm_Decoder ); my $pod_spec = Clownfish::CFC::Binding::Perl::Pod->new; @@ -845,7 +716,6 @@ END_SYNOPSIS my $constructor = qq| my \$sim = Lucy::Index::Similarity->new;\n|; $pod_spec->set_synopsis($synopsis); $pod_spec->add_constructor( alias => 'new', sample => $constructor, ); - $pod_spec->add_method( method => $_, alias => lc($_) ) for @exposed; my $xs_code = <<'END_XS_CODE'; MODULE = Lucy PACKAGE = Lucy::Index::Similarity @@ -871,17 +741,6 @@ END_XS_CODE } sub bind_snapshot { - my @exposed = qw( - List - Num_Entries - Add_Entry - Delete_Entry - Read_File - Write_File - Set_Path - Get_Path - ); - my $pod_spec = Clownfish::CFC::Binding::Perl::Pod->new; my $synopsis = <<'END_SYNOPSIS'; my $snapshot = Lucy::Index::Snapshot->new; @@ -894,7 +753,6 @@ END_SYNOPSIS END_CONSTRUCTOR $pod_spec->set_synopsis($synopsis); $pod_spec->add_constructor( alias => 'new', sample => $constructor, ); - $pod_spec->add_method( method => $_, alias => lc($_) ) for @exposed; my $binding = Clownfish::CFC::Binding::Perl::Class->new( parcel => "Lucy",
