ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/BDB/typemap
(Generate patch)

Comparing BDB/typemap (file contents):
Revision 1.8 by root, Sun Mar 30 06:28:09 2008 UTC vs.
Revision 1.12 by root, Thu Nov 12 00:39:58 2009 UTC

… …
12DBC_ornuked * DBC_ornuked 12DBC_ornuked * DBC_ornuked
13DB_SEQUENCE * DB_SEQUENCE 13DB_SEQUENCE * DB_SEQUENCE
14DB_SEQUENCE_ornull * DB_SEQUENCE_ornull 14DB_SEQUENCE_ornull * DB_SEQUENCE_ornull
15DB_SEQUENCE_ornuked * DB_SEQUENCE_ornuked 15DB_SEQUENCE_ornuked * DB_SEQUENCE_ornuked
16 16
17SV8 * T_SV8
18bdb_filename BDB_FILENAME 17bdb_filename BDB_FILENAME
19db_seq_t DB_SEQ 18db_seq_t DB_SEQ
20 19
20const char * T_PV
21
22SV_mutable * T_SV_MUTABLE
21 23
22INPUT 24INPUT
23 25
24T_SV8 26T_SV_MUTABLE
25 ($var) = $arg; 27 ($var) = $arg;
28 if (SvREADONLY ($var))
29 croak (\"argument \\\"%s\\\" is read-only/constant, but %s needs to write results into it\",
30 \"$var\",
31 \"${Package}::$func_name\");
26 if (SvPOKp ($var) && !sv_utf8_downgrade ($var, 1)) 32 if (SvPOKp ($var) && !sv_utf8_downgrade ($var, 1))
27 croak (\"\\\"%s\\\" argument must be byte/octet-encoded\", \"$var\") 33 croak (\"argument \\\"%s\\\" must be byte/octet-encoded in %s\",
34 \"$var\",
35 \"${Package}::$func_name\")
28 36
29BDB_FILENAME 37BDB_FILENAME
30 ($var) = get_bdb_filename ($arg); 38 ($var) = get_bdb_filename ($arg);
31 39
32DB_SEQ 40DB_SEQ
33 $var = sizeof (IV) > 4 ? SvIV ($arg) : SvNV ($arg); 41 $var = sizeof (IV) > 4 ? SvIV ($arg) : SvNV ($arg);
34 42
35DB_ENV 43DB_ENV
36 SvPTR ($var, $arg, DB_ENV *, BDB::Env, 0); 44 SvPTR ($var, $arg, DB_ENV *, bdb_env_stash, BDB::Env, 0);
37 45
38DB_TXN 46DB_TXN
39 SvPTR ($var, $arg, DB_TXN *, BDB::Txn, 0); 47 SvPTR ($var, $arg, DB_TXN *, bdb_txn_stash, BDB::Txn, 0);
40 48
41DBC 49DBC
42 SvPTR ($var, $arg, DBC *, BDB::Cursor, 0); 50 SvPTR ($var, $arg, DBC *, bdb_cursor_stash, BDB::Cursor, 0);
43 51
44DB 52DB
45 SvPTR ($var, $arg, DB *, BDB::Db, 0); 53 SvPTR ($var, $arg, DB *, bdb_db_stash, BDB::Db, 0);
46 54
47DB_SEQUENCE 55DB_SEQUENCE
48 SvPTR ($var, $arg, DB_SEQUENCE *, BDB::Sequence, 0); 56 SvPTR ($var, $arg, DB_SEQUENCE *, bdb_sequence_stash, BDB::Sequence, 0);
49 57
50 58
51DB_ENV_ornull 59DB_ENV_ornull
52 SvPTR ($var, $arg, DB_ENV *, BDB::Env, 1); 60 SvPTR ($var, $arg, DB_ENV *, bdb_env_stash, BDB::Env, 1);
53 61
54DB_TXN_ornull 62DB_TXN_ornull
55 SvPTR ($var, $arg, DB_TXN *, BDB::Txn, 1); 63 SvPTR ($var, $arg, DB_TXN *, bdb_txn_stash, BDB::Txn, 1);
56 64
57DBC_ornull 65DBC_ornull
58 SvPTR ($var, $arg, DBC *, BDB::Cursor, 1); 66 SvPTR ($var, $arg, DBC *, bdb_cursor_stash, BDB::Cursor, 1);
59 67
60DB_ornull 68DB_ornull
61 SvPTR ($var, $arg, DB *, BDB::Db, 1); 69 SvPTR ($var, $arg, DB *, bdb_db_stash, BDB::Db, 1);
62 70
63DB_SEQUENCE_ornull 71DB_SEQUENCE_ornull
64 SvPTR ($var, $arg, DB_SEQUENCE *, BDB::Sequence, 1); 72 SvPTR ($var, $arg, DB_SEQUENCE *, bdb_sequence_stash, BDB::Sequence, 1);
65 73
66 74
67DB_ENV_ornuked 75DB_ENV_ornuked
68 SvPTR ($var, $arg, DB_ENV *, BDB::Env, 2); 76 SvPTR ($var, $arg, DB_ENV *, bdb_env_stash, BDB::Env, 2);
69 77
70DB_TXN_ornuked 78DB_TXN_ornuked
71 SvPTR ($var, $arg, DB_TXN *, BDB::Txn, 2); 79 SvPTR ($var, $arg, DB_TXN *, bdb_txn_stash, BDB::Txn, 2);
72 80
73DBC_ornuked 81DBC_ornuked
74 SvPTR ($var, $arg, DBC *, BDB::Cursor, 2); 82 SvPTR ($var, $arg, DBC *, bdb_cursor_stash, BDB::Cursor, 2);
75 83
76DB_ornuked 84DB_ornuked
77 SvPTR ($var, $arg, DB *, BDB::Db, 2); 85 SvPTR ($var, $arg, DB *, bdb_db_stash, BDB::Db, 2);
78 86
79DB_SEQUENCE_ornuked 87DB_SEQUENCE_ornuked
80 SvPTR ($var, $arg, DB_SEQUENCE *, BDB::Sequence, 2); 88 SvPTR ($var, $arg, DB_SEQUENCE *, bdb_sequence_stash, BDB::Sequence, 2);
81 89
82 90
83OUTPUT 91OUTPUT
84 92
85DB_ENV 93DB_ENV
86 sv_setref_pv ($arg, "BDB::Env", (void *)$var); 94 $arg = newSVptr ($var, bdb_env_stash);
87 95
88DB_TXN 96DB_TXN
89 sv_setref_pv ($arg, "BDB::Txn", (void *)$var); 97 $arg = newSVptr ($var, bdb_txn_stash);
90 98
91DBC 99DBC
92 sv_setref_pv ($arg, "BDB::Cursor", (void *)$var); 100 $arg = newSVptr ($var, bdb_cursor_stash);
93 101
94DB 102DB
95 sv_setref_pv ($arg, "BDB::Db", (void *)$var); 103 $arg = newSVptr ($var, bdb_db_stash);
96 104
97DB_SEQUENCE 105DB_SEQUENCE
98 sv_setref_pv ($arg, "BDB::Sequence", (void *)$var); 106 $arg = newSVptr ($var, bdb_sequence_stash);
107

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines