Lisp reader bug

[Kenichi Handa]

Emacs of CVS HEAD has a bug in Lisp reader.  For instance,

(read (format "'%c" (decode-char 'ucs #x102)))
=> (quote )

I'm not sure, but perhaps this change is the cause.

2003-02-18  Kim F. Storm  <address@hidden>

        * lread.c (read1): Fix last change.
        "`" is not always special.  Allow "?" after a character constant.

This change adds codes something like this (total 4 places):

          || index ("\"';([#?", next_next_char)

but, it seems that `index' doesn't work well if the second
arg is greater than 0xFF.  Actually, if I change such lines
to:

          || (next_next_char < 0x100 && index ("\"';([#?", next_next_char))

the bug disappears.

Kim, could you take a look at this problem?

---
Ken'ichi HANDA
address@hidden