[Openmcl-devel] should (concatenate (type-of "HTML") "HTML" "-DIRECTORY") work?

[Stas Boukarev]

Karsten Poeck <karsten.poeck at gmail.com> writes:

> Hello,
>
> the following fails in clozure recent sources,
>
> ? (let ((data-type-string (string :html)))
>       (concatenate (type-of data-type-string) data-type-string "-DIRECTORY"))
>> Error: The type specifier (SIMPLE-ARRAY BASE-CHAR (4)) is not 
> determinably a subtype of the type (VECTOR CHARACTER 14)
>> While executing: MAKE-SEQUENCE, in process Listener(3).
>> Type cmd-. to abort, cmd-\ for a list of available restarts.
>> Type :? for other options.
> 1 > (lisp-implementation-version)
> "Version 1.6-r14489M  (DarwinX8664)"
>
> Is this an incorrect assumption in the code or an error in clozure.
>
> This causes current cl-http to fail while compiling in clozure 1.6.
(type-of "HTML") => (SIMPLE-BASE-STRING 4), a string of length 4, but
the result of your concatenation will be a string of length 14.

-- 
With Best Regards, Stas.