Subversion Repositories Kolibri OS

Rev

Rev 2141 | Rev 2151 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2141 Rev 2143
Line 3... Line 3...
3 
;; Copyright (C) KolibriOS team 2004-2009. All rights reserved. ;;
 3 
;; Copyright (C) KolibriOS team 2004-2009. All rights reserved. ;;
4 
;; Distributed under terms of the GNU General Public License    ;;
 4 
;; Distributed under terms of the GNU General Public License    ;;
5 
;;                                                              ;;
 5 
;;                                                              ;;
6 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 6 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Line 7... Line 7...
7 
 
 7 
 
Line 8... Line -...
8 
$Revision: 2141 $
 - 
 
9 
 
 - 
 
10 
macro __list_add new, prev, next
 - 
 
11 
{
 - 
 
12 
    mov [next+LHEAD.prev], new
 - 
 
13 
    mov [new+LHEAD.next], next
 - 
 
14 
    mov [new+LHEAD.prev], prev
 - 
 
15 
    mov [prev+LHEAD.next], new
 - 
 
16 
}
 - 
 
17 
 
 - 
 
18 
macro list_add new, head
 - 
 
19 
{
 - 
 
20 
    mov eax, [head+LHEAD.next]
 - 
 
21 
    __list_add new, head, eax
 - 
 
22 
}
 - 
 
23 
 
 - 
 
24 
macro list_add_tail new, head
 - 
 
25 
{
 - 
 
26 
    mov eax, [head+LHEAD.prev]
 - 
 
27 
    __list_add new, eax, head
 - 
 
28 
}
 - 
 
29 
 
 - 
 
30 
macro list_del entry
 - 
 
31 
{
 - 
 
32 
    mov edx, [entry+list_fd]
 - 
 
33 
    mov ecx, [entry+list_bk]
 - 
 
34 
    mov [edx+list_bk], ecx
 - 
 
Line 35... Line 8...
35 
    mov [ecx+list_fd], edx
 8 
$Revision: 2143 $
36 
}
 9 
 
37 
 
 10 
 
38 
struc MEM_BLOCK
 11 
struc MEM_BLOCK