home *** CD-ROM | disk | FTP | other *** search
/ BURKS 2 / BURKS_AUG97.ISO / BURKS / SOFTWARE / LIBS / PMC101.ZIP / LIBSRC.ZIP / MBFREE.ASM (.txt) < prev    next >
Assembly Source File  |  1994-06-26  |  550b  |  37 lines
  1. .386p
  2. locals
  3.  
  4. public  MB_FREE
  5.  
  6. _TEXT           segment byte public use32 'CODE'
  7. assume  cs:_TEXT
  8.  
  9. MB_FREE:
  10.         push esi edi
  11.  
  12.         mov eax,[esp+4+8]
  13.         mov di,[eax+8]
  14.         mov si,[eax+10]
  15.         mov ax,502h
  16.         int 31h
  17.         jc short @@00
  18.  
  19.         mov ecx,[esp+4+8]
  20.         xor eax,eax
  21.         mov [ecx+4],eax
  22.         jmp short @@01
  23.  
  24. @@00:
  25.         movsx eax,ax
  26.         cmp ah,80h
  27.         je short @@01
  28.         mov eax,-32768
  29.  
  30. @@01:
  31.         pop edi esi
  32.         ret 4
  33.  
  34. _TEXT           ends
  35. end
  36.  
  37.