home *** CD-ROM | disk | FTP | other *** search
/ Super Net 1 / SUPERNET_1.iso / PC / OTROS / MSDOS / WATTCP / BOOTP.ZIP / CHKSTKS.ASM < prev    next >
Encoding:
Assembly Source File  |  1987-04-16  |  512 b   |  32 lines
  1. include masmdefs.hsm
  2. include model.hsm
  3.  
  4. codedef CHKSTK
  5. datadef
  6.  
  7. cstart  CHKSTK
  8. cproc   _chkstk
  9.  
  10. if FUNC_L
  11.     pop    cx            ; get return offset
  12.     pop    dx            ; get return segment
  13. else
  14.     pop    cx            ; get return offset
  15. endif
  16.  
  17.     mov    bx,sp
  18.     sub    bx,ax            ; new position
  19.     mov    sp,bx            ; set new stack pointer
  20.  
  21. if FUNC_L
  22.     push    dx            ; push segment
  23.     push    cx            ; push offset
  24.     ret                ; far return to dx:cx
  25. else
  26.     jmp    cx            ; return to cx
  27. endif
  28.  
  29. cendp   _chkstk
  30. cend    CHKSTK
  31.         end
  32.