home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD2.mdf / c / library / mslang / vm / src / ems / ems5401.asm < prev    next >
Encoding:
Assembly Source File  |  1993-12-13  |  454 b   |  29 lines
  1.     .model    large,pascal
  2.  
  3.     include ems.inc
  4.  
  5.     .code    EMS_TEXT
  6.  
  7.     ;ERR PUBLIC __ErrEmsSearchForNamedHandle(PHEMS phems, char (*pName)[8]);
  8.  
  9.     public    __ErrEmsSearchForNamedHandle
  10. __ErrEmsSearchForNamedHandle    proc    uses ds si,\
  11.     phems:ptr word,            \
  12.     pName:ptr byte
  13.  
  14.     lds    si,[pName]
  15.     EmsCall 5401h
  16.     jnz    Exit            ;Brif error
  17.  
  18.     ;DX = value of named handle
  19.  
  20.     les    bx,[phems]
  21.     mov    es:[bx],dx
  22.  
  23. Exit:
  24.     ret
  25.  
  26. __ErrEmsSearchForNamedHandle    endp
  27.  
  28.     end
  29.