ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/BDB/typemap
Revision: 1.5
Committed: Sun Feb 11 22:07:23 2007 UTC (17 years, 3 months ago) by root
Branch: MAIN
CVS Tags: rel-0_1, rel-0_5, rel-1_4, rel-1_0, rel-1_3, rel-1_2, rel-1_42, rel-1_41
Changes since 1.4: +19 -1 lines
Log Message:
*** empty log message ***

File Contents

# Content
1 DB_ENV * DB_ENV
2 DB_ENV_ornull * DB_ENV_ornull
3 DB_TXN * DB_TXN
4 DB_TXN_ornull * DB_TXN_ornull
5 DB * DB
6 DB_ornull * DB_ornull
7 DBC * DBC
8 DBC_ornull * DBC_ornull
9 DB_SEQUENCE * DB_SEQUENCE
10 DB_SEQUENCE_ornull * DB_SEQUENCE_ornull
11
12 SV8 * T_SV8
13 octetstring OCTETS
14 db_seq_t DB_SEQ
15
16
17 INPUT
18
19 T_SV8
20 ($var) = $arg;
21 if (SvPOKp ($var) && !sv_utf8_downgrade ($var, 1))
22 croak (\"\\\"%s\\\" argument must be byte/octet-encoded\", \"$var\")
23
24 OCTETS
25 $var = SvOK ($arg) ? SvPVbyte_nolen ($arg) : 0;
26
27 DB_SEQ
28 $var = sizeof (IV) > 4 ? SvIV ($arg) : SvNV ($arg);
29
30 DB_ENV
31 SvPTR ($var, $arg, DB_ENV *, BDB::Env, 0);
32
33 DB_TXN
34 SvPTR ($var, $arg, DB_TXN *, BDB::Txn, 0);
35
36 DBC
37 SvPTR ($var, $arg, DBC *, BDB::Cursor, 0);
38
39 DB
40 SvPTR ($var, $arg, DB *, BDB::Db, 0);
41
42 DB_SEQUENCE
43 SvPTR ($var, $arg, DB_SEQUENCE *, BDB::Sequence, 0);
44
45 DB_ENV_ornull
46 SvPTR ($var, $arg, DB_ENV *, BDB::Env, 1);
47
48 DB_TXN_ornull
49 SvPTR ($var, $arg, DB_TXN *, BDB::Txn, 1);
50
51 DBC_ornull
52 SvPTR ($var, $arg, DBC *, BDB::Cursor, 1);
53
54 DB_ornull
55 SvPTR ($var, $arg, DB *, BDB::Db, 1);
56
57 DB_SEQUENCE_ornull
58 SvPTR ($var, $arg, DB_SEQUENCE *, BDB::Sequence, 1);
59
60
61 OUTPUT
62
63 DB_ENV
64 sv_setref_pv ($arg, "BDB::Env", (void *)$var);
65
66 DB_TXN
67 sv_setref_pv ($arg, "BDB::Txn", (void *)$var);
68
69 DBC
70 sv_setref_pv ($arg, "BDB::Cursor", (void *)$var);
71
72 DB
73 sv_setref_pv ($arg, "BDB::Db", (void *)$var);
74
75 DB_SEQUENCE
76 sv_setref_pv ($arg, "BDB::Sequence", (void *)$var);