implementation of Firebird Butler specification(s) in Free Pascal / Delphi - View it on GitHub