home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Misc / CLISP-2.LHA / CLISP960530-ki.lha / ffcall / trampoline / proto-alpha.s < prev    next >
Encoding:
Text File  |  1996-04-15  |  716 b   |  54 lines
  1.     .set noreorder
  2.     .set volatile
  3.     .set noat
  4.     .file    1 "proto.c"
  5. gcc2_compiled.:
  6. __gnu_compiled_c:
  7. .rdata
  8.     .align 3
  9. $C32:
  10.     .quad 0xbabebec0
  11. .text
  12.     .align 3
  13.     .globl tramp
  14.     .ent tramp
  15. tramp:
  16.     ldgp $29,0($27)
  17. tramp..ng:
  18.     lda $30,-16($30)
  19.     .frame $30,16,$26,0
  20.     stq $26,0($30)
  21.     .mask 0x4000000,-16
  22.     .prologue 1
  23.     lda $1,$C32
  24.     lda $2,22136
  25.     ldah $2,4660($2)
  26.     ldq $27,0($1)
  27.     lda $1,18193
  28.     ldah $1,29525($1)
  29.     stq $1,0($2)
  30.     jsr $26,($27),0
  31.     ldgp $29,0($26)
  32.     ldq $26,0($30)
  33.     addq $30,16,$30
  34.     ret $31,($26),1
  35.     .end tramp
  36. .rdata
  37.     .align 3
  38. $C33:
  39.     .quad 0xbabebec0
  40. .text
  41.     .align 3
  42.     .globl jump
  43.     .ent jump
  44. jump:
  45.     ldgp $29,0($27)
  46. jump..ng:
  47.     .frame $30,0,$26,0
  48.     .prologue 1
  49.     lda $1,$C33
  50.     ldq $1,0($1)
  51.     jmp $31,($1),0
  52.     .align 4
  53.     .end jump
  54.