On Mon 01 Nov 2004 20:50, Yitzchak Scott-Thoennes (via RT) <[EMAIL PROTECTED]> wrote:
> # New Ticket Created by  Yitzchak Scott-Thoennes 
> # Please include the string:  [perl #32272]
> # in the subject line of all future correspondence about this issue. 
> # <URL: http://rt.perl.org:80/rt3/Ticket/Display.html?id=32272 >
> 
> 
> This is a build failure report for perl from [EMAIL PROTECTED],
> generated with the help of perlbug 1.35 running under perl v5.8.5.
> 
> 
> -----------------------------------------------------------------
> [Please enter your report here]
> 
> ext/Cwd/t/cwd.............................readdir(linktest/..): No such file or 
> directory at ../ext/Cwd/t/cwd.t line 151
> #     Failed test (../ext/Cwd/t/cwd.t at line 151)
> #                   ''
> #     doesn't match '(?-xism:t/_ptrslt_/_path_/_to_/_a_/_dir_$)'

Isn't that the same I reported from blead?
It's different when running a manual as from a smoke or a make test_harness
The othe failure was on line #164 IIRC

This one went away if I symlinked cwt.t to perl_current/t

> FAILED at test 21
> t/io/tell.................................FAILED at test 28
> ext/B/t/optree_specials...................# Failed at ./test.pl line 249
> #      got 'BEGIN 1:
> # b  <1> leavesub[1 ref] K/REFC,1 ->(end)
> # -     <@> lineseq KP ->b
> # 1        <;> nextstate(B::Concise -249 Concise.pm:306) v/2 ->2
> # 3        <1> require sK/1 ->4
> # 2           <$> const[PV "strict.pm"] s/BARE ->3
> # 4        <;> nextstate(B::Concise -249 Concise.pm:306) v/2 ->5
> # -        <@> lineseq K ->-
> # 5           <;> nextstate(B::Concise -249 Concise.pm:306) /2 ->6
> # a           <1> entersub[t1] KS*/TARG,2 ->b
> # 6              <0> pushmark s ->7
> # 7              <$> const[PV "strict"] sM ->8
> # 8              <$> const[PV "refs"] sM ->9
> # 9              <$> method_named[PVIV 1520340202] ->a
> # BEGIN 2:
> # m  <1> leavesub[1 ref] K/REFC,1 ->(end)
> # -     <@> lineseq KP ->m
> # c        <;> nextstate(B::Concise -234 Concise.pm:329) v/2 ->d
> # e        <1> require sK/1 ->f
> # d           <$> const[PV "warnings.pm"] s/BARE ->e
> # f        <;> nextstate(B::Concise -234 Concise.pm:329) v/2 ->g
> # -        <@> lineseq K ->-
> # g           <;> nextstate(B::Concise -234 Concise.pm:329) /2 ->h
> # l           <1> entersub[t1] KS*/TARG,2 ->m
> # h              <0-e syntax OK
> # > pushmark s ->i
> # i              <$> const[PV "warnings"] sM ->j
> # j              <$> const[PV "qw"] sM ->k
> # k              <$> method_named[PVIV 1520340202] ->l
> # BEGIN 3:
> # q  <1> leavesub[1 ref] K/REFC,1 ->(end)
> # -     <@> lineseq KP ->q
> # n        <;> nextstate(main 2 -e:1) v ->o
> # p        <1> postinc[t3] sK/1 ->q
> # -           <1> ex-rv2sv sKRM/1 ->p
> # o              <#> gvsv[*beg] s ->p
> # '
> # expected /(?ms-xi:^(-e .*?)?(B::Concise::compile.*?)?
> # BEGIN 1:
> # b  <1> leavesub\[1 ref\] K/REFC,1 ->\(end\)
> # -     <\@> lineseq KP ->b
> # 1        <;> (?:next|db)state(.*?) v/2 ->2
> # 3        <1> require sK/1 ->4
> # 2           <\$> const\[PV ".*?"\] s/BARE ->3
> # 4        <;> (?:next|db)state(.*?) v/2 ->5
> # -        <\@> lineseq K ->-
> # 5           <;> (?:next|db)state(.*?) /2 ->6
> # a           <1> entersub\[t1\] KS\*/TARG,2 ->b
> # 6              <0> pushmark s ->7
> # 7              <\$> const\[PV ".*?"\] sM ->8
> # 8              <\$> const\[PV ".*?"\] sM ->9
> # 9              <\$> method_named\[PVIV 1520340202\] ->a
> # BEGIN 2:
> # m  <1> leavesub\[1 ref\] K/REFC,1 ->\(end\)
> # -     <\@> lineseq KP ->m
> # c        <;> (?:next|db)state(.*?) v/2 ->d
> # e        <1> require sK/1 ->f
> # d           <\$> const\[PV ".*?"\] s/BARE ->e
> # f        <;> (?:next|db)state(.*?) v/2 ->g
> # -        <\@> lineseq K ->-
> # g           <;> (?:next|db)state(.*?) /2 ->h
> # l           <1> entersub\[t1\] KS\*/TARG,2 ->m
> # h              <0> pushmark s ->i
> # i              <\$> const\[PV ".*?"\] sM ->j
> # j              <\$> const\[PV ".*?"\] sM ->k
> # k              <\$> method_named\[PVIV 1520340202\] ->l
> # BEGIN 3:
> # q  <1> leavesub\[1 ref\] K/REFC,1 ->\(end\)
> # -     <\@> lineseq KP ->q
> # n        <;> (?:next|db)state(.*?) v ->o
> # p        <1> postinc\[t3\] sK/1 ->q
> # -           <1> ex-rv2sv sKRM/1 ->p
> # o              <\#> gvsv\[\*beg\] s ->p
> # $)/
> FAILED at test 2
> Failed 3 test scripts out of 876, 99.66% okay.
> 
> The io/tell doesn't concern me; it's a questionable test, and goes away
> with PERLIO=perlio (or -Uusefaststdio).
> 
> ext/Cwd/t/cwd turns out to happen with older perls with the Cwd from CPAN
> but the test is disabled by default outside the core, which is strange
> given that it is testing Cwd::_perl_abs_path, and not anything in the
> perl code.  Anyway, _perl_abs_path desperately needs some commenting;
> I don't understand what it's trying to do or why it's not working on
> cygwin for this test.
> 
> ext/B/t/optree_specials seems to be expecting stderr/stdout to have a
> particular order which isn't happening for me.

-- 
H.Merijn Brand        Amsterdam Perl Mongers (http://amsterdam.pm.org/)
using perl-5.6.1, 5.8.5, & 5.9.x, and 809 on  HP-UX 10.20 & 11.00, 11i,
   AIX 4.3, AIX 5.2, SuSE 9.1, and Win2k.  http://www.cmve.net/~merijn/
http://archives.develooper.com/[EMAIL PROTECTED]/   [EMAIL PROTECTED]
send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org


Reply via email to