/cp
[official-gcc.git] / boehm-gc / mips_ultrix_mach_dep.s
blob178224e31c8d6b6ad96d42a01e5373380222c5ec
1 # define call_push(x) move $4,x; jal GC_push_one
3 .text
4 # Mark from machine registers that are saved by C compiler
5 .globl GC_push_regs
6 .ent GC_push_regs
7 GC_push_regs:
8 subu $sp,8 ## Need to save only return address
9 sw $31,4($sp)
10 .mask 0x80000000,-4
11 .frame $sp,8,$31
12 call_push($2)
13 call_push($3)
14 call_push($16)
15 call_push($17)
16 call_push($18)
17 call_push($19)
18 call_push($20)
19 call_push($21)
20 call_push($22)
21 call_push($23)
22 call_push($30)
23 lw $31,4($sp)
24 addu $sp,8
25 j $31
26 .end GC_push_regs