home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Source Code 1993 July / THE_SOURCE_CODE_CD_ROM.iso / gnu / gccdist / gcc-src / vms / gcclib / alloca.mar next >
Encoding:
Text File  |  1991-02-27  |  248 b   |  15 lines
  1.     .TITLE    ALLOCA    Allocate dynamic storage on stack/free on return
  2.     .IDENT    /1.00/
  3.  
  4.     .PSECT    $CODE,LONG,PIC,REL,SHR,EXE,RD,NOWRT
  5.     .ENTRY    ALLOCA,^M<>
  6.     SUBL2    4(AP),SP
  7.     MOVL    16(FP),R1
  8.     MOVQ    8(FP),AP
  9.     BICL2    #3,SP
  10.     ADDL2    #28,SP
  11.     MOVL    SP,R0
  12.     JMP     (R1)
  13.  
  14.     .END
  15.