Итак, имеется подопытный парсер математических выражений. Хочу его приделать к Delphi. В Builder'е это у меня получилось, но ценой подключения родных исходников (подключение через lib не осилил).
Взять можно тут:
Fast Mathematical Expressions Parser
В приложенном архиве находится dll парсера следующей внутренней версии: Version 2.2.3 (20121222; SF; 32BIT; RELEASE; ASCII) (DLL)
Я начал с нуля создавать обёртку для работы с dll. В принципе, простые вещи работают, т.е. можно задать выражение и его посчитать, но вот в комплексе, если я хочу задать несколько констант или переменных или делаю в ряд несколько операций, вызывая функции из библиотеки, вылетают ошибки и ничего не работает.
Начну с простого вопроса. В архиве я всё закомментил, чтобы работало и было видно, что результат выражения считается. При запуске создаётся также лог файл muParserTest.log, в котором можно посмотреть сопутствующую информацию.
Так вот, когда я включаю функцию Intro(), то почему-то после её выполнения теряется handle парсера, т.е. переменная hParser изменяет своё значение. Отладка в RS2007 выявила изменение регистра EBX, в котором сохраняется эта переменная. В коде подразумевается, что этот регистр не меняется внутри функции, но по факту он изменяется, что приводит к ошибке при вызове остальных функций.
muParserDLL.h - это сишная обёртка, которая идёт в комплекте. Я с неё списывал, как нетрудно будет заметить.
В общем, нужен спец, который шарит в теме на уровне соглашений вызова и работы с сишными библиотеками. Кое-что у меня работает, а кое-что нет. Вызов некоторых паскалевских функций из библиотеки работает, а вот обработку ошибок я не смог реализовать, функция не вызывается. Надо подправить мой черновой набросок и осчастливить народ хорошим парсером.
Этот парсер действительно быстрый. После первого вычисления он переводит выражение во внутренний код и при последующих вычислениях работает уже с ним, что значительно ускоряет интерпретацию.