home *** CD-ROM | disk | FTP | other *** search
- .model large,pascal
-
- include ems.inc
-
- .code EMS_TEXT
-
- ;ERR PUBLIC __ErrEmsSetHandleName(HEMS hems, char (*pName)[8]);
-
- public __ErrEmsSetHandleName
- __ErrEmsSetHandleName proc uses ds si,\
- hems:word, \
- pName:ptr byte
-
- mov dx,[hems]
- lds si,[pName]
- assume ds:nothing
- EmsCall 5301h
- ret
-
- __ErrEmsSetHandleName endp
-
- end