OpenCores
URL https://opencores.org/ocsvn/scarts/scarts/trunk

Subversion Repositories scarts

[/] [scarts/] [trunk/] [toolchain/] [scarts-newlib/] [newlib-1.17.0/] [newlib/] [libc/] [machine/] [w65/] [udivhi3.S] - Rev 9

Compare with Previous | Blame | View Log

        .global ___udivhi3

___udivhi3:
        stz     <r0
        ldy     #1
        ldx     <r4
        lda     <r5
        
div1:   
        asl     a
        bcs     div2
        iny
        cpy     #17
        bne     div1

div2:   ror     a

div4:   pha
        txa
        sec
        sbc     1,s
        bcc     div3
        tax

div3:   rol     <r0
        pla
        lsr     a
        dey
        bne     div4
        rtl

Compare with Previous | Blame | View Log

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.