blob: d5a635f77553166b588786b36af6d898b2eab8e1 (
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
33
34
35
36
37
38
39
40
|
unit fat;
{$mode objfpc}
{$apptype arm9}
{$define arm9}
{$J+}
{$INLINE ON}
{$MACRO ON}
{$PACKRECORDS C}
interface
uses
ctypes, nds9;
{$linklib fat}
{$linklib nds9}
{$linklib c}
{$linklib gcc}
{$linklib sysbase}
{$define NDS_INTERFACE}
{ $include fathelper.inc}
{$include ../nds/disc_io.inc}
{$include fat.inc}
{$undef NDS_INTERFACE}
implementation
{$define NDS_IMPLEMENTATION}
{ $include fathelper.inc}
{$include ../nds/disc_io.inc}
{$include fat.inc}
{$undef NDS_IMPLEMENTATION}
initialization
finalization
end.
|
