Really minor compilation mistake/typo

[p5pRT]

Migrated from rt.perl.org#23036 (status was 'resolved')

Searchable as RT23036$

[p5pRT]

From L-marks@northwestern.edu

Created by L-marks@northwestern.edu

This is a bug report for perl from L-marks@​northwestern.edu\, generated with the help of perlbug 1.34 running under perl v5.8.0.

----------------------------------------------------------------- During compilation of (I think) the string tables in 5.8.0\, there are printout's to the terminal of general form​:

"69627 bytes in string tables 69883 bytes (49.9%) saved spotting duplicates"

I think this should be 50.1% saved\, not 49.9% i.e. the code writes A/(A+B) but should use B/(A+B)

Perl Info

``` Flags: category=core severity=low Site configuration information for perl v5.8.0: Configured by ldm at Mon Jul 14 09:43:11 CDT 2003. Summary of my perl5 (revision 5.0 version 8 subversion 0) configuration: Platform: osname=hpux, osvers=10.20, archname=PA-RISC2.0 uname='hp-ux risc5 b.10.20 a 9000785 2015872252 two-user license ' config_args='' hint=previous, useposix=true, d_sigaction=define usethreads=undef use5005threads=undef useithreads=undef usemultiplicity=undef useperlio=define d_sfio=undef uselargefiles=define usesocks=undef use64bitint=undef use64bitall=undef uselongdouble=undef usemymalloc=n, bincompat5005=undef Compiler: cc='cc', ccflags ='-Ae -D_HPUX_SOURCE -Wl,+vnocompatwarnings -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64', optimize='+O2 +Onolimit', cppflags='-Aa -D__STDC_EXT__ -D_HPUX_SOURCE -Ae -D_HPUX_SOURCE -Wl,+vnocompatwarnings -I/usr/local/include -Ae -D_HPUX_SOURCE -Wl,+vnocompatwarnings -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -Ae -D_HPUX_SOURCE -Wl,+vnocompatwarnings -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64' ccversion='A.10.32.30', gccversion='', gccosandvers='' intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=4321 d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16 ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8 alignbytes=8, prototype=define Linker and Libraries: ld='/usr/bin/ld', ldflags =' -L/usr/local/lib' libpth=/usr/local/lib /lib /usr/lib /usr/ccs/lib libs=-lnsl_s -lndbm -lmalloc -ldld -lm -lc -lndir -lcrypt -lsec perllibs=-lnsl_s -lmalloc -ldld -lm -lc -lndir -lcrypt -lsec libc=/lib/libc.sl, so=sl, useshrplib=false, libperl=libperl.a gnulibc_version='' Dynamic Linking: dlsrc=dl_hpux.xs, dlext=sl, d_dlsymun=undef, ccdlflags='-Wl,-E -Wl,-B,deferred ' cccdlflags='+Z', lddlflags='-b +vnocompatwarnings -L/usr/local/lib' Locally applied patches: @INC for perl v5.8.0: /usr/local/lib/5.8.0/PA-RISC2.0 /usr/local/lib/5.8.0 /usr/local/lib/site_perl/5.8.0/PA-RISC2.0 /usr/local/lib/site_perl/5.8.0 /usr/local/lib/site_perl . Environment for perl v5.8.0: HOME=/home/ldm LANG (unset) LANGUAGE (unset) LD_LIBRARY_PATH (unset) LOGDIR (unset) PATH=/usr/local/gnu/bin:/usr/local/bin:/usr/bin:/opt/ansic/bin:/usr/ccs/bin:/usr/contrib/bin:/opt/nettladm/bin:/opt/pd/bin:/usr/bin/X11:/usr/contrib/bin/X11:/opt/upgrade/bin:/opt/hparray/bin:/opt/aCC/bin:/opt/langtools/bin:/opt/fortran/bin:/opt/fortran90/bin:/opt/fortran90/contrib/bin:/opt/perf/bin:/opt/imake/bin:/opt/hpnp//bin:.:/usr/local/bin:/usr/local/dx/bin:/usr/local/gnu/bin:/usr/local/graphics/bin PERL_BADLANG (unset) SHELL=/usr/bin/sh ```

[p5pRT]

From @smpeters

[L-marks@​northwestern.edu - Fri Jul 18 04​:37​:39 2003]​:

This is a bug report for perl from L-marks@​northwestern.edu\, generated with the help of perlbug 1.34 running under perl v5.8.0.

----------------------------------------------------------------- During compilation of (I think) the string tables in 5.8.0\, there are printout's to the terminal of general form​:

"69627 bytes in string tables 69883 bytes (49.9%) saved spotting duplicates"

I think this should be 50.1% saved\, not 49.9% i.e. the code writes A/(A+B) but should use B/(A+B)

Looking at a recent compile of Encode\, it appears to have been fixed.

Reading cp936 (cp936) Writing compiled form 120296 bytes in string tables 138 bytes (0.115%) saved spotting duplicates /usr/bin/perl.exe ../bin/enc2xs -"Q" -o ir_04_t.c -f ir_04_t.fnm Reading iso-ir-165 (iso-ir-165) Writing compiled form 38113 bytes in string tables 2548 bytes (6.27%) saved spotting duplicates

[p5pRT]

The RT System itself - Status changed from 'new' to 'open'

[p5pRT]

@smpeters - Status changed from 'open' to 'resolved'