[BACK]Return to mach_dep.c CVS log [TXT][DIR] Up to [local] / OpenXM_contrib2 / asir2000 / gc

Diff for /OpenXM_contrib2/asir2000/gc/mach_dep.c between version 1.6 and 1.7

version 1.6, 2002/07/24 08:00:10 version 1.7, 2003/06/24 05:11:33
Line 74  asm static void PushMacRegisters()
Line 74  asm static void PushMacRegisters()
 /* on your architecture.  Run the test_setjmp program to see whether    */  /* on your architecture.  Run the test_setjmp program to see whether    */
 /* there is any chance it will work.                                    */  /* there is any chance it will work.                                    */
   
 #ifndef USE_GENERIC_PUSH_REGS  #if !defined(USE_GENERIC_PUSH_REGS) && !defined(USE_ASM_PUSH_REGS)
   #undef HAVE_PUSH_REGS
 void GC_push_regs()  void GC_push_regs()
 {  {
 #       ifdef RT  #       ifdef RT
Line 91  void GC_push_regs()
Line 92  void GC_push_regs()
           asm("pushl r8");      asm("calls $1,_GC_push_one");            asm("pushl r8");      asm("calls $1,_GC_push_one");
           asm("pushl r7");      asm("calls $1,_GC_push_one");            asm("pushl r7");      asm("calls $1,_GC_push_one");
           asm("pushl r6");      asm("calls $1,_GC_push_one");            asm("pushl r6");      asm("calls $1,_GC_push_one");
   #         define HAVE_PUSH_REGS
 #       endif  #       endif
 #       if defined(M68K) && (defined(SUNOS4) || defined(NEXT))  #       if defined(M68K) && (defined(SUNOS4) || defined(NEXT))
         /*  M68K SUNOS - could be replaced by generic code */          /*  M68K SUNOS - could be replaced by generic code */
Line 113  void GC_push_regs()
Line 115  void GC_push_regs()
           asm("movl d7,sp@");   asm("jbsr _GC_push_one");            asm("movl d7,sp@");   asm("jbsr _GC_push_one");
   
           asm("addqw #0x4,sp");         /* put stack back where it was  */            asm("addqw #0x4,sp");         /* put stack back where it was  */
   #         define HAVE_PUSH_REGS
 #       endif  #       endif
   
 #       if defined(M68K) && defined(HP)  #       if defined(M68K) && defined(HP)
Line 135  void GC_push_regs()
Line 138  void GC_push_regs()
           asm("mov.l %d7,(%sp)"); asm("jsr _GC_push_one");            asm("mov.l %d7,(%sp)"); asm("jsr _GC_push_one");
   
           asm("addq.w &0x4,%sp");       /* put stack back where it was  */            asm("addq.w &0x4,%sp");       /* put stack back where it was  */
   #         define HAVE_PUSH_REGS
 #       endif /* M68K HP */  #       endif /* M68K HP */
   
 #       if defined(M68K) && defined(AMIGA)  #       if defined(M68K) && defined(AMIGA)
Line 158  void GC_push_regs()
Line 162  void GC_push_regs()
           asm("mov.l %d7,(%sp)"); asm("jsr _GC_push_one");            asm("mov.l %d7,(%sp)"); asm("jsr _GC_push_one");
   
           asm("addq.w &0x4,%sp");       /* put stack back where it was  */            asm("addq.w &0x4,%sp");       /* put stack back where it was  */
   #         define HAVE_PUSH_REGS
 #        else /* !__GNUC__ */  #        else /* !__GNUC__ */
           GC_push_one(getreg(REG_A2));            GC_push_one(getreg(REG_A2));
           GC_push_one(getreg(REG_A3));            GC_push_one(getreg(REG_A3));
Line 174  void GC_push_regs()
Line 179  void GC_push_regs()
           GC_push_one(getreg(REG_D5));            GC_push_one(getreg(REG_D5));
           GC_push_one(getreg(REG_D6));            GC_push_one(getreg(REG_D6));
           GC_push_one(getreg(REG_D7));            GC_push_one(getreg(REG_D7));
   #         define HAVE_PUSH_REGS
 #        endif /* !__GNUC__ */  #        endif /* !__GNUC__ */
 #       endif /* AMIGA */  #       endif /* AMIGA */
   
Line 196  void GC_push_regs()
Line 202  void GC_push_regs()
               PushMacReg(d7);                PushMacReg(d7);
               add.w   #4,sp                   ; fix stack.                add.w   #4,sp                   ; fix stack.
           }            }
   #         define HAVE_PUSH_REGS
 #         undef PushMacReg  #         undef PushMacReg
 #       endif /* THINK_C */  #       endif /* THINK_C */
 #       if defined(__MWERKS__)  #       if defined(__MWERKS__)
           PushMacRegisters();            PushMacRegisters();
   #         define HAVE_PUSH_REGS
 #       endif   /* __MWERKS__ */  #       endif   /* __MWERKS__ */
 #   endif       /* MACOS */  #   endif       /* MACOS */
   
