Subversion Repositories Kolibri OS

Rev

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

Rev 291 Rev 345
Line 1001... Line 1001...
1001 
           mov ecx,[CURRENT_TASK]
 1001 
           mov ecx,[CURRENT_TASK]
1002 
           shl ecx,8
 1002 
           shl ecx,8
1003 
           add ecx, PROC_BASE+APP_OBJ_OFFSET
 1003 
           add ecx, PROC_BASE+APP_OBJ_OFFSET
Line -... Line 1004...
- 
 
 1004 
 
- 
 
 1005 
           pushfd
1004 
 
 1006 
           cli
1005 
           mov edx, [ecx+APPOBJ.fd]
 1007 
           mov edx, [ecx+APPOBJ.fd]
1006 
           mov [eax+APPOBJ.fd], edx
 1008 
           mov [eax+APPOBJ.fd], edx
1007 
           mov [eax+APPOBJ.bk], ecx
 1009 
           mov [eax+APPOBJ.bk], ecx
Line 1008... Line 1010...
1008 
           mov [eax+APPOBJ.pid], ebx
 1010 
           mov [eax+APPOBJ.pid], ebx
1009 
 
 1011 
 
- 
 
 1012 
           mov [ecx+APPOBJ.fd], eax
1010 
           mov [ecx+APPOBJ.fd], eax
 1013 
           mov [edx+APPOBJ.bk], eax
1011 
           mov [edx+APPOBJ.bk], eax
 1014 
           popfd
Line 1012... Line 1015...
1012 
.fail:
 1015 
.fail:
1013 
           ret
 1016 
           ret
Line 1014... Line 1017...
1014 
 
 1017 
 
1015 
; param
 1018 
; param
Line -... Line 1019...
- 
 
 1019 
;  eax= object
- 
 
 1020 
 
1016 
;  eax= object
 1021 
align 4
1017 
 
 1022 
destroy_kernel_object:
1018 
align 4
 1023 
 
1019 
destroy_kernel_object:
 1024 
           pushfd
- 
 
 1025 
           cli
Line 1020... Line 1026...
1020 
 
 1026 
           mov ebx, [eax+APPOBJ.fd]
1021 
           mov ebx, [eax+APPOBJ.fd]
 1027 
           mov ecx, [eax+APPOBJ.bk]
1022 
           mov ecx, [eax+APPOBJ.bk]
 1028 
           mov [ebx+APPOBJ.bk], ecx
1023 
           mov [ebx+APPOBJ.bk], ecx
 1029 
           mov [ecx+APPOBJ.fd], ebx