Adding pascal (using freepascal) implementation