Return to memset.s CVS log

Up to [Plan 9 NeXT] / lucent / sys / src / libc / 68020

Annotation of lucent/sys/src/libc/68020/memset.s, revision 1.1

1.1     ! root        1:        TEXT    memset(SB), $0
        !             2:        MOVL    n+8(FP), R0
        !             3:        BLE     return
        !             4:        MOVL    s1+0(FP), A1
        !             5:        CLRL    R1
        !             6:        MOVB    c+7(FP), R1
        !             7:        BEQ     l1
        !             8: 
        !             9: /*
        !            10:  * create 4 replicated copies
        !            11:  * of the byte in R1
        !            12:  */
        !            13:        MOVL    R1, R2
        !            14:        ASLL    $8, R2
        !            15:        ORL     R2, R1
        !            16:        MOVL    R1, R2
        !            17:        SWAP    R2
        !            18:        ORL     R2, R1
        !            19: 
        !            20: /*
        !            21:  * quad-long-at-a-time set
        !            22:  * destination allignment is not
        !            23:  * very important.
        !            24:  */
        !            25: l1:
        !            26:        SUBL    $16, R0
        !            27:        BLT     l2
        !            28:        MOVL    R1, (A1)+
        !            29:        MOVL    R1, (A1)+
        !            30:        MOVL    R1, (A1)+
        !            31:        MOVL    R1, (A1)+
        !            32:        BRA     l1
        !            33: 
        !            34: /*
        !            35:  * cleanup byte-at-a-time
        !            36:  */
        !            37: l2:
        !            38:        ADDL    $15, R0
        !            39:        BLT     return
        !            40: l3:
        !            41:        MOVB    R1, (A1)+
        !            42:        SUBL    $1, R0
        !            43:        BGE     l3
        !            44: 
        !            45: return:
        !            46:        MOVL    s1+0(FP),R0
        !            47:        RTS

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.