LispWorks constructs strings of a suitable type where sufficient information is available. Failing that, strings are constructed of type according to the value of lw:*default-character-element-type* .
lw:*default-character-element-type*