home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c220 / 4.ddi / ETC / ALLOCA.ASM next >
Encoding:
Assembly Source File  |  1990-12-16  |  649 b   |  27 lines
  1.     include    model
  2.     cseg    alloca_
  3. ;
  4. ;  MetaWare Runtime Support: alloca.
  5. ;  (c) Copyright 1989 MetaWare, Incorporated    
  6. ;  Entry:
  7. ;    size to alloc
  8. ;    return address    <- SP
  9. ;  Exit:
  10. ;    alloc-ed space
  11. ;    4 bytes of junk
  12. ;  since C will pop the 4 bytes of junk.    
  13. ; 
  14.     public    alloca
  15. alloca  proc    near
  16.     mov    edx,0[esp]    ; Get return address
  17.     mov    eax,4[esp]    ; Amount to alloc.
  18.     add     eax,3h          ; Align to 4-byte boundary
  19.     and     al,0fch
  20.     ; We don't do stack-limit checking, so
  21.     sub     esp,eax         ; make sure you have the stack space available!
  22.     mov    eax,esp
  23.     add    eax,4        ; 
  24.     jmp    edx        ; return
  25. alloca  endp
  26.     endcseg    alloca_
  27.     end