Subversion Repositories Kolibri OS

Rev

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

Rev 627 Rev 629
Line 607... Line 607...
607
    @@: mov	edx,[mptr]
607
    @@: mov	edx,[mptr]
608
	or	edx,edx
608
	or	edx,edx
609
	jz	@f
609
	jz	@f
610
	add	edx,-4
610
	add	edx,-4
611
    @@: mcall	68,20
611
    @@: mcall	68,20
-
 
612
    	or	eax,eax
-
 
613
    	jz	@f
612
	add	ecx,-4
614
	add	ecx,-4
613
	mov	[eax],ecx
615
	mov	[eax],ecx
614
	add	eax,4
616
	add	eax,4
615
	pop	edx ecx ebx
617
    @@: pop	edx ecx ebx
616
	ret
618
	ret
617
endp
619
endp
Line 618... Line 620...
618
 
620
 
619
;-----------------------------------------------------------------------------
621
;-----------------------------------------------------------------------------