home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD2.mdf / c / library / mslang / vm / inc / ems.inc next >
Encoding:
Text File  |  1993-12-15  |  432 b   |  24 lines
  1. ;***
  2. ;ems.inc - EMS header
  3. ;
  4. ;       Copyright (c) 1989-1992, Microsoft Corporation.  All rights reserved.
  5. ;
  6. ;*******************************************************************************
  7.  
  8.     .code   EMS_TEXT
  9.  
  10. __ErrEmsCall    proto   near pascal
  11.  
  12. @CurSeg ends
  13.  
  14. EmsCall macro   func
  15. if      (func) GE 100h
  16.     mov     ax,func
  17. else
  18.     mov     ah,func
  19. endif
  20.     call    __ErrEmsCall
  21.     endm
  22.  
  23. errEmsBase      equ     3000h
  24.