equal
deleted
inserted
replaced
15 * along with this program; if not, write to the Free Software |
15 * along with this program; if not, write to the Free Software |
16 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA |
16 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA |
17 *) |
17 *) |
18 |
18 |
19 {$IFDEF FPC} |
19 {$IFDEF FPC} |
20 {$WRITEABLECONST ON} |
20 {$WRITEABLECONST OFF} |
21 {$MODE OBJFPC} |
21 {$MODE OBJFPC} |
22 {$ELSE} |
22 {$ELSE} |
23 {$ERROR Only Free Pascal supported!} |
23 {$ERROR Only Free Pascal supported!} |
24 {$ENDIF} |
24 {$ENDIF} |
25 |
25 |