diff options
| author | Miguel de Icaza <miguel@gnome.org> | 2004-11-11 05:30:00 +0300 |
|---|---|---|
| committer | Miguel de Icaza <miguel@gnome.org> | 2004-11-11 05:30:00 +0300 |
| commit | 3cca3c82b8e7554f4f5c13a34e4e42949c9053da (patch) | |
| tree | c487436df7cc0b6c00a89e5e0b68e2c4e642a0ef /libgc/sparc_mach_dep.S | |
| parent | 5dc2037ab1a06f92df5f26eb305cde5e3ecb76a1 (diff) | |
Add libgc to mono
svn path=/trunk/mono/; revision=35994
Diffstat (limited to 'libgc/sparc_mach_dep.S')
| -rw-r--r-- | libgc/sparc_mach_dep.S | 67 |
1 files changed, 67 insertions, 0 deletions
diff --git a/libgc/sparc_mach_dep.S b/libgc/sparc_mach_dep.S new file mode 100644 index 00000000000..06a0f3b4673 --- /dev/null +++ b/libgc/sparc_mach_dep.S @@ -0,0 +1,67 @@ +! SPARCompiler 3.0 and later apparently no longer handles +! asm outside functions. So we need a separate .s file +! This is only set up for SunOS 5, not SunOS 4. +! Assumes this is called before the stack contents are +! examined. + + .seg "text" + .globl GC_save_regs_in_stack + .globl GC_push_regs +GC_save_regs_in_stack: +GC_push_regs: +#if defined(__arch64__) || defined(__sparcv9) + save %sp,-128,%sp + flushw + ret + restore %sp,2047+128,%o0 +#else /* 32 bit SPARC */ + ta 0x3 ! ST_FLUSH_WINDOWS + mov %sp,%o0 + retl + nop +#endif /* 32 bit SPARC */ +.GC_save_regs_in_stack_end: + .size GC_save_regs_in_stack,.GC_save_regs_in_stack_end-GC_save_regs_in_stack + + + .globl GC_clear_stack_inner +GC_clear_stack_inner: +#if defined(__arch64__) || defined(__sparcv9) + mov %sp,%o2 ! Save sp + add %sp,2047-8,%o3 ! p = sp+bias-8 + add %o1,-2047-192,%sp ! Move sp out of the way, + ! so that traps still work. + ! Includes some extra words + ! so we can be sloppy below. +loop: + stx %g0,[%o3] ! *(long *)p = 0 + cmp %o3,%o1 + bgu,pt %xcc, loop ! if (p > limit) goto loop + add %o3,-8,%o3 ! p -= 8 (delay slot) + retl + mov %o2,%sp ! Restore sp., delay slot +#else /* 32 bit SPARC */ + mov %sp,%o2 ! Save sp + add %sp,-8,%o3 ! p = sp-8 + clr %g1 ! [g0,g1] = 0 + add %o1,-0x60,%sp ! Move sp out of the way, + ! so that traps still work. + ! Includes some extra words + ! so we can be sloppy below. +loop: + std %g0,[%o3] ! *(long long *)p = 0 + cmp %o3,%o1 + bgu loop ! if (p > limit) goto loop + add %o3,-8,%o3 ! p -= 8 (delay slot) + retl + mov %o2,%sp ! Restore sp., delay slot +#endif /* 32 bit SPARC */ +.GC_clear_stack_inner_end: + .size GC_clear_stack_inner,.GC_clear_stack_inner_end-GC_clear_stack_inner + + + + + + + |