ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/BDB/typemap
Revision: 1.4
Committed: Mon Feb 5 23:46:15 2007 UTC (17 years, 3 months ago) by root
Branch: MAIN
Changes since 1.3: +20 -4 lines
Log Message:
*** empty log message ***

File Contents

# User Rev Content
1 root 1.2 DB_ENV * DB_ENV
2 root 1.4 DB_ENV_ornull * DB_ENV_ornull
3 root 1.2 DB_TXN * DB_TXN
4 root 1.4 DB_TXN_ornull * DB_TXN_ornull
5 root 1.2 DB * DB
6 root 1.4 DB_ornull * DB_ornull
7 root 1.3 DBC * DBC
8 root 1.4 DBC_ornull * DBC_ornull
9 root 1.1 SV8 * T_SV8
10 root 1.3 octetstring OCTETS
11 root 1.1
12     INPUT
13    
14     T_SV8
15     ($var) = $arg;
16     if (SvPOKp ($var) && !sv_utf8_downgrade ($var, 1))
17     croak (\"\\\"%s\\\" argument must be byte/octet-encoded\", \"$var\")
18 root 1.2
19 root 1.3 OCTETS
20     $var = SvOK ($arg) ? SvPVbyte_nolen ($arg) : 0
21    
22 root 1.2 DB_ENV
23 root 1.4 SvPTR ($var, $arg, DB_ENV *, BDB::Env, 0);
24 root 1.2
25     DB_TXN
26 root 1.4 SvPTR ($var, $arg, DB_TXN *, BDB::Txn, 0);
27 root 1.2
28 root 1.3 DBC
29 root 1.4 SvPTR ($var, $arg, DBC *, BDB::Cursor, 0);
30 root 1.3
31 root 1.2 DB
32 root 1.4 SvPTR ($var, $arg, DB *, BDB::Db, 0);
33    
34     DB_ENV_ornull
35     SvPTR ($var, $arg, DB_ENV *, BDB::Env, 1);
36    
37     DB_TXN_ornull
38     SvPTR ($var, $arg, DB_TXN *, BDB::Txn, 1);
39    
40     DBC_ornull
41     SvPTR ($var, $arg, DBC *, BDB::Cursor, 1);
42    
43     DB_ornull
44     SvPTR ($var, $arg, DB *, BDB::Db, 1);
45 root 1.2
46     OUTPUT
47    
48     DB_ENV
49     sv_setref_pv ($arg, "BDB::Env", (void *)$var);
50    
51     DB_TXN
52     sv_setref_pv ($arg, "BDB::Txn", (void *)$var);
53    
54 root 1.3 DBC
55     sv_setref_pv ($arg, "BDB::Cursor", (void *)$var);
56    
57 root 1.2 DB
58     sv_setref_pv ($arg, "BDB::Db", (void *)$var);