home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD2.mdf / c / library / mslang / vm / src / ems / ems5602.asm < prev    next >
Encoding:
Assembly Source File  |  1993-12-13  |  423 b   |  28 lines
  1.     .model    large,pascal
  2.  
  3.     include ems.inc
  4.  
  5.     .code    EMS_TEXT
  6.  
  7.     ;ERR PUBLIC __ErrEmsGetPageStackSpaceSize(_segment _far *pseg);
  8.  
  9.     public    __ErrEmsGetPageStackSpaceSize
  10. __ErrEmsGetPageStackSpaceSize    proc    \
  11.     pcbStack:ptr word
  12.  
  13.     EmsCall 5602h
  14.     jnz    Exit            ;Brif error
  15.  
  16.     ;BX = stack space required (bytes)
  17.  
  18.     mov    cx,bx
  19.     les    bx,[pcbStack]
  20.     mov    es:[bx],cx
  21.  
  22. Exit:
  23.     ret
  24.  
  25. __ErrEmsGetPageStackSpaceSize    endp
  26.  
  27.     end
  28.