… | |
… | |
12 | DBC_ornuked * DBC_ornuked |
12 | DBC_ornuked * DBC_ornuked |
13 | DB_SEQUENCE * DB_SEQUENCE |
13 | DB_SEQUENCE * DB_SEQUENCE |
14 | DB_SEQUENCE_ornull * DB_SEQUENCE_ornull |
14 | DB_SEQUENCE_ornull * DB_SEQUENCE_ornull |
15 | DB_SEQUENCE_ornuked * DB_SEQUENCE_ornuked |
15 | DB_SEQUENCE_ornuked * DB_SEQUENCE_ornuked |
16 | |
16 | |
17 | SV8 * T_SV8 |
17 | SV8 * T_SV8 |
18 | bdb_filename BDB_FILENAME |
18 | bdb_filename BDB_FILENAME |
19 | db_seq_t DB_SEQ |
19 | db_seq_t DB_SEQ |
20 | |
20 | |
|
|
21 | const char * T_PV |
|
|
22 | |
|
|
23 | SV_mutable * T_SV_MUTABLE |
21 | |
24 | |
22 | INPUT |
25 | INPUT |
|
|
26 | |
|
|
27 | T_SV_MUTABLE |
|
|
28 | ($var) = $arg; |
|
|
29 | if (SvREADONLY ($var)) |
|
|
30 | croak (\"argument \\\"%s\\\" is read-only/constant, but %s needs to write results into it\", |
|
|
31 | \"$var\", |
|
|
32 | \"${Package}::$func_name\") |
23 | |
33 | |
24 | T_SV8 |
34 | T_SV8 |
25 | ($var) = $arg; |
35 | ($var) = $arg; |
26 | if (SvPOKp ($var) && !sv_utf8_downgrade ($var, 1)) |
36 | if (SvPOKp ($var) && !sv_utf8_downgrade ($var, 1)) |
27 | croak (\"\\\"%s\\\" argument must be byte/octet-encoded\", \"$var\") |
37 | croak (\"argument \\\"%s\\\" must be byte/octet-encoded in %s\", |
|
|
38 | \"$var\", |
|
|
39 | \"${Package}::$func_name\") |
28 | |
40 | |
29 | BDB_FILENAME |
41 | BDB_FILENAME |
30 | ($var) = !SvOK ($arg) |
42 | ($var) = get_bdb_filename ($arg); |
31 | ? 0 |
|
|
32 | : |
|
|
33 | #if WIN32 |
|
|
34 | SvPVutf8_nolen ($arg) |
|
|
35 | #else |
|
|
36 | SvPVbyte_nolen ($arg) |
|
|
37 | #endif |
|
|
38 | ; |
|
|
39 | |
43 | |
40 | DB_SEQ |
44 | DB_SEQ |
41 | $var = sizeof (IV) > 4 ? SvIV ($arg) : SvNV ($arg); |
45 | $var = sizeof (IV) > 4 ? SvIV ($arg) : SvNV ($arg); |
42 | |
46 | |
43 | DB_ENV |
47 | DB_ENV |