Адрес инструкции

[Cheb]

Если ты используешь goto - значит ты выбрал неправильный алгоритм. А возможно - изначально неправильную структуру данных.

[runewalsh]

http://bugs.freepascal.org/view.php?id=31536 fixed, е-еее.

[serbod]

Что теперь показывает бенчмарк?

[runewalsh]

Сейчас попробую.

Добавлено спустя 2 часа 13 минут 43 секунды:

Код: Выделить всё

Benchmarking Classify_Tree... 16.5 s (18.7 mcs/it), vow. 177, lat. 306.
Benchmarking Classify_Case... 17.6 s (20.0 mcs/it), vow. 177, lat. 306.
Classify_Tree was faster by 7% (1.1x).

Всё ещё чуть медленнее (т. к. для Classify_Tree я вручную расписал, чтобы для подпоследовательностей формировались маленькие таблицы, а новый case, по-видимому, работает строго деревом), но уже недостаточно, чтобы плеваться.