Line 222  void GC_push_regs()
Line 230  void GC_push_regs()
           asm("pushl %esi");  asm("call _GC_push_one"); asm("addl $4,%esp");            asm("pushl %esi");  asm("call _GC_push_one"); asm("addl $4,%esp");
           asm("pushl %edi");  asm("call _GC_push_one"); asm("addl $4,%esp");            asm("pushl %edi");  asm("call _GC_push_one"); asm("addl $4,%esp");
           asm("pushl %ebx");  asm("call _GC_push_one"); asm("addl $4,%esp");            asm("pushl %ebx");  asm("call _GC_push_one"); asm("addl $4,%esp");
   #         define HAVE_PUSH_REGS
 #       endif  #       endif
   
 #       if ( defined(I386) && defined(LINUX) && defined(__ELF__) ) \  #       if ( defined(I386) && defined(LINUX) && defined(__ELF__) ) \
Line 244  void GC_push_regs()
Line 253  void GC_push_regs()
           asm("pushl %esi; call GC_push_one; addl $4,%esp");            asm("pushl %esi; call GC_push_one; addl $4,%esp");
           asm("pushl %edi; call GC_push_one; addl $4,%esp");            asm("pushl %edi; call GC_push_one; addl $4,%esp");
           asm("pushl %ebx; call GC_push_one; addl $4,%esp");            asm("pushl %ebx; call GC_push_one; addl $4,%esp");
   #         define HAVE_PUSH_REGS
 #       endif  #       endif
   
 #       if ( defined(I386) && defined(BEOS) && defined(__ELF__) )  #       if ( defined(I386) && defined(BEOS) && defined(__ELF__) )
Line 255  void GC_push_regs()
Line 265  void GC_push_regs()
           asm("pushl %esi; call GC_push_one; addl $4,%esp");            asm("pushl %esi; call GC_push_one; addl $4,%esp");
           asm("pushl %edi; call GC_push_one; addl $4,%esp");            asm("pushl %edi; call GC_push_one; addl $4,%esp");
           asm("pushl %ebx; call GC_push_one; addl $4,%esp");            asm("pushl %ebx; call GC_push_one; addl $4,%esp");
   #         define HAVE_PUSH_REGS
 #       endif  #       endif
   
 #       if defined(I386) && defined(MSWIN32) && !defined(__MINGW32__) \  #       if defined(I386) && defined(MSWIN32) && !defined(__MINGW32__) \
Line 281  void GC_push_regs()
Line 292  void GC_push_regs()
           __asm  push edi            __asm  push edi
           __asm  call GC_push_one            __asm  call GC_push_one
           __asm  add esp,4            __asm  add esp,4
   #         define HAVE_PUSH_REGS
 #       endif  #       endif
   
 #       if defined(I386) && (defined(SVR4) || defined(SCO) || defined(SCO_ELF))  #       if defined(I386) && (defined(SVR4) || defined(SCO) || defined(SCO_ELF))
Line 292  void GC_push_regs()
Line 304  void GC_push_regs()
           asm("pushl %ebp");  asm("call GC_push_one"); asm("addl $4,%esp");            asm("pushl %ebp");  asm("call GC_push_one"); asm("addl $4,%esp");
           asm("pushl %esi");  asm("call GC_push_one"); asm("addl $4,%esp");            asm("pushl %esi");  asm("call GC_push_one"); asm("addl $4,%esp");
           asm("pushl %edi");  asm("call GC_push_one"); asm("addl $4,%esp");            asm("pushl %edi");  asm("call GC_push_one"); asm("addl $4,%esp");
   #         define HAVE_PUSH_REGS
 #       endif  #       endif
   
 #       ifdef NS32K  #       ifdef NS32K
Line 300  void GC_push_regs()
Line 313  void GC_push_regs()
           asm ("movd r5, tos"); asm ("bsr ?_GC_push_one"); asm ("adjspb $-4");            asm ("movd r5, tos"); asm ("bsr ?_GC_push_one"); asm ("adjspb $-4");
           asm ("movd r6, tos"); asm ("bsr ?_GC_push_one"); asm ("adjspb $-4");            asm ("movd r6, tos"); asm ("bsr ?_GC_push_one"); asm ("adjspb $-4");
           asm ("movd r7, tos"); asm ("bsr ?_GC_push_one"); asm ("adjspb $-4");            asm ("movd r7, tos"); asm ("bsr ?_GC_push_one"); asm ("adjspb $-4");
   #         define HAVE_PUSH_REGS
 #       endif  #       endif
   
 #       if defined(SPARC)  #       if defined(SPARC)
           {            GC_save_regs_ret_val = GC_save_regs_in_stack();
               word GC_save_regs_in_stack();  #         define HAVE_PUSH_REGS
   
               GC_save_regs_ret_val = GC_save_regs_in_stack();  
           }  
 #       endif  #       endif
   
 #       ifdef RT  #       ifdef RT
