blob: 923a6dfa4a2f8a07a2d3e32cdb0d52817ac0e940 (
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
|
unit gbfs;
{$error gbfs is no longer supported on nds}
{$mode objfpc}
{$apptype arm9}
{$define arm9}
{$J+}
{$INLINE ON}
{$MACRO ON}
{$PACKRECORDS C}
interface
uses
ctypes, nds9;
{$linklib nds9}
{$linklib fat}
{$linklib c}
{$linklib gcc}
{$linklib sysbase}
{$define NDS_INTERFACE}
{$include gbfs.inc}
{$undef NDS_INTERFACE}
implementation
{$define NDS_IMPLEMENTATION}
{$include gbfs.inc}
{$undef NDS_IMPLEMENTATION}
end.
|
