serow@octavia.ibix.co.jp (Yoshitomo Tanaka) (06/11/91)
On MSDOS, perl 4.0 patchlevel 10 fails on t/op/pat.t test 44-47. In dolist.c at line 107, >if (global) { > if (spat->spat_regexp->startp[0]) { > s = spat->spat_regexp->endp[0]; > } >} It seems to me that startp[0] is refered befor calling regexec(). So, startp[0]/endp[0] has garbage and '/RE/g' does not work right. I modified regcomp() to allocate startp useing Newz() instead of New(), and works fine. ----_--__---_-_-_-__--_-__-__---_-_----_--_-_---_---_----- -+--+- | Yoshitomo Tanaka | ' | serow@ibix.co.jp \--- |