vecorとstringと

眠いから適当。

(make-array 0 :element-type 'character :fill-pointer 0 :adjustable t)

で可変長のcharacterのベクタを作る。
adjustableの指定で可変になるらしい。
fill-pointerの意味がよくわからん。

(vector-push-extend #\+ vec)

でベクタに要素追加。
文字列に文字を足してる感じ。でも

(vector-push-extend #\+ "aaaa")

こういうのはダメ。

"aaaa" is not an array with a fill pointer.

って怒られる。
連結するなら

(concatenate 'string str (string #\x))

こんな感じの方がいいかも。