home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD2.mdf / c / library / mslang / vm / src / xms / xms07.asm < prev    next >
Encoding:
Assembly Source File  |  1993-12-13  |  337 b   |  27 lines
  1.     .model    large,pascal
  2.  
  3.     include xms.inc
  4.  
  5.     .code    XMS_TEXT
  6.  
  7.     ;ERR PUBLIC __ErrXmsQueryA20(PBOOL pfA20Enabled);
  8.  
  9.     public    __ErrXmsQueryA20
  10. __ErrXmsQueryA20    proc    \
  11.     pfA20Enabled:ptr word
  12.  
  13.     XmsCall 07h
  14.     jc    Exit        ;Brif error
  15.  
  16.     les    bx,[pfA20Enabled]
  17.     mov    es:[bx],ax
  18.  
  19.     xor    ax,ax
  20.  
  21. Exit:
  22.     ret
  23.  
  24. __ErrXmsQueryA20    endp
  25.  
  26.     end
  27.