--- lib/Search/TokyoDystopia.pm	2008/08/18 18:44:47	20
+++ lib/Search/TokyoDystopia.pm	2008/08/18 18:48:33	21
@@ -43,6 +43,7 @@
 IDBSTOKSUF
 tcidbiterinit
 tcidbiternext
+tcidbsync
 );
 
 =head1 NAME
@@ -144,6 +145,10 @@
 
   my $id = tcidbiternext( $idb );
 
+=head2 tcidbsync
+
+  my $success = tcidbsync( $idb );
+
 =cut
 
 =head1 KNOWN BUGS