Скомпилировать небольшую библиотечку

[_Track]

Господа!

Не могли бы вы скомпилировать на Freepascal (Kylix?) под Linux нежеследующий код и оформить его в виде динамической библиотеки (.so)?
Нужно это для того, чтобы обеспечить работу данного продукта http://www.fb2-library.redholl.com/ на СУБД FireBird под Linux.

Сам я не программер, и похоже единственный заинтересованный в хранении базы данной программы на FireBird под Linux.
А разработчик с Freepascal (Kylix) и Linux не работает и не имеет соответственно возможности сделать такую библиотечку.

Вот собственно и вся просьба.

Вот такой файлик fb2lib.pas:
-- cut --


library fb2lib;
uses
SysUtils, Classes;
{$R *.res}
function UpperCase(InString:PChar):PChar;cdecl;export;
begin
Result:=PChar(AnsiUpperCase(string(InString)));
end;
function substr(InString:PChar;StartPos,Len:Integer):PChar;cdecl;export;
begin
Result:=PChar(Copy(string(InString),StartPos,1));
end;
exports UpperCase,substr;
begin
end.

-- cut --

Спасибо.

[Attid]

не надо ничего компилить надо учить что умеет сервер

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

select upper(substring(e.fname from 1 for 2)) from employee e

выполняется на огнептице 2,0 под линуксом без всяких дополнний

[_Track]

Спасибо!
А на более старых версиях Firebird этот код будет работать?

[Attid]

читай Firebird_v*.ReleaseNotes.pdf узнаешь
на 1,5,3 вроде должен но не гарантирую, под рукой нет чтоб проверить