|
@@ -0,0 +1,48 @@
|
|
|
+{
|
|
|
+ This file is part of the Free Component Library (FCL)
|
|
|
+ Copyright (c) 1999-2000 by Michael Van Canneyt and Florian Klaempfl
|
|
|
+
|
|
|
+ Classes unit for The WebAssembly System Interface (WASI)
|
|
|
+
|
|
|
+ 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
|
|
|
+ typinfo,
|
|
|
+ rtlconsts,
|
|
|
+ types,
|
|
|
+ sortbase,
|
|
|
+{$ifdef FPC_TESTGENERICS}
|
|
|
+ fgl,
|
|
|
+{$endif}
|
|
|
+ sysutils;
|
|
|
+
|
|
|
+{$i classesh.inc}
|
|
|
+
|
|
|
+implementation
|
|
|
+
|
|
|
+{ OS - independent class implementations are in /inc directory. }
|
|
|
+{$i classes.inc}
|
|
|
+
|
|
|
+initialization
|
|
|
+ CommonInit;
|
|
|
+
|
|
|
+finalization
|
|
|
+ CommonCleanup;
|
|
|
+
|
|
|
+end.
|