summaryrefslogtreecommitdiff
path: root/rtl/sinclairql/classes.pp
diff options
context:
space:
mode:
Diffstat (limited to 'rtl/sinclairql/classes.pp')
-rw-r--r--rtl/sinclairql/classes.pp50
1 files changed, 50 insertions, 0 deletions
diff --git a/rtl/sinclairql/classes.pp b/rtl/sinclairql/classes.pp
new file mode 100644
index 0000000000..ca7f60f810
--- /dev/null
+++ b/rtl/sinclairql/classes.pp
@@ -0,0 +1,50 @@
+{
+ This file is part of the Free Component Library (FCL)
+ Copyright (c) 2021 by the Free Pascal development team
+
+ Classes unit for the Sinclair QL
+
+ See the file COPYING.FPC, included in this distribution,
+ for details about the copyright.
+
+ This program is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+ **********************************************************************}
+
+{$mode objfpc}
+
+{ determine the type of the resource/form file }
+{$define Win16Res}
+
+unit Classes;
+
+interface
+
+uses
+ sysutils,
+ rtlconsts,
+ types,
+ sortbase,
+{$ifdef FPC_TESTGENERICS}
+ fgl,
+{$endif}
+ typinfo;
+
+{$i classesh.inc}
+
+
+implementation
+
+{ OS - independent class implementations are in /inc directory. }
+{$i classes.inc}
+
+
+initialization
+ CommonInit;
+
+finalization
+ CommonCleanup;
+
+end.