home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Misc / CLISP-2.LHA / CLISP960530-ki.lha / ffcall / avcall / avcall-alpha.s < prev    next >
Encoding:
Text File  |  1996-04-15  |  3.3 KB  |  254 lines
  1.     .set noreorder
  2.     .set volatile
  3.     .set noat
  4.     .file    1 "avcall-alpha.c"
  5. gcc2_compiled.:
  6. __gnu_compiled_c:
  7. .text
  8.     .align 3
  9.     .globl __builtin_avcall
  10.     .ent __builtin_avcall
  11. __builtin_avcall:
  12.     ldgp $29,0($27)
  13. __builtin_avcall..ng:
  14.     lda $30,-16($30)
  15.     .frame $30,16,$26,0
  16.     stq $26,0($30)
  17.     stq $9,8($30)
  18.     .mask 0x4000200,-16
  19.     .prologue 1
  20.     bis $16,$16,$9
  21.     ldq $1,40($9)
  22.     lda $30,-2048($30)
  23.     subq $1,48,$1
  24.     subq $1,$9,$1
  25.     srl $1,3,$1
  26.     bis $31,6,$0
  27.     addl $1,$31,$3
  28.     cmplt $0,$3,$1
  29.     bis $30,$30,$4
  30.     beq $1,$35
  31.     .align 5
  32. $37:
  33.     s8addq $0,0,$2
  34.     addq $9,$2,$1
  35.     ldt $f1,48($1)
  36.     addq $2,$4,$2
  37.     addq $0,1,$0
  38.     cmplt $0,$3,$1
  39.     stt $f1,-48($2)
  40.     bne $1,$37
  41. $35:
  42.     ldq $16,48($9)
  43.     ldt $f16,48($9)
  44.     ldq $17,56($9)
  45.     ldt $f17,56($9)
  46.     ldq $18,64($9)
  47.     ldt $f18,64($9)
  48.     ldq $19,72($9)
  49.     ldt $f19,72($9)
  50.     ldq $20,80($9)
  51.     ldt $f20,80($9)
  52.     ldq $21,88($9)
  53.     ldt $f21,88($9)
  54.     ldq $27,0($9)
  55.     jsr $26,($27),0
  56.     ldgp $29,0($26)
  57.     lda $30,2048($30)
  58.     bis $1,$1,$3
  59.     ldl $1,24($9)
  60.     zapnot $1,15,$2
  61.     cmpule $2,14,$1
  62.     beq $1,$39
  63.     lda $1,$79
  64.     s4addq $2,$1,$1
  65.     ldl $1,0($1)
  66.     addq $1,$29,$2
  67.     jmp $31,($2),$74
  68. .rdata
  69.     .align 3
  70.     .align 2
  71. $79:
  72.     .gprel32 $74
  73.     .gprel32 $39
  74.     .gprel32 $71
  75.     .gprel32 $71
  76.     .gprel32 $71
  77.     .gprel32 $72
  78.     .gprel32 $72
  79.     .gprel32 $73
  80.     .gprel32 $73
  81.     .gprel32 $74
  82.     .gprel32 $74
  83.     .gprel32 $51
  84.     .gprel32 $52
  85.     .gprel32 $74
  86.     .gprel32 $54
  87. .text
  88.     .align 4
  89. $51:
  90.     cvtts $f0,$f0
  91.     ldq $1,16($9)
  92.     sts $f0,0($1)
  93.     br $31,$39
  94.     .align 4
  95. $52:
  96.     ldq $1,16($9)
  97.     stt $f0,0($1)
  98.     br $31,$39
  99.     .align 4
  100. $54:
  101.     ldl $2,8($9)
  102.     blbc $2,$55
  103.     ldq $2,32($9)
  104.     subq $2,2,$1
  105.     beq $1,$58
  106.     cmpule $2,2,$1
  107.     beq $1,$67
  108.     subq $2,1,$1
  109.     beq $1,$57
  110.     br $31,$61
  111.     .align 4
  112. $67:
  113.     subq $2,4,$1
  114.     beq $1,$59
  115.     subq $2,8,$1
  116.     beq $1,$60
  117.     br $31,$61
  118.     .align 4
  119. $57:
  120.     ldq $1,16($9)
  121.     ldq_u $2,0($0)
  122.     ldq_u $3,0($1)
  123.     extbl $2,$0,$2
  124.     insbl $2,$1,$2
  125.     mskbl $3,$1,$3
  126.     bis $2,$3,$2
  127.     stq_u $2,0($1)
  128.     br $31,$39
  129.     .align 4
  130. $58:
  131.     ldq $4,16($9)
  132.     bic $0,6,$1
  133.     ldq $2,0($1)
  134.     bic $4,6,$5
  135.     bic $0,1,$1
  136.     ldq $3,0($5)
  137.     extwl $2,$1,$2
  138.     bic $4,1,$4
  139.     inswl $2,$4,$2
  140.     mskwl $3,$4,$3
  141.     bis $3,$2,$3
  142.     stq $3,0($5)
  143.     br $31,$39
  144.     .align 4
  145. $59:
  146.     ldq $2,16($9)
  147.     ldl $1,0($0)
  148.     stl $1,0($2)
  149.     br $31,$39
  150.     .align 4
  151. $60:
  152.     ldq $1,16($9)
  153.     ldt $f1,0($0)
  154.     stt $f1,0($1)
  155.     br $31,$39
  156.     .align 4
  157. $61:
  158.     ldq $24,32($9)
  159.     addq $24,7,$24
  160.     srl $24,3,$24
  161.     subl $24,1,$4
  162.     blt $4,$39
  163.     .align 5
  164. $64:
  165.     s8addq $4,0,$3
  166.     ldq $2,16($9)
  167.     addq $0,$3,$1
  168.     ldt $f1,0($1)
  169.     addq $2,$3,$2
  170.     subl $4,1,$4
  171.     cmplt $4,0,$1
  172.     stt $f1,0($2)
  173.     beq $1,$64
  174.     br $31,$39
  175.     .align 4
  176. $55:
  177.     lda $1,256
  178.     and $2,$1,$1
  179.     addl $1,$31,$1
  180.     beq $1,$39
  181.     ldq $1,32($9)
  182.     subq $1,1,$2
  183.     cmpule $2,15,$1
  184.     beq $1,$39
  185.     lda $1,$77
  186.     s4addq $2,$1,$1
  187.     ldl $1,0($1)
  188.     addq $1,$29,$2
  189.     jmp $31,($2),$39
  190. .rdata
  191.     .align 3
  192.     .align 2
  193. $77:
  194.     .gprel32 $71
  195.     .gprel32 $72
  196.     .gprel32 $39
  197.     .gprel32 $73
  198.     .gprel32 $39
  199.     .gprel32 $39
  200.     .gprel32 $39
  201.     .gprel32 $74
  202.     .gprel32 $39
  203.     .gprel32 $39
  204.     .gprel32 $39
  205.     .gprel32 $39
  206.     .gprel32 $39
  207.     .gprel32 $39
  208.     .gprel32 $39
  209.     .gprel32 $75
  210. .text
  211.     .align 4
  212. $71:
  213.     ldq $1,16($9)
  214.     ldq_u $2,0($1)
  215.     insbl $0,$1,$3
  216.     mskbl $2,$1,$2
  217.     bis $3,$2,$3
  218.     stq_u $3,0($1)
  219.     br $31,$39
  220.     .align 4
  221. $72:
  222.     ldq $1,16($9)
  223.     bic $1,6,$3
  224.     ldq $2,0($3)
  225.     bic $1,1,$1
  226.     mskwl $2,$1,$2
  227.     inswl $0,$1,$1
  228.     bis $2,$1,$2
  229.     stq $2,0($3)
  230.     br $31,$39
  231.     .align 4
  232. $73:
  233.     ldq $1,16($9)
  234.     stl $0,0($1)
  235.     br $31,$39
  236.     .align 4
  237. $74:
  238.     ldq $1,16($9)
  239.     stq $0,0($1)
  240.     br $31,$39
  241.     .align 4
  242. $75:
  243.     ldq $1,16($9)
  244.     stq $0,0($1)
  245.     ldq $1,16($9)
  246.     stq $3,8($1)
  247. $39:
  248.     bis $31,$31,$0
  249.     ldq $26,0($30)
  250.     ldq $9,8($30)
  251.     addq $30,16,$30
  252.     ret $31,($26),1
  253.     .end __builtin_avcall
  254.