/[Search-TokyoDystopia]/lib/Search/TokyoDystopia.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /lib/Search/TokyoDystopia.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 11 by dpavlin, Sun Aug 17 23:57:02 2008 UTC revision 14 by dpavlin, Mon Aug 18 15:35:18 2008 UTC
# Line 30  IDBOTRUNC Line 30  IDBOTRUNC
30  IDBONOLCK  IDBONOLCK
31  IDBOLCKNB  IDBOLCKNB
32  tcidbclose  tcidbclose
33    tcidbput
34  );  );
35    
36  =head1 NAME  =head1 NAME
# Line 42  If you don't prevent it, it will export Line 43  If you don't prevent it, it will export
43    
44  =head2 tcidberrmsg  =head2 tcidberrmsg
45    
46    my $message = Search::TokyoDystopia::tcidberrmsg( $ecode );    my $message = tcidberrmsg( $ecode );
47    
48  =head2 tcidbnew  =head2 tcidbnew
49    
50    my $idb = Search::TokyoDystopia::tcidbnew;    my $idb = tcidbnew;
51    
52  =head2 tcidbdel  =head2 tcidbdel
53    
54    Search::TokyoDystopia::tcidbdel( $idb );    tcidbdel( $idb );
55    
56  =head2 tcidbecode  =head2 tcidbecode
57    
58    my $ecode = Search::TokyoDystopia::tcidbecode( $idb );    my $ecode = tcidbecode( $idb );
59    
60  =head2 tcidbtune  =head2 tcidbtune
61    
62    my $success = Search::TokyoDystopia::tcidbtune( $idb, $ernum, $etnum, $iusiz, IDBTLARGE || IDBTDEFLATE );    my $success = tcidbtune( $idb, $ernum, $etnum, $iusiz, IDBTLARGE | IDBTDEFLATE );
63    
64  =cut  =cut
65    
# Line 70  use constant { Line 71  use constant {
71    
72  =head2 tcidbsetcache  =head2 tcidbsetcache
73    
74    my $success = Search::TokyoDystopia::tcidbsetcache( $idb, $icsiz, $lcnum );    my $success = tcidbsetcache( $idb, $icsiz, $lcnum );
75    
76  =head2 tcidbsetfwmmax  =head2 tcidbsetfwmmax
77    
78    my $success = Search::TokyoDystopia::tcidbsetfwmmax( $idb, $fwnum );    my $success = tcidbsetfwmmax( $idb, $fwnum );
79    
80  =head2 tcidbopen  =head2 tcidbopen
81    
82    Search::TokyoDystopia::tcidbopen( $idb, 'casket', IDBOTRUNC ), 1, 'tcidbopen' );    my $success = tcidbopen( $idb, 'casket', IDBOWRITER | IDBOCREAT );
83    
84  =cut  =cut
85    
# Line 91  use constant { Line 92  use constant {
92          IDBOLCKNB => 1 << 5,          IDBOLCKNB => 1 << 5,
93  };  };
94    
95    =head2 tcidbclose
96    
97      my $success = tcidbclose( $idb );
98    
99    =head2 tcidbput
100    
101      my $success = tcidbput( $idb, $id, $utf8_text );
102    
103  =head1 KNOWN BUGS  =head1 KNOWN BUGS
104    
105  Low-level functions often just die when called on invalid (or deleted) database  Low-level functions often just die when called on invalid (or deleted) database
Legend:
Removed from v.11  
changed lines
  Added in v.14
  ViewVC Help
Powered by ViewVC 1.1.26