[Openmcl-devel] should (concatenate (type-of "HTML") "HTML" "-DIRECTORY") work?
greg at clozure.com
Tue Dec 21 15:23:20 UTC 2010
On 21 Dec 2010, at 16:12, Stas Boukarev wrote:
> Karsten Poeck <karsten.poeck at gmail.com> writes:
>> the following fails in clozure recent sources,
>> ? (let ((data-type-string (string :html)))
>> (concatenate (type-of data-type-string) data-type-string "-DIRECTORY"))
> (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.
Replace TYPE-OF with CLASS-OF to get something a bit less restrictive.
More information about the Openmcl-devel