| /* speed test for basic CPU operations */ |
| |
| |
| /* Marco Bucci <marco.bucci@inwind.it> */ |
| |
| /* This code was developed with the Code Warrior integrate ppc assembler. |
| * Macros are use to hide illegal constructs whether you are using a |
| * "normal" assembler or the "C integrated" assembler. |
| */ |
| |
| #if 0 |
| |
| |
| .text |
| .align 4 |
| |
| .globl b_call_reg |
| .globl _b_call_reg |
| .globl b_call_imm |
| .globl _b_call_imm |
| .globl b_add |
| .globl _b_add |
| .globl b_load |
| .globl _b_load |
| |
| .set fsize, 64 |
| .set lrsave, 4 |
| |
| #else |
| |
| #define fsize 64 |
| #define lrsave 4 |
| |
| #endif |
| |
| |
| |
| |
| #if 0 |
| .if 0 |
| #endif |
| asm void b_null(void) |
| { |
| #if 0 |
| .endif |
| #endif |
| |
| #if 0 |
| b_null: |
| #endif |
| |
| blr |
| |
| #if 0 |
| .if 0 |
| #endif |
| } |
| #if 0 |
| .endif |
| #endif |
| |
| |
| /* actually the same as the following. How to get "b_null" address? |
| * I didnt find the right sintax or the right way. |
| * I should take the current PC, then the difference to "b_null" |
| * (making the difference beween the labels), perform the sum and go?! |
| */ |
| #if 0 |
| .if 0 |
| #endif |
| asm void b_call_reg(long n) |
| { |
| #if 0 |
| .endif |
| #endif |
| |
| #if 0 |
| b_call_reg: |
| _b_call_reg: |
| #endif |
| |
| mflr %r0 |
| stw %r31,-4(%r1) |
| stw %r30,-8(%r1) |
| stw %r0,lrsave(%r1) |
| stwu %r1,-fsize(%r1) |
| mr %r30,%r3 |
| li %r31,0 |
| |
| b L1 |
| L0: |
| bl b_null |
| bl b_null |
| bl b_null |
| bl b_null |
| bl b_null |
| |
| addi %r31,%r31,5 |
| L1: |
| cmpw %r31,%r30 |
| blt L0 |
| |
| |
| lwz %r0,lrsave+fsize(%r1) |
| mtlr %r0 |
| lwz %r31,-4+fsize(%r1) |
| lwz %r30,-8+fsize(%r1) |
| addi %r1,%r1,fsize |
| blr |
| |
| #if 0 |
| .if 0 |
| #endif |
| } |
| #if 0 |
| .endif |
| #endif |
| |
| |
| |
| |
| #if 0 |
| .if 0 |
| #endif |
| asm void b_call_imm(long n) |
| { |
| #if 0 |
| .endif |
| #endif |
| |
| #if 0 |
| b_call_imm: |
| _b_call_imm: |
| #endif |
| |
| mflr %r0 |
| stw %r31,-4(%r1) |
| stw %r30,-8(%r1) |
| stw %r0,lrsave(%r1) |
| stwu %r1,-fsize(%r1) |
| mr %r30,%r3 |
| li %r31,0 |
| |
| b L3 |
| L2: |
| bl b_null |
| bl b_null |
| bl b_null |
| bl b_null |
| bl b_null |
| |
| addi %r31,%r31,5 |
| L3: |
| cmpw %r31,%r30 |
| blt L2 |
| |
| |
| lwz %r0,lrsave+fsize(%r1) |
| mtlr %r0 |
| lwz %r31,-4+fsize(%r1) |
| lwz %r30,-8+fsize(%r1) |
| addi %r1,%r1,fsize |
| blr |
| |
| #if 0 |
| .if 0 |
| #endif |
| } |
| #if 0 |
| .endif |
| #endif |
| |
| |
| |
| #if 0 |
| .if 0 |
| #endif |
| asm void b_add(long n) |
| { |
| #if 0 |
| .endif |
| #endif |
| |
| #if 0 |
| b_add: |
| _b_add: |
| #endif |
| |
| mflr %r0 |
| stw %r31,-4(%r1) |
| stw %r30,-8(%r1) |
| stw %r0,lrsave(%r1) |
| stwu %r1,-fsize(%r1) |
| mr %r30,%r3 |
| li %r31,0 |
| |
| b L5 |
| L4: |
| addi %r3,%r3,5 |
| addi %r4,%r4,5 |
| addi %r5,%r5,5 |
| addi %r6,%r6,5 |
| addi %r7,%r7,5 |
| |
| addi %r3,%r3,5 |
| addi %r4,%r4,5 |
| addi %r5,%r5,5 |
| addi %r6,%r6,5 |
| addi %r7,%r7,5 |
| |
| addi %r31,%r31,10 |
| L5: |
| cmpw %r31,%r30 |
| blt L4 |
| |
| |
| lwz %r0,lrsave+fsize(%r1) |
| mtlr %r0 |
| lwz %r31,-4+fsize(%r1) |
| lwz %r30,-8+fsize(%r1) |
| addi %r1,%r1,fsize |
| blr |
| |
| #if 0 |
| .if 0 |
| #endif |
| } |
| #if 0 |
| .endif |
| #endif |
| |
| |
| |
| #if 0 |
| .if 0 |
| #endif |
| asm void b_load(long n) |
| { |
| #if 0 |
| .endif |
| #endif |
| |
| #if 0 |
| b_load: |
| _b_load: |
| #endif |
| |
| mflr %r0 |
| stw %r31,-4(%r1) |
| stw %r30,-8(%r1) |
| stw %r0,lrsave(%r1) |
| stwu %r1,-fsize(%r1) |
| mr %r30,%r3 |
| li %r31,0 |
| |
| b L7 |
| L6: |
| lwz %r3,4(%r1) |
| lwz %r4,8(%r1) |
| lwz %r5,12(%r1) |
| lwz %r6,16(%r1) |
| lwz %r7,20(%r1) |
| |
| lwz %r3,24(%r1) |
| lwz %r4,28(%r1) |
| lwz %r5,32(%r1) |
| lwz %r6,36(%r1) |
| lwz %r7,40(%r1) |
| |
| |
| addi %r31,%r31,10 |
| L7: |
| cmpw %r31,%r30 |
| blt L6 |
| |
| |
| lwz %r0,lrsave+fsize(%r1) |
| mtlr %r0 |
| lwz %r31,-4+fsize(%r1) |
| lwz %r30,-8+fsize(%r1) |
| addi %r1,%r1,fsize |
| blr |
| |
| #if 0 |
| .if 0 |
| #endif |
| } |
| #if 0 |
| .endif |
| #endif |
