Subversion Repositories openrisc

/* stuff needed for libgcc on win32.  */

#ifdef L_chkstk

        .global __chkstk
        .global __alloca
__chkstk:
__alloca:
        pushl  %ecx             /* save temp */
        movl   %esp,%ecx        /* get sp */
        addl   $0x8,%ecx        /* and point to return addr */

probe:  cmpl   $0x1000,%eax     /* > 4k ?*/
        jb    done              

        subl   $0x1000,%ecx             /* yes, move pointer down 4k*/
        orl    $0x0,(%ecx)              /* probe there */
        subl   $0x1000,%eax             /* decrement count */
        jmp    probe                    /* and do it again */

done:   subl   %eax,%ecx           
        orl    $0x0,(%ecx)      /* less that 4k, just peek here */

        movl   %esp,%eax
        movl   %ecx,%esp        /* decrement stack */

        movl   (%eax),%ecx      /* recover saved temp */
        movl   4(%eax),%eax     /* get return address */
        jmp    *%eax    


#endif