… | |
… | |
1209 | } |
1209 | } |
1210 | OUTPUT: |
1210 | OUTPUT: |
1211 | RETVAL |
1211 | RETVAL |
1212 | |
1212 | |
1213 | SV * |
1213 | SV * |
1214 | rxvt_term::_env () |
1214 | rxvt_term::envv () |
|
|
1215 | ALIAS: |
|
|
1216 | argv = 1 |
1215 | CODE: |
1217 | PPCODE: |
1216 | { |
1218 | { |
1217 | if (THIS->envv) |
1219 | stringvec *vec = ix ? THIS->argv : THIS->envv; |
1218 | { |
|
|
1219 | AV *av = newAV (); |
|
|
1220 | |
1220 | |
|
|
1221 | EXTEND (SP, vec->size ()); |
|
|
1222 | |
1221 | for (char **i = THIS->envv->begin (); i != THIS->envv->end (); ++i) |
1223 | for (char **i = vec->begin (); i != vec->end (); ++i) |
1222 | if (*i) |
1224 | if (*i) |
1223 | av_push (av, newSVpv (*i, 0)); |
1225 | PUSHs (sv_2mortal (newSVpv (*i, 0))); |
1224 | |
|
|
1225 | RETVAL = newRV_noinc ((SV *)av); |
|
|
1226 | } |
|
|
1227 | else |
|
|
1228 | RETVAL = &PL_sv_undef; |
|
|
1229 | } |
1226 | } |
1230 | OUTPUT: |
|
|
1231 | RETVAL |
|
|
1232 | |
1227 | |
1233 | int |
1228 | int |
1234 | rxvt_term::pty_ev_events (int events = EVENT_UNDEF) |
1229 | rxvt_term::pty_ev_events (int events = EVENT_UNDEF) |
1235 | CODE: |
1230 | CODE: |
1236 | RETVAL = THIS->pty_ev.events; |
1231 | RETVAL = THIS->pty_ev.events; |