Parent Directory | Revision Log | Patch
revision 35 by dpavlin, Tue Sep 2 12:38:11 2008 UTC | revision 36 by dpavlin, Sun Sep 21 14:24:22 2008 UTC | |
---|---|---|
# | Line 16 tcidb.pl - example from documentation tr | Line 16 tcidb.pl - example from documentation tr |
16 | my $idb = tcidbnew(); | my $idb = tcidbnew(); |
17 | ||
18 | # open the database | # open the database |
19 | if (!tcidbopen($idb, "casket", IDBOWRITER | IDBOCREAT)) { | if (!tcidbopen($idb, "casket-idb", IDBOWRITER | IDBOCREAT)) { |
20 | my $ecode = tcidbecode($idb); | my $ecode = tcidbecode($idb); |
21 | die "open error: ", tcidberrmsg($ecode); | die "open error: ", tcidberrmsg($ecode); |
22 | } | } |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |