Lispworks: return thread return values from JOIN-THREAD