home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD2.mdf / c / library / mslang / vm / src / ems / ems4e03.asm < prev    next >
Encoding:
Assembly Source File  |  1993-12-13  |  542 b   |  33 lines
  1.     .model    large,pascal
  2.  
  3.     include ems.inc
  4.  
  5.     .code    EMS_TEXT
  6.  
  7.     ;ERR PUBLIC __ErrEmsGetSizeOfPageMap(PBYTE pcbPageMap);
  8.  
  9.     public    __ErrEmsGetSizeOfPageMap
  10. __ErrEmsGetSizeOfPageMap    proc    \
  11.     pcbPageMap:ptr byte
  12.  
  13.     mov    ax,4E03h
  14.     int    67h
  15.  
  16.     ;AL = size of page map array
  17.  
  18.     les    bx,[pcbPageMap]
  19.     mov    es:[bx],al
  20.  
  21.     xchg    al,ah            ;AL = Error code
  22.     cbw                ;AH = 00 or FF
  23.     or    ax,ax            ;Any error
  24.     jz    Exit            ;Brif not, return errNoError = 0
  25.     add    ax,errEmsBase-0FF80h    ;Map to ERR value
  26.  
  27. Exit:
  28.     ret
  29.  
  30. __ErrEmsGetSizeOfPageMap    endp
  31.  
  32.     end
  33.