; Cache Operation
;

    INCLUDE kxarm.h

    TEXTAREA

    EXPORT    CleanInvalidateCacheRange
    EXPORT    CleanCacheRange
    EXPORT    InvalidateCacheRange

;--------------------------------------------------------------------
; void CleanInvalidateCacheRange(PBYTE StartAddress, PBYTE EndAddress);
;--------------------------------------------------------------------
    LEAF_ENTRY CleanInvalidateCacheRange

        stmfd        sp!,{r2 - r12}

        mcrr         p15,0,r1,r0,c14

        ldmfd        sp!, {r2 - r12}

    IF Interworking :LOR: Thumbing
        bx        lr
    ELSE
        mov        pc, lr    ; return
    ENDIF
    
    ENTRY_END
;--------------------------------------------------------------------
; void CleanCacheRange(PBYTE StartAddress, PBYTE EndAddress);
;--------------------------------------------------------------------
    LEAF_ENTRY CleanCacheRange

        stmfd        sp!,{r2 - r12}

        mcrr         p15,0,r1,r0,c12

        ldmfd        sp!, {r2 - r12}

    IF Interworking :LOR: Thumbing
        bx        lr
    ELSE
        mov        pc, lr    ; return
    ENDIF
    
    ENTRY_END
;--------------------------------------------------------------------
; void InvalidateCacheRange(PBYTE StartAddress, PBYTE EndAddress);
;--------------------------------------------------------------------
    LEAF_ENTRY InvalidateCacheRange

        stmfd        sp!,{r2 - r12}

        mcrr         p15,0,r1,r0,c6

        ldmfd        sp!, {r2 - r12}

    IF Interworking :LOR: Thumbing
        bx        lr
    ELSE
        mov        pc, lr    ; return
    ENDIF
    
    ENTRY_END
    
    END