Line 323  void GC_push_regs()
Line 334  void GC_push_regs()
             asm("cas r11, r13, r0"); GC_push_one(TMP_SP); /* through */              asm("cas r11, r13, r0"); GC_push_one(TMP_SP); /* through */
             asm("cas r11, r14, r0"); GC_push_one(TMP_SP); /* r15 */              asm("cas r11, r14, r0"); GC_push_one(TMP_SP); /* r15 */
             asm("cas r11, r15, r0"); GC_push_one(TMP_SP);              asm("cas r11, r15, r0"); GC_push_one(TMP_SP);
   #           define HAVE_PUSH_REGS
 #       endif  #       endif
   
 #       if defined(M68K) && defined(SYSV)  #       if defined(M68K) && defined(SYSV)
Line 346  void GC_push_regs()
Line 358  void GC_push_regs()
           asm("movl %d7,%sp@"); asm("jbsr GC_push_one");            asm("movl %d7,%sp@"); asm("jbsr GC_push_one");
   
           asm("addqw #0x4,%sp");        /* put stack back where it was  */            asm("addqw #0x4,%sp");        /* put stack back where it was  */
   #         define HAVE_PUSH_REGS
 #        else /* !__GNUC__*/  #        else /* !__GNUC__*/
           asm("subq.w &0x4,%sp");       /* allocate word on top of stack */            asm("subq.w &0x4,%sp");       /* allocate word on top of stack */
   
Line 363  void GC_push_regs()
Line 376  void GC_push_regs()
           asm("mov.l %d7,(%sp)"); asm("jsr GC_push_one");            asm("mov.l %d7,(%sp)"); asm("jsr GC_push_one");
   
           asm("addq.w &0x4,%sp");       /* put stack back where it was  */            asm("addq.w &0x4,%sp");       /* put stack back where it was  */
   #         define HAVE_PUSH_REGS
 #        endif /* !__GNUC__ */  #        endif /* !__GNUC__ */
 #       endif /* M68K/SYSV */  #       endif /* M68K/SYSV */
   
Line 372  void GC_push_regs()
Line 386  void GC_push_regs()
             extern int *__libc_stack_end;              extern int *__libc_stack_end;
   
             GC_push_all_stack (sp, __libc_stack_end);              GC_push_all_stack (sp, __libc_stack_end);
   #           define HAVE_PUSH_REGS
               /* Isn't this redundant with the code to push the stack? */
         }          }
 #     endif  #     endif
   
       /* other machines... */        /* other machines... */
 #       if !defined(M68K) && !defined(VAX) && !defined(RT)  #       if !defined(HAVE_PUSH_REGS)
 #       if !defined(SPARC) && !defined(I386) && !defined(NS32K)              --> We just generated an empty GC_push_regs, which
 #       if !defined(POWERPC) && !defined(UTS4)              --> is almost certainly broken.  Try defining
 #       if !defined(PJ) && !(defined(MIPS) && defined(LINUX))              --> USE_GENERIC_PUSH_REGS instead.
             --> bad news <--  
 #       endif  
 #       endif  #       endif
 #       endif  
 #       endif  
 }  }
 #endif /* !USE_GENERIC_PUSH_REGS */  #endif /* !USE_GENERIC_PUSH_REGS && !USE_ASM_PUSH_REGS */
   
 #if defined(USE_GENERIC_PUSH_REGS)  #if defined(USE_GENERIC_PUSH_REGS)
 void GC_generic_push_regs(cold_gc_frame)  void GC_generic_push_regs(cold_gc_frame)
Line 428  ptr_t cold_gc_frame;
Line 440  ptr_t cold_gc_frame;
               /* needed on IA64, since some non-windowed registers are  */                /* needed on IA64, since some non-windowed registers are  */
               /* preserved.                                             */                /* preserved.                                             */
               {                {
                 word GC_save_regs_in_stack();  
   
                 GC_save_regs_ret_val = GC_save_regs_in_stack();                  GC_save_regs_ret_val = GC_save_regs_in_stack();
                 /* On IA64 gcc, could use __builtin_ia64_flushrs() and  */                  /* On IA64 gcc, could use __builtin_ia64_flushrs() and  */
                 /* __builtin_ia64_flushrs().  The latter will be done   */                  /* __builtin_ia64_flushrs().  The latter will be done   */
Line 446  ptr_t cold_gc_frame;
Line 456  ptr_t cold_gc_frame;
 /* the stack.   Return sp.                                              */  /* the stack.   Return sp.                                              */
 # ifdef SPARC  # ifdef SPARC
     asm("       .seg    \"text\"");      asm("       .seg    \"text\"");
 #   ifdef SVR4  #   if defined(SVR4) || defined(NETBSD)
       asm("     .globl  GC_save_regs_in_stack");        asm("     .globl  GC_save_regs_in_stack");
       asm("GC_save_regs_in_stack:");        asm("GC_save_regs_in_stack:");
       asm("     .type GC_save_regs_in_stack,#function");        asm("     .type GC_save_regs_in_stack,#function");
Legend:
Removed from v.1.6  
changed lines
  Added in v.1.7
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>