develooper Front page | perl.perl5.porters | Postings from September 2000

[ID 20000918.003] "Propagated" too far?

Thread Next
Dominic Dunlop
September 18, 2000 05:51
[ID 20000918.003] "Propagated" too far?
Message ID:
This is a bug report for perl from,
generated with the help of perlbug 1.32 running under perl v5.7.0.

[Please enter your report here]
This with perl@7094:

% ./miniperl -Ilib -Mcharnames=icelandic -le \
'$s="\N{LATIN SMALL LETTER THORN}"; {use bytes; print length $s, $s}'
Unknown charname 'LATIN SMALL LETTER THORN' at lib/ line 31.
Propagated at -e line 1, within string
Unknown charname 'LATIN SMALL LETTER THORN' at lib/ line 31.
PropagatedBEGIN not safe after errors--compilation aborted at -e line 1.

(Apologies for the long on-liner.)

There seem to be several problems here:

1. The second "Propagated" looks to me as if it has leaked out into a
    message where it's not required.

2. If I'm wrong, and it is required on the last line, its formatting
    is incorrect -- there's a missing trailing space.

3. "Propagated" an error message doesn't make much sense to me, and
    it's not documented in perldiag.pod.

4.  charnames should probably whine if I specify a stupid script name,
     but that's a separate issue.

The "Propagated" comes from toke.c line 5762, but as I don't know what
should be happening, I can't attempt to fix things.

Enlightenment, please.

[Please do not change anything below this line]
This perlbug was built using Perl v5.7.0 - Sat Sep 16 15:03:48 WET DST 2000
It is being executed now by  Perl v5.7.0 - Tue Sep  5 16:08:31 WET DST 2000.

Site configuration information for perl v5.7.0:

Configured by domo at Tue Sep  5 16:08:31 WET DST 2000.

Summary of my perl5 (revision 5.0 version 7 subversion 0) configuration:
     osname=machten, osvers=4.1.4, archname=powerpc-machten
     uname='machten ppp100 5 0.5 powerpc '
     config_args='-Doptimize=-g -e'
     hint=recommended, useposix=true, d_sigaction=define
     usethreads=undef use5005threads=undef useithreads=undef 
     useperlio=undef d_sfio=undef uselargefiles=define usesocks=undef
     use64bitint=undef use64bitall=undef uselongdouble=undef
     cc='cc', ccflags ='-DNOTDEF_MACHTEN -DREG_INFTY=2047 -DDEBUGGING 
-I/usr/local/include', optimize='-g', cppflags='-DNOTDEF_MACHTEN 
-DREG_INFTY=2047 -DDEBUGGING -I/usr/local/include'
     ccversion='', gccversion='2.8.1', gccosandvers='machten4'
     intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=4321
     d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=8
     ivtype='long', ivsize=4, nvtype='double', nvsize=8, 
Off_t='off_t', lseeksize=4
     alignbytes=8, usemymalloc=y, prototype=define
   Linker and Libraries:
     ld='ld', ldflags =' -Xlstack=1048576 -L/usr/local/lib'
     libpth=/usr/local/lib /usr/lib
     libs=-lndbm -lgdbm -ldb -lm -lc -lutil
     libc=/usr/lib/libc.a, so=so, useshrplib=false, libperl=libperl.a
   Dynamic Linking:
     dlsrc=dl_none.xs, dlext=none, d_dlsymun=undef, ccdlflags=''
     cccdlflags='', lddlflags=''

Locally applied patches:

@INC for perl v5.7.0:

Environment for perl v5.7.0:
     LANG (unset)
     LANGUAGE (unset)
     LOGDIR (unset)
     PERL_BADLANG (unset)

Thread Next Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at | Group listing | About