changes to FreePascal
changes for Lazarus