| … | |
… | |
| 22 | static const struct { |
22 | static const struct { |
| 23 | const char *name; |
23 | const char *name; |
| 24 | IV iv; |
24 | IV iv; |
| 25 | } *civ, const_iv[] = { |
25 | } *civ, const_iv[] = { |
| 26 | # define const_iv(name) { # name, (IV) name }, |
26 | # define const_iv(name) { # name, (IV) name }, |
| 27 | const_iv (MAX_ARGC) |
|
|
| 28 | const_iv (MAX_ARGS) |
|
|
| 29 | const_iv (T_NULL) |
27 | const_iv (T_NULL) |
| 30 | const_iv (T_META) |
28 | const_iv (T_META) |
| 31 | const_iv (T_ENV) |
29 | const_iv (T_ENV) |
| 32 | const_iv (T_ARG) |
30 | const_iv (T_ARG) |
| 33 | const_iv (T_DIR) |
31 | const_iv (T_DIR) |
| … | |
… | |
| 94 | { |
92 | { |
| 95 | u_handle h = u_lock (SvPVbyte_nolen (path), SvTRUE (excl), SvTRUE (dowait)); |
93 | u_handle h = u_lock (SvPVbyte_nolen (path), SvTRUE (excl), SvTRUE (dowait)); |
| 96 | |
94 | |
| 97 | RETVAL = &PL_sv_undef; |
95 | RETVAL = &PL_sv_undef; |
| 98 | if (u_valid (h)) |
96 | if (u_valid (h)) |
| 99 | RETVAL = sv_setref_iv (sv_newmortal (), "Urlader::lock", (IV)h); |
97 | RETVAL = sv_setref_iv (NEWSV (0, 0), "Urlader::lock", (IV)h); |
| 100 | } |
98 | } |
| 101 | OUTPUT: |
99 | OUTPUT: |
| 102 | RETVAL |
100 | RETVAL |
| 103 | |
101 | |
| 104 | MODULE = Urlader PACKAGE = Urlader::lock |
102 | MODULE = Urlader PACKAGE = Urlader::lock |
