On Fri 17 Dec 2004 05:20, "Alex" <[EMAIL PROTECTED]> wrote:
> Hello.
> I'm not experienced in C, to my regret ...
>
> "Andrew Dougherty" <[EMAIL PROTECTED]> wrote:
> > I can't reproduce this on Solaris 8, SPARC, with gcc 3.4.1. Here's line
> 2558:
> > bof = PerlIO_tell(PL_rsfp) == (Off_t)SvCUR(PL_linestr);
> > It's possible your gcc would be happier with an extra pair of parentheses
> > around the righthand side of the '=' sign.
>
> It doesn't help unfortunatly.
Then double them, because the output of toke.i still does not have them
bof = (PerlIO_tell(PL_rsfp) == (Off_t)SvCUR(PL_linestr));
^ ^
should then give you
bof = (Perl_PerlIO_tell(my_perl, (my_perl->Irsfp)) ==
(off_t)((XPV*)((my_perl->Ilinestr))->sv_any)->xpv_cur);
^
^
so if it does not, try
bof = ((PerlIO_tell(PL_rsfp) == (Off_t)SvCUR(PL_linestr)));
> > You can also try
> > make toke.i
>
> It gave me the following:
> bof = Perl_PerlIO_tell(my_perl, (my_perl->Irsfp)) == (off_t)((XPV*)
> ((my_perl->Ilinestr))->sv_any)->xpv_cur;
--
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:[EMAIL PROTECTED]/ [EMAIL PROTECTED]
send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
