/[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 16 by dpavlin, Mon Aug 18 17:27:11 2008 UTC
# Line 30  IDBOTRUNC Line 30  IDBOTRUNC
30  IDBONOLCK  IDBONOLCK
31  IDBOLCKNB  IDBOLCKNB
32  tcidbclose  tcidbclose
33    tcidbput
34    tcidbout
35  );  );
36    
37  =head1 NAME  =head1 NAME
# Line 42  If you don't prevent it, it will export Line 44  If you don't prevent it, it will export
44    
45  =head2 tcidberrmsg  =head2 tcidberrmsg
46    
47    my $message = Search::TokyoDystopia::tcidberrmsg( $ecode );    my $message = tcidberrmsg( $ecode );
48    
49  =head2 tcidbnew  =head2 tcidbnew
50    
51    my $idb = Search::TokyoDystopia::tcidbnew;    my $idb = tcidbnew;
52    
53  =head2 tcidbdel  =head2 tcidbdel
54    
55    Search::TokyoDystopia::tcidbdel( $idb );    tcidbdel( $idb );
56    
57  =head2 tcidbecode  =head2 tcidbecode
58    
59    my $ecode = Search::TokyoDystopia::tcidbecode( $idb );    my $ecode = tcidbecode( $idb );
60    
61  =head2 tcidbtune  =head2 tcidbtune
62    
63    my $success = Search::TokyoDystopia::tcidbtune( $idb, $ernum, $etnum, $iusiz, IDBTLARGE || IDBTDEFLATE );    my $success = tcidbtune( $idb, $ernum, $etnum, $iusiz, IDBTLARGE | IDBTDEFLATE );
64    
65  =cut  =cut
66    
# Line 70  use constant { Line 72  use constant {
72    
73  =head2 tcidbsetcache  =head2 tcidbsetcache
74    
75    my $success = Search::TokyoDystopia::tcidbsetcache( $idb, $icsiz, $lcnum );    my $success = tcidbsetcache( $idb, $icsiz, $lcnum );
76    
77  =head2 tcidbsetfwmmax  =head2 tcidbsetfwmmax
78    
79    my $success = Search::TokyoDystopia::tcidbsetfwmmax( $idb, $fwnum );    my $success = tcidbsetfwmmax( $idb, $fwnum );
80    
81  =head2 tcidbopen  =head2 tcidbopen
82    
83    Search::TokyoDystopia::tcidbopen( $idb, 'casket', IDBOTRUNC ), 1, 'tcidbopen' );    my $success = tcidbopen( $idb, 'casket', IDBOWRITER | IDBOCREAT );
84    
85  =cut  =cut
86    
# Line 91  use constant { Line 93  use constant {
93          IDBOLCKNB => 1 << 5,          IDBOLCKNB => 1 << 5,
94  };  };
95    
96    =head2 tcidbclose
97    
98      my $success = tcidbclose( $idb );
99    
100    =head2 tcidbput
101    
102      my $success = tcidbput( $idb, $id, $utf8_text );
103    
104    =head2 tcidbout
105      
106      my $success = tcidbout( $idb, $id );
107    
108  =head1 KNOWN BUGS  =head1 KNOWN BUGS
109    
110  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.16
  ViewVC Help
Powered by ViewVC 1.1.26