--- lib/Search/TokyoDystopia.pm	2008/08/18 18:32:55	19
+++ lib/Search/TokyoDystopia.pm	2008/08/18 18:53:39	22
@@ -34,6 +34,7 @@
 tcidbout
 tcidbget
 tcidbsearch
+tcidbsearch2
 IDBSSUBSTR
 IDBSPREFIX
 IDBSSUFFIX
@@ -42,6 +43,8 @@
 IDBSTOKPRE
 IDBSTOKSUF
 tcidbiterinit
+tcidbiternext
+tcidbsync
 );
 
 =head1 NAME
@@ -121,7 +124,7 @@
 
 =head2 tcidbsearch
 
-  my @ids = tcidbsearch( $idb, $word, IDBSSUBSTR )
+  my $ids = tcidbsearch( $idb, $word, IDBSSUBSTR );
 
 =cut
 
@@ -135,9 +138,21 @@
 	IDBSTOKSUF => 6,		# token suffix matching
 };
 
+=head2 tcidbsearch2
+
+  my $ids = tcidbsearch2( $idb, $expr );
+
 =head2 tcidbiterinit
 
-  my $success = tcidbiterinit;
+  my $success = tcidbiterinit( $idb );
+
+=head2 tcidbiternext
+
+  my $id = tcidbiternext( $idb );
+
+=head2 tcidbsync
+
+  my $success = tcidbsync( $idb );
 
 =cut