Branch Coverage

2008.xs
Criterion Covered Total %
branch 292 864 33.8


line true false branch
312 0 5 PUSH_INT_OR_PV(st->st_size, st_tmp.st_size);
313 0 5 PUSH_INT_OR_PV(st->st_atime, st_tmp.st_atime);
314 0 5 PUSH_INT_OR_PV(st->st_mtime, st_tmp.st_mtime);
316 0 5 PUSH_INT_OR_PV(st->st_ctime, st_tmp.st_ctime);
322 0 5 PUSH_INT_OR_PV(st->st_blksize, st_tmp.st_blksize);
323 0 5 PUSH_INT_OR_PV(st->st_blocks, st_tmp.st_blocks);
329 0 5 PUSH_INT_OR_PV(st->st_atim.tv_nsec, st_tmp.st_atim.tv_nsec);
330 0 5 PUSH_INT_OR_PV(st->st_mtim.tv_nsec, st_tmp.st_mtim.tv_nsec);
332 0 5 PUSH_INT_OR_PV(st->st_ctim.tv_nsec, st_tmp.st_ctim.tv_nsec);
375 0 2 if (!buf) {
381 1 1 if (dirfd == NULL)
392 2 0 if (linklen != -1) {
393 2 0 if ((size_t)linklen < bufsize) {
398 0 0 else if (errno != ERANGE) {
408 0 0 if (buf == NULL) {
421 0 0 if (iov)
422 0 0 for (i = 0; i < cnt; i++)
423 0 0 if (iov[i].iov_base)
445 0 4 if (flags_sv != 0) {
456 4 0 for (i = 0; i < 2; i++) {
457 4 0 if (SvROK(buffers)) {
459 4 0 if (SvTYPE(buffers) == SVt_PVAV)
461 0 0 if (i == 0)
467 0 4 Size_t iovcnt = av_count(sizes);
468 0 4 if (iovcnt == 0)
470 0 4 if (iovcnt > INT_MAX) {
475 0 4 Newxz(iov, iovcnt, struct iovec);
476 0 4 if (!iov) {
481 16 4 for (i = 0; i < iovcnt; i++) {
483 16 0 if (size && SvOK(*size)) {
0 16 if (size && SvOK(*size)) {
0 0 if (size && SvOK(*size)) {
0 0 if (size && SvOK(*size)) {
484 0 16 iov_len = SvUV(*size);
485 8 8 if (iov_len > 0) {
487 0 8 if (!iov_base) {
499 2 2 if (offset_sv == NULL)
501 2 0 else if (flags_sv == NULL) {
503 0 2 off_t offset = SvOK(offset_sv) ? (off_t)SvOFFT(offset_sv) : 0;
0 0 off_t offset = SvOK(offset_sv) ? (off_t)SvOFFT(offset_sv) : 0;
0 0 off_t offset = SvOK(offset_sv) ? (off_t)SvOFFT(offset_sv) : 0;
2 0 off_t offset = SvOK(offset_sv) ? (off_t)SvOFFT(offset_sv) : 0;
521 0 4 if (rv <= 0) {
527 16 4 for (iov_sum = 0, i = 0; i < iovcnt; i++) {
532 16 0 if (iov_sum <= rv)
535 0 0 else if (iov_sum - rv < iov_len)
545 8 8 SV *tmp_sv = iov_len ? newSV_type(SVt_PV) : newSVpvn("", 0);
547 0 16 if (!tmp_sv) {
554 8 8 if (iov_len) {
555 0 8 if (sv_cur != iov_len)
561 0 8 SvTAINTED_on(tmp_sv);
564 0 16 if (!av_store((AV*)buffers, i, tmp_sv))
588 0 4 if (flags_sv != NULL) {
594 0 4 Size_t bufcnt = av_count(buffers);
595 0 4 if (bufcnt == 0)
597 0 4 if (bufcnt > INT_MAX) {
602 0 4 Newxc(iov, bufcnt, struct iovec, struct iovec);
603 0 4 if (!iov) {
610 16 4 for (i = 0; i < bufcnt; i++) {
612 16 0 if (av_elt && SvOK(*av_elt)) {
4 12 if (av_elt && SvOK(*av_elt)) {
4 0 if (av_elt && SvOK(*av_elt)) {
0 4 if (av_elt && SvOK(*av_elt)) {
613 12 0 iov_base = SvPV(*av_elt, iov_len);
614 8 4 if (iov_len > 0) {
622 0 4 if (iovcnt == 0)
624 2 2 else if (offset_sv == NULL)
626 2 0 else if (flags_sv == NULL) {
628 0 2 off_t offset = SvOK(offset_sv) ? (off_t)SvOFFT(offset_sv) : 0;
0 0 off_t offset = SvOK(offset_sv) ? (off_t)SvOFFT(offset_sv) : 0;
0 0 off_t offset = SvOK(offset_sv) ? (off_t)SvOFFT(offset_sv) : 0;
2 0 off_t offset = SvOK(offset_sv) ? (off_t)SvOFFT(offset_sv) : 0;
655 0 3 if (accmode == O_RDONLY)
657 0 3 else if (flags & O_APPEND)
658 0 0 return (accmode == O_RDWR) ? "a+b" : "ab";
659 0 3 else if (accmode == O_WRONLY)
661 3 0 else if (accmode == O_RDWR)
680 0 36 if (SvOK(sv)) {
0 0 if (SvOK(sv)) {
0 0 if (SvOK(sv)) {
681 10 26 if (psx_looks_like_number(sv))
682 10 0 fn = SvIV(sv);
683 25 0 else if ((io = sv_2io(sv))) {
684 11 14 if (IoIFP(io)) /* from open() or sysopen() */
686 14 0 else if (IoDIRP(io)) /* from opendir() */
701 0 0 if (!SvOK(sv))
0 0 if (!SvOK(sv))
0 0 if (!SvOK(sv))
703 0 0 else if (psx_looks_like_number(sv)) {
704 0 0 int fn = SvIV(sv);
707 0 0 else if ((io = sv_2io(sv))) {
708 0 0 if (IoIFP(io))
710 0 0 else if (IoDIRP(io)) {
827 0 0 if (clock_getcpuclockid(pid, &clock_id) == 0)
841 0 0 if (ix == 0)
845 0 0 if (ret == 0) {
846 0 0 EXTEND(SP, 2);
859 0 0 if (clock_settime(clock_id, &tp) == 0)
884 0 0 if (rv == 0 || (errno = rv) == EINTR)
0 0 if (rv == 0 || (errno = rv) == EINTR)
885 0 0 PUSH_NANOSLEEP_REMAIN;
0 0 PUSH_NANOSLEEP_REMAIN;
0 0 PUSH_NANOSLEEP_REMAIN;
0 0 PUSH_NANOSLEEP_REMAIN;
896 0 0 if (nanosleep(&request, &remain) == 0 || errno == EINTR)
0 0 if (nanosleep(&request, &remain) == 0 || errno == EINTR)
897 0 0 PUSH_NANOSLEEP_REMAIN;
0 0 PUSH_NANOSLEEP_REMAIN;
0 0 PUSH_NANOSLEEP_REMAIN;
0 0 PUSH_NANOSLEEP_REMAIN;
909 0 0 if (len) {
911 0 0 if (buf != NULL)
918 0 0 if (buf != NULL)
1000 0 0 if (rv == 0 || rv == FNM_NOMATCH)
0 0 if (rv == 0 || rv == FNM_NOMATCH)
1017 0 0 if (tm != NULL) {
1018 0 0 EXTEND(SP, 9);
1050 0 0 if (sec && SvOK(sec))
0 0 if (sec && SvOK(sec))
0 0 if (sec && SvOK(sec))
0 0 if (sec && SvOK(sec))
1051 0 0 tm.tm_sec = SvIV(sec);
1052 0 0 if (min && SvOK(min))
0 0 if (min && SvOK(min))
0 0 if (min && SvOK(min))
0 0 if (min && SvOK(min))
1053 0 0 tm.tm_min = SvIV(min);
1054 0 0 if (hour && SvOK(hour))
0 0 if (hour && SvOK(hour))
0 0 if (hour && SvOK(hour))
0 0 if (hour && SvOK(hour))
1055 0 0 tm.tm_hour = SvIV(hour);
1056 0 0 if (mday && SvOK(mday))
0 0 if (mday && SvOK(mday))
0 0 if (mday && SvOK(mday))
0 0 if (mday && SvOK(mday))
1057 0 0 tm.tm_mday = SvIV(mday);
1058 0 0 if (mon && SvOK(mon))
0 0 if (mon && SvOK(mon))
0 0 if (mon && SvOK(mon))
0 0 if (mon && SvOK(mon))
1059 0 0 tm.tm_mon = SvIV(mon);
1060 0 0 if (year && SvOK(year))
0 0 if (year && SvOK(year))
0 0 if (year && SvOK(year))
0 0 if (year && SvOK(year))
1061 0 0 tm.tm_year = SvIV(year);
1062 0 0 if (wday && SvOK(wday))
0 0 if (wday && SvOK(wday))
0 0 if (wday && SvOK(wday))
0 0 if (wday && SvOK(wday))
1063 0 0 tm.tm_wday = SvIV(wday);
1064 0 0 if (yday && SvOK(yday))
0 0 if (yday && SvOK(yday))
0 0 if (yday && SvOK(yday))
0 0 if (yday && SvOK(yday))
1065 0 0 tm.tm_yday = SvIV(yday);
1066 0 0 if (isdst && SvOK(isdst))
0 0 if (isdst && SvOK(isdst))
0 0 if (isdst && SvOK(isdst))
0 0 if (isdst && SvOK(isdst))
1067 0 0 tm.tm_isdst = SvIV(isdst);
1071 0 0 if (remainder) {
1072 0 0 if (GIMME != G_LIST)
0 0 if (GIMME != G_LIST)
1075 0 0 EXTEND(SP, 9);
1076 0 0 if (tm.tm_sec < 0) PUSHs(&PL_sv_undef); else mPUSHi(tm.tm_sec);
1077 0 0 if (tm.tm_min < 0) PUSHs(&PL_sv_undef); else mPUSHi(tm.tm_min);
1078 0 0 if (tm.tm_hour < 0) PUSHs(&PL_sv_undef); else mPUSHi(tm.tm_hour);
1079 0 0 if (tm.tm_mday < 0) PUSHs(&PL_sv_undef); else mPUSHi(tm.tm_mday);
1080 0 0 if (tm.tm_mon < 0) PUSHs(&PL_sv_undef); else mPUSHi(tm.tm_mon);
1081 0 0 if (tm.tm_year == INT_MIN) PUSHs(&PL_sv_undef); else mPUSHi(tm.tm_year);
1082 0 0 if (tm.tm_wday < 0) PUSHs(&PL_sv_undef); else mPUSHi(tm.tm_wday);
1083 0 0 if (tm.tm_yday < 0) PUSHs(&PL_sv_undef); else mPUSHi(tm.tm_yday);
1107 0 0 if (gethostname(name, sizeof(name)) == 0)
1118 0 0 if (getitimer(which, &value) == 0) {
1119 0 0 EXTEND(SP, 4);
1135 0 0 if (setitimer(which, &value, &ovalue) == 0) {
1136 0 0 EXTEND(SP, 4);
1153 0 0 if (rv != -1 || errno == 0)
0 0 if (rv != -1 || errno == 0)
1205 0 0 RETURN_UTXENT;
0 0 RETURN_UTXENT;
1217 0 0 if (ut_id != NULL) {
1221 0 0 RETURN_UTXENT;
0 0 RETURN_UTXENT;
1232 0 0 if (ut_line != NULL) {
1235 0 0 RETURN_UTXENT;
0 0 RETURN_UTXENT;
1259 0 0 EXTEND(SP, 4);
1274 0 0 long result = ix == 0 ? jrand48(xsubi) : nrand48(xsubi);
1276 0 0 EXTEND(SP, 4);
1304 0 0 if (rv != -1 || errno == 0)
0 0 if (rv != -1 || errno == 0)
1317 0 0 EXTEND(SP, 3);
1441 0 0 if (rv == 0)
1473 0 0 if (rv == 0) {
1474 0 0 EXTEND(SP, 4);
1494 0 0 if (initial_sec < 0 || initial_nsec < 0)
0 0 if (initial_sec < 0 || initial_nsec < 0)
1503 0 0 if (rv == 0) {
1504 0 0 EXTEND(SP, 4);
1524 0 2 if (!SvOK(what)) {
0 0 if (!SvOK(what)) {
0 0 if (!SvOK(what)) {
1528 0 2 else if (SvPOK(what) || SvPOKp(what)) {
0 0 else if (SvPOK(what) || SvPOKp(what)) {
1529 2 0 path = SvPV_nolen(what);
1553 0 0 if (!SvOK(what)) {
0 0 if (!SvOK(what)) {
0 0 if (!SvOK(what)) {
1557 0 0 else if (SvPOK(what) || SvPOKp(what)) {
0 0 else if (SvPOK(what) || SvPOKp(what)) {
1558 0 0 path = SvPV_nolen(what);
1582 0 0 if (!SvOK(what)) {
0 0 if (!SvOK(what)) {
0 0 if (!SvOK(what)) {
1586 0 0 else if (SvPOK(what) || SvPOKp(what)) {
0 0 else if (SvPOK(what) || SvPOKp(what)) {
1587 0 0 path = SvPV_nolen(what);
1635 0 2 if (!SvOK(what))
0 0 if (!SvOK(what))
0 0 if (!SvOK(what))
1637 1 1 else if (SvPOK(what) || SvPOKp(what)) {
0 1 else if (SvPOK(what) || SvPOKp(what)) {
1638 1 0 char *path = SvPV_nolen(what);
1649 2 0 RETURN_STAT_BUF(rv, buf);
2 0 RETURN_STAT_BUF(rv, buf);
2 0 RETURN_STAT_BUF(rv, buf);
0 2 RETURN_STAT_BUF(rv, buf);
0 0 RETURN_STAT_BUF(rv, buf);
0 0 RETURN_STAT_BUF(rv, buf);
1661 1 0 RETURN_STAT_BUF(rv, buf);
1 0 RETURN_STAT_BUF(rv, buf);
1 0 RETURN_STAT_BUF(rv, buf);
0 1 RETURN_STAT_BUF(rv, buf);
0 0 RETURN_STAT_BUF(rv, buf);
0 0 RETURN_STAT_BUF(rv, buf);
1675 3 1 ISFUNC(isalnum)
1 124 ISFUNC(isalnum)
126 3 ISFUNC(isalnum)
125 1 ISFUNC(isalnum)
1685 3 1 ISFUNC(isalpha)
1 104 ISFUNC(isalpha)
106 3 ISFUNC(isalpha)
105 1 ISFUNC(isalpha)
1695 3 1 ISFUNC(isascii)
1 256 ISFUNC(isascii)
258 3 ISFUNC(isascii)
257 1 ISFUNC(isascii)
1705 3 1 ISFUNC(isblank)
1 4 ISFUNC(isblank)
6 3 ISFUNC(isblank)
5 1 ISFUNC(isblank)
1715 3 1 ISFUNC(iscntrl)
1 64 ISFUNC(iscntrl)
66 3 ISFUNC(iscntrl)
65 1 ISFUNC(iscntrl)
1725 3 1 ISFUNC(isdigit)
1 20 ISFUNC(isdigit)
22 3 ISFUNC(isdigit)
21 1 ISFUNC(isdigit)
1735 3 1 ISFUNC(isgraph)
1 190 ISFUNC(isgraph)
192 3 ISFUNC(isgraph)
191 1 ISFUNC(isgraph)
1745 3 1 ISFUNC(islower)
1 52 ISFUNC(islower)
54 3 ISFUNC(islower)
53 1 ISFUNC(islower)
1755 3 1 ISFUNC(isprint)
1 192 ISFUNC(isprint)
194 3 ISFUNC(isprint)
193 1 ISFUNC(isprint)
1765 3 1 ISFUNC(ispunct)
1 66 ISFUNC(ispunct)
68 3 ISFUNC(ispunct)
67 1 ISFUNC(ispunct)
1775 3 1 ISFUNC(isspace)
1 12 ISFUNC(isspace)
14 3 ISFUNC(isspace)
13 1 ISFUNC(isspace)
1785 3 1 ISFUNC(isupper)
1 52 ISFUNC(isupper)
54 3 ISFUNC(isupper)
53 1 ISFUNC(isupper)
1795 3 1 ISFUNC(isxdigit)
1 50 ISFUNC(isxdigit)
52 3 ISFUNC(isxdigit)
51 1 ISFUNC(isxdigit)
1837 0 0 if (template != NULL) {
1839 0 0 if (fd >= 0) {
1840 0 0 EXTEND(SP, 2);
1870 0 0 if (fd2 < 0)
1874 0 0 if (!dir) {
1886 0 0 io = GvIOn(gv);
0 0 io = GvIOn(gv);
0 0 io = GvIOn(gv);
0 0 io = GvIOn(gv);
0 0 io = GvIOn(gv);
1942 2 0 RETURN_STAT_BUF(rv, buf);
2 0 RETURN_STAT_BUF(rv, buf);
2 0 RETURN_STAT_BUF(rv, buf);
0 2 RETURN_STAT_BUF(rv, buf);
0 0 RETURN_STAT_BUF(rv, buf);
0 0 RETURN_STAT_BUF(rv, buf);
1987 0 9 if (ix != 0) {
1992 1 8 if (!SvOK(dirfdsv)) {
1 0 if (!SvOK(dirfdsv)) {
1 0 if (!SvOK(dirfdsv)) {
1999 5 3 if (SvROK(dirfdsv) && SvTYPE(SvRV(dirfdsv)) == SVt_IV) {
1 4 if (SvROK(dirfdsv) && SvTYPE(SvRV(dirfdsv)) == SVt_IV) {
2000 1 0 if (SvIV(SvRV(dirfdsv)) != AT_FDCWD) {
0 1 if (SvIV(SvRV(dirfdsv)) != AT_FDCWD) {
2010 1 5 if (dir_fd < 0 && dir_fd != AT_FDCWD) {
0 1 if (dir_fd < 0 && dir_fd != AT_FDCWD) {
2016 7 0 if (ix == 0) {
2018 0 7 if (items > 4)
2020 7 0 flags = (items > 2) ? SvIV(ST(2)) : O_RDONLY;
7 0 flags = (items > 2) ? SvIV(ST(2)) : O_RDONLY;
2021 0 7 mode = (items > 3) ? SvIV(ST(3)) : 0666;
0 0 mode = (items > 3) ? SvIV(ST(3)) : 0666;
2050 1 6 if (path_fd < 0)
2054 2 4 if (got_fd)
2061 4 0 if (fstat(path_fd, &st) == 0) {
2066 4 0 if (gv) {
2067 1 3 if (S_ISDIR(st.st_mode)) {
2069 1 0 if (dirp) {
2070 1 0 IO *io = GvIOn(gv);
0 1 IO *io = GvIOn(gv);
0 0 IO *io = GvIOn(gv);
1 0 IO *io = GvIOn(gv);
0 1 IO *io = GvIOn(gv);
2078 3 0 if (filep) {
2080 3 0 if (pio_filep && do_open(gv, "+<&", 3, FALSE, 0, 0, pio_filep))
3 0 if (pio_filep && do_open(gv, "+<&", 3, FALSE, 0, 0, pio_filep))
2087 4 0 if (return_handle) {
2092 0 0 else if (dirp)
2094 0 0 else if (pio_filep)
2096 0 0 else if (filep)
2102 4 0 if (gv)
2116 1 0 if (RETVAL != NULL)
2129 1 0 if (RETVAL != NULL)
2143 1 0 if (RETVAL != NULL)
2185 1 1 if (! SvPOK(buf))
2187 2 0 cbuf = SvGROW(buf, count);
0 2 cbuf = SvGROW(buf, count);
2188 0 2 if (cbuf == NULL)
2190 0 2 else if (count == 0)
2194 2 0 if (RETVAL >= 0) {
2197 0 2 SvTAINTED_on(buf);
2213 0 2 if (!SvPOK(buf))
2216 2 0 cbuf = SvPV_const(buf, buf_cur);
2217 0 2 if (!buf_cur)
2220 0 2 if (count == NULL || !SvOK(count))
0 0 if (count == NULL || !SvOK(count))
0 0 if (count == NULL || !SvOK(count))
0 0 if (count == NULL || !SvOK(count))
2223 0 0 nbytes = SvUV(count);
2224 0 0 if (nbytes > buf_cur)
2227 2 0 RETVAL = nbytes ? write(fd, cbuf, nbytes) : 0;
2310 1 1 if (! SvPOK(buf))
2312 2 0 cbuf = SvPV(buf, buf_cur);
2315 0 2 if (buf_offset < 0) {
2317 0 0 if (buf_offset < 0) {
2325 0 2 if ((new_len = buf_offset + nbytes) > buf_len) {
2326 0 0 cbuf = SvGROW(buf, new_len);
0 0 cbuf = SvGROW(buf, new_len);
2327 0 0 if (cbuf == NULL)
2332 0 2 if (buf_offset > buf_cur)
2336 2 0 if (nbytes) {
2337 2 0 off_t f_offset = (offset != NULL && SvOK(offset)) ? SvUV(offset) : 0;
0 2 off_t f_offset = (offset != NULL && SvOK(offset)) ? SvUV(offset) : 0;
0 0 off_t f_offset = (offset != NULL && SvOK(offset)) ? SvUV(offset) : 0;
0 0 off_t f_offset = (offset != NULL && SvOK(offset)) ? SvUV(offset) : 0;
0 2 off_t f_offset = (offset != NULL && SvOK(offset)) ? SvUV(offset) : 0;
2343 2 0 if (RETVAL >= 0) {
2346 0 2 SvTAINTED_on(buf);
2363 2 0 cbuf = SvPV_const(buf, buf_cur);
2364 2 0 if (!cbuf || !buf_cur)
0 2 if (!cbuf || !buf_cur)
2368 0 2 if (buf_offset < 0)
2370 2 0 if (buf_offset < 0 || (!buf_cur && buf_offset > 0) ||
0 2 if (buf_offset < 0 || (!buf_cur && buf_offset > 0) ||
0 0 if (buf_offset < 0 || (!buf_cur && buf_offset > 0) ||
2 0 if (buf_offset < 0 || (!buf_cur && buf_offset > 0) ||
2371 0 2 (buf_cur && buf_offset >= buf_cur)) {
2376 2 0 if (count == NULL || !SvOK(count))
2 0 if (count == NULL || !SvOK(count))
2 0 if (count == NULL || !SvOK(count))
2 0 if (count == NULL || !SvOK(count))
2379 0 0 i_count = SvUV(count);
2380 0 0 if (i_count > max_nbytes)
2383 2 0 if (i_count) {
2384 2 0 off_t f_offset = (offset != NULL && SvOK(offset)) ? SvUV(offset) : 0;
0 2 off_t f_offset = (offset != NULL && SvOK(offset)) ? SvUV(offset) : 0;
0 0 off_t f_offset = (offset != NULL && SvOK(offset)) ? SvUV(offset) : 0;
0 0 off_t f_offset = (offset != NULL && SvOK(offset)) ? SvUV(offset) : 0;
0 2 off_t f_offset = (offset != NULL && SvOK(offset)) ? SvUV(offset) : 0;
2429 0 0 if (rv == 0)
2454 0 0 if (rv == 0)
2538 0 2 if (!SvOK(what)) {
0 0 if (!SvOK(what)) {
0 0 if (!SvOK(what)) {
2542 1 1 else if (SvPOK(what) || SvPOKp(what)) {
0 1 else if (SvPOK(what) || SvPOKp(what)) {
2543 1 0 path = SvPV_nolen(what);
2671 0 0 EXTEND(SP, 2);
2885 0 0 if (errno == 0 && fetestexcept(FE_ALL_EXCEPT) == 0)
0 0 if (errno == 0 && fetestexcept(FE_ALL_EXCEPT) == 0)
2886 0 0 PUSH_INT_OR_PV(ret, tmp);
2917 0 0 if (errno == 0 && fetestexcept(FE_ALL_EXCEPT) == 0)
0 0 if (errno == 0 && fetestexcept(FE_ALL_EXCEPT) == 0)
2932 0 0 if (errno == 0 && fetestexcept(FE_ALL_EXCEPT) == 0) {
0 0 if (errno == 0 && fetestexcept(FE_ALL_EXCEPT) == 0) {
3061 0 0 RETURN_COMPLEX(result);
3096 0 0 RETURN_COMPLEX(result);
3107 0 0 RETURN_COMPLEX(result);
3119 0 0 RETURN_COMPLEX(result);
3130 0 0 RETURN_COMPLEX(result);
3141 0 0 RETURN_COMPLEX(result);
3152 0 0 RETURN_COMPLEX(result);
3163 0 0 RETURN_COMPLEX(result);
3174 0 0 RETURN_COMPLEX(result);
3185 0 0 RETURN_COMPLEX(result);
3196 0 0 RETURN_COMPLEX(result);
3207 0 0 RETURN_COMPLEX(result);
3218 0 0 RETURN_COMPLEX(result);
3229 0 0 RETURN_COMPLEX(result);
3240 0 0 RETURN_COMPLEX(result);
3251 0 0 RETURN_COMPLEX(result);
3262 0 0 RETURN_COMPLEX(result);