blob: 502209f3392d04dae95d129a7d3f6c6f71bf8a25 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
|
unit fat;
{$mode objfpc}
{$apptype arm9}
{$define arm9}
{$J+}
{$INLINE ON}
{$MACRO ON}
{$PACKRECORDS C}
interface
uses
ctypes, nds9;
{$linklib nds9}
{$linklib libfat.a}
{$linklib c}
{$linklib gcc}
{$linklib sysbase}
{$define NDS_INTERFACE}
{$include fat.inc}
{$undef NDS_INTERFACE}
implementation
{$define NDS_IMPLEMENTATION}
{$include fat.inc}
{$undef NDS_IMPLEMENTATION}
end.
|