home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / pascal / turbo55 / tdinstal / taexmpl2.arc / OFILFREE.ASM < prev    next >
Assembly Source File  |  1989-05-02  |  1KB  |  45 lines
  1.  
  2. ;    FILENAME: OFILFREE.ASM
  3. ;    Copyright (c) 1988, 1989 by Borland International, Inc.
  4. ;
  5. ;    Description: This module implements the routine FileFree. FileFree
  6. ;    deallocates a read/write buffer.
  7. ;
  8. ;    This module uses MASM mode syntax and standard segment directives. 
  9. ; 
  10. ;    ASSEMBLY INSTRUCTIONS: To assemble this module use the following 
  11. ;    TASM command line. 
  12. ; 
  13. ;        TASM ofilfree
  14.  
  15. include globals.inc
  16.  
  17. _TEXT   segment
  18.  
  19.     FileFree proc
  20.  
  21.     ;    Input 
  22.     ;        bx - file record offset
  23.     ;        [bx+2] - buffer size
  24.     ;    Output (of INT 21h, Function 49h)
  25.     ;        cf - set if error occurred
  26.     ;        ax - error code
  27.     ;            7 - if memory control blocks destroyed
  28.     ;            9 - if incorrect segment in ES
  29.     ;    Registers modified 
  30.     ;        ax
  31.  
  32.     push    ax
  33.     push    es
  34.     mov     es, [bx+6]      ;segment
  35.     mov     ah, 49h         ;function
  36.     int     21h             ;execute
  37.     pop     es
  38.     pop     ax
  39.     ret
  40.     FileFree endp
  41.  
  42. _TEXT    ends
  43.  
  44. end
  45.