V19 does char request wrong

[Denis M. Wilson]

The bug report is a text attachment
Denis M. Wilson

GROFF VERSION: 1.19.3 (Jun 25 17:58 2008 groff-1.19.2-current.diff.gz)

MACHINE: Dell inspiron 9400 laptop

OS: Ubuntu Linux v8

COMPILER: g++ (GCC) 4.2.3 (Ubuntu 4.2.3-2ubuntu7)

INPUT FILES:
#!/bin/sh
# This is a shell archive (produced by GNU sharutils 4.6.3).
# To extract the files from this archive, save it to some FILE, remove
# everything before the `#!/bin/sh' line above, then type `sh FILE'.
#
lock_dir=_sh01832
# Made on 2008-07-26 14:08 BST by <address@hidden>.
# Source directory was `/home/dmw/TEXT/TROFF/GROFF/GROFF-BUGS'.
#
# Existing files will *not* be overwritten, unless `-c' is specified.
#
# This shar contains:
# length mode       name
# ------ ---------- ------------------------------------------
#    113 -rw-r--r-- char.n
#
MD5SUM=${MD5SUM-md5sum}
f=`${MD5SUM} --version | egrep '^md5sum .*(core|text)utils'`
test -n "${f}" && md5check=true || md5check=false
${md5check} || \
  echo 'Note: not verifying md5sums.  Consider installing GNU coreutils.'
save_IFS="${IFS}"
IFS="${IFS}:"
gettext_dir=FAILED
locale_dir=FAILED
first_param="$1"
for dir in $PATH
do
  if test "$gettext_dir" = FAILED && test -f $dir/gettext \
     && ($dir/gettext --version >/dev/null 2>&1)
  then
    case `$dir/gettext --version 2>&1 | sed 1q` in
      *GNU*) gettext_dir=$dir ;;
    esac
  fi
  if test "$locale_dir" = FAILED && test -f $dir/shar \
     && ($dir/shar --print-text-domain-dir >/dev/null 2>&1)
  then
    locale_dir=`$dir/shar --print-text-domain-dir`
  fi
done
IFS="$save_IFS"
if test "$locale_dir" = FAILED || test "$gettext_dir" = FAILED
then
  echo=echo
else
  TEXTDOMAINDIR=$locale_dir
  export TEXTDOMAINDIR
  TEXTDOMAIN=sharutils
  export TEXTDOMAIN
  echo="$gettext_dir/gettext -s"
fi
if (echo "testing\c"; echo 1,2,3) | grep c >/dev/null
then if (echo -n test; echo 1,2,3) | grep n >/dev/null
     then shar_n= shar_c='
'
     else shar_n=-n shar_c= ; fi
else shar_n= shar_c='\c' ; fi
f=shar-touch.$$
st1=200112312359.59
st2=123123592001.59
st2tr=123123592001.5 # old SysV 14-char limit
st3=1231235901

if touch -am -t ${st1} ${f} >/dev/null 2>&1 && \
   test ! -f ${st1} && test -f ${f}; then
  shar_touch='touch -am -t $1$2$3$4$5$6.$7 "$8"'

elif touch -am ${st2} ${f} >/dev/null 2>&1 && \
   test ! -f ${st2} && test ! -f ${st2tr} && test -f ${f}; then
  shar_touch='touch -am $3$4$5$6$1$2.$7 "$8"'

elif touch -am ${st3} ${f} >/dev/null 2>&1 && \
   test ! -f ${st3} && test -f ${f}; then
  shar_touch='touch -am $3$4$5$6$2 "$8"'

else
  shar_touch=:
  echo
  ${echo} 'WARNING: not restoring timestamps.  Consider getting and'
  ${echo} 'installing GNU `touch'\'', distributed in GNU coreutils...'
  echo
fi
rm -f ${st1} ${st2} ${st2tr} ${st3} ${f}
#
if test ! -d ${lock_dir}
then : ; else ${echo} 'lock directory '${lock_dir}' exists'
  exit 1
fi
if mkdir ${lock_dir}
then ${echo} 'x - created lock directory `'${lock_dir}\''.'
else ${echo} 'x - failed to create lock directory `'${lock_dir}\''.'
  exit 1
fi
# ============= char.n ==============
if test -f 'char.n' && test "$first_param" != -c; then
  ${echo} 'x -SKIPPING char.n (file already exists)'
else
${echo} 'x - extracting char.n (gzipped)'
  sed 's/^X//' << 'SHAR_EOF' | uudecode &&
begin 600 _sh01832/gzi
M'XL(`#$9BT@"`],K+E#0,\WDTBLH5C`VX](K`U%:AD;address@hidden<>address@hidden>
MJ3DY^5P."N7Y13DIBEQZ0"V&4,F#"L&E>7F57`<57!(KBU&D8J(/QBH$)68"
39<%,O\STC))address@hidden:<0```,F#
`
end
SHAR_EOF
  ${echo} 'x -gunzipping file char.n' &&
  gzip -d < ${lock_dir}/gzi > 'char.n' &&
  (set 20 08 07 26 13 31 45 'char.n'; eval "$shar_touch") &&
  chmod 0644 'char.n'
if test $? -ne 0
then ${echo} 'restore of char.n failed'
fi
  if ${md5check}
  then (
       ${MD5SUM} -c >/dev/null 2>&1 || ${echo} 'char.n: MD5 check failed'
       ) << SHAR_EOF
a9080094434f207bc285a4f3c9741efa  char.n
SHAR_EOF
  else
test `LC_ALL=C wc -c < 'char.n'` -ne 113 && \
  ${echo} 'restoration warning:  size of char.n is not 113'
  fi
fi
if rm -fr ${lock_dir}
then ${echo} 'x - removed lock directory `'${lock_dir}\''.'
else ${echo} 'x - failed to remove lock directory `'${lock_dir}\''.'
  exit 1
fi
exit 0

COMMAND LINE: groff char.n > x.ps
        (same effect with -Tlatin1 or -Tdvi)

DESCRIPTION OF INCORRECT BEHAVIOUR:
        `.char X ...' does not work when X is a latin1 character > 0xA1.
        It is printed as X. `.char \[X] ...' does work.

SUGGESTED FIX: Sorry!