Байтодрочерство common lisp

Байтодрочерство

Ты не тот язык выбрал для этого.

Вопрос не в том, как сделать быстрее на каком-то определённом языке. Вопрос в том как сделать быстрее именно на этом языке. Т.е. выжать максимум.

сгенерировать горячие места кода в с, передать пайпом в gcc, общаться с скомпиленым бинарём через ipc

Интересно именно все хинты компилятору дать. Задача практической ценности не имеет. На практие ваш подход, конечно, логичен и правилен. В данном случае чисто задача для обучения хинтам компилятора.

Смотри, как это в shootout в тесте mandelbrot сделано.

mod неустраним, если ты именно хочешь делать mod от двух вещественных чисел. SBCL намекает, что если взять два int32, то будет быстрее :-)

Преобразование return value можно убрать, дописав в конец other значение nil.

         (mw-pre (random w[0]))
         (sw-pre (mod mw-pre *p3*))
         (mw (coerce mw-pre 'double-float))
         (sw (coerce sw-pre 'double-float)))

(type-of (random 100d0))

Понял?

А вообще это я поспешил. Но я всё равно использовал бы (float x 1d0) - не так глаза режет как лишние переменные и coerce

Ты не понял, лисп не предназначен для этого, он работает по-другому.