Тестируем скорость Би

[vak]

Компилятор Би для БЭСМ-6 функционально закончен. То есть все фичи, в нём имеющиеся, вроде работают. Некоторые привычные для нас вещи отсутствуют: инкремент-декремент, сдвиги, операторы типа плюс-присвоить. Нет цикла for и оператора switch. Не поместились они у Кена Томпсона в 16 килобайт памяти PDP-7.

Сгенерённый компилятором код получается неэффективный, но для нас сейчас главное, что он функционально правильный. А насколько он неэффективный - давайте померяем. Возьмём для теста известный алгоритм вычисления e-2 по формуле 1/2! + 1/3! и так далее. Вот реализация на Би: e-2.b. Компилируем, запускаем:

$ bbesm < e-2.b > e-2.madlen
$ besmc e-2.madlen libb.obj
$ time ./e-2.exe
71828 18284 59045 23536 02874 71352 66249 77572 47093 69995
...
88683 31483 28027 06553 83300 46932 90115 74414 75631 39997

real	0m18.310s
user	0m18.302s
sys	0m0.008s

Для сравнения я переписал этот код на Паскаль: e-2.dub. Запустим на том же симуляторе:

$ dubna e-2.dub
...
≠
 71828 18284 59045 23536 02874 71352 66249 77572 47093 69995
...
 88683 31483 28027 06553 83300 46932 90115 74414 75631 39997
------------------------------------------------------------
   Elapsed time: 12.3 seconds
      Simulated: 626677681 instructions
Simulation rate: 51010913 instructions/sec

Выходит 18.3 секунды против 12.3 секунды на Паскале. Не так ужасно, всего в полтора раза медленнее. С оптимизацией Би может оказаться даже эффективнее Паскаля.