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