Hi, there

I found a bug.
mkcl returns:
(print (coerce "string" 'list)) ; => (#\g #\n #\i #\r #\t #\s)
but CLHS http://clhs.lisp.se/Body/f_coerce.htm specifies `coerce` to return the same sequence as origin.

Because I couldn't find CONTRIBUTING file, I've attached my patch.

Bests
--
the Univ. of Tokyo math dept.
Sunrim KIM/金 舜琳 (きん すんりん)
Mail: 3han5chou7@gmail.com