| … | |
… | |
| 301 | PUSHMARK (SP); |
301 | PUSHMARK (SP); |
| 302 | EXTEND (SP, items - arg + 1); |
302 | EXTEND (SP, items - arg + 1); |
| 303 | PUSHs (sth); |
303 | PUSHs (sth); |
| 304 | while (items > arg) |
304 | while (items > arg) |
| 305 | { |
305 | { |
|
|
306 | SV *sv = ST(arg); |
|
|
307 | /* we sv_mortalcopy magical values since DBI seems to have a memory |
|
|
308 | * leak when magical values are passed into execute(). |
|
|
309 | */ |
| 306 | PUSHs (maybe_upgrade_utf8 (ix & 1, ST(arg))); |
310 | PUSHs (maybe_upgrade_utf8 (ix & 1, SvMAGICAL(sv) ? sv_mortalcopy(sv) : sv)); |
| 307 | arg++; |
311 | arg++; |
| 308 | } |
312 | } |
| 309 | |
313 | |
| 310 | PUTBACK; |
314 | PUTBACK; |
| 311 | /* { static GV *execute; |
315 | /* { static GV *execute; |
