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

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