FreePascal

FreePascal is an open source pascal compiler written in pascal.

More info at http://www.freepascal.org...