home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / MSJV5-3.ZIP / VLB.ZIP / VLB.COM / SETUP.H < prev    next >
Text File  |  1990-04-20  |  1KB  |  47 lines

  1. ;     setup.h    header file for C utility functions
  2. ;
  3.  
  4. _DATA    SEGMENT  WORD PUBLIC 'DATA'
  5. _DATA    ENDS
  6. CONST    SEGMENT  WORD PUBLIC 'CONST'
  7. CONST    ENDS
  8. _BSS    SEGMENT  WORD PUBLIC 'BSS'
  9. _BSS    ENDS
  10. DGROUP    GROUP    CONST, _BSS, _DATA
  11.     ASSUME  DS: DGROUP, SS: DGROUP
  12.  
  13. ENTRY MACRO   X
  14.             push    ds
  15.             pop     ax
  16.             nop    
  17.             inc     bp
  18.             push    bp
  19.             mov     bp, sp
  20.             push    ds
  21.             mov     ds, ax
  22.             ASSUME      DS:NOTHING
  23.             sub     sp, X
  24.             push    es
  25.             push    si
  26.             push    di
  27.  
  28.         ENDM
  29.  
  30.  
  31. EXIT MACRO      X       ; X should always be even -
  32.                         ;   can't pass a single byte.
  33.                         ; X is used for PASCAL type stack clean-up.
  34.             pop     di
  35.             pop     si
  36.             pop     es
  37.             sub     bp, 2
  38.             mov     sp, bp
  39.             pop     ds
  40.             ASSUME      DS:DGROUP
  41.             pop     bp
  42.             dec     bp
  43.             ret     X
  44.  
  45.         ENDM
  46.