fpcsrc/packages/libndsfpc/src/nds/arm9/linkedlist.inc


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

{$ifdef NDS_INTERFACE}

type
  PLinkedList = ^LinkedList;
  PPLinkedList = ^PLinkedList;
  LinkedList = record
    next: PLinkedList;
    prev: PLinkedList;
    data: pointer;
  end;
  TLinkedList = LinkedList;

function linkedlistAdd(front: PLinkedList; data: pointer): PLinkedList; cdecl; external;
procedure linkedlistRemove(node: PLinkedList); cdecl; external;

{$endif NDS_INTERFACE}