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