Changeset 13725


Ignore:
Timestamp:
May 23, 2010, 1:49:53 AM (9 years ago)
Author:
gb
Message:

Still needs work; comment out the PPC code.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/arm/lisp-kernel/arm-asmutils.s

    r13687 r13725  
    1515
    1616
    17        
     17        .syntax unified
     18        .arm   
    1819
    1920        include(lisp.s)
     
    2526        __(mov r2,#0)           /* options.  Pass as 0 until we know better */
    2627        __(mov r12,r7)          /* preserve r7 ;  r12 saved by syscall */
    27         __(mov r7,0x0f0000)     /* __ARM_NR_cacheflush */
     28        __(mov r7,#0x0f0000)     /* __ARM_NR_cacheflush */
    2829        __(add r7,r7,#2)
    2930        __(svc #0)
     
    3334                               
    3435_exportfn(C(current_stack_pointer))
    35         __(mr r0,sp)
     36        __(mov r0,sp)
    3637        __(bx lr)
    3738_endfn
     
    3940_exportfn(C(count_leading_zeros))
    4041        __(clz r0,r0)
    41         __(bx lr
     42        __(bx lr)
    4243_endfn
    4344
     
    8182
    8283_exportfn(C(atomic_swap))
    83         __(swp r0,r1,[r0])
     84        __(mov r2,r0)
     85        __(swp r0,r1,[r2])
    8486        __(bx lr)
    8587_endfn
     
    8991       
    9092_exportfn(C(atomic_ior))
    91         __(sync)
    92 1:      __(lrarx(r5,0,r3))
    93         __(or r6,r4,r5)
    94         __(strcx(r6,0,r3))
    95         __(bne- 1b)
    96         __(isync)
    97         __(and r3,r4,r5)
    98         __(blr)
     93dnl         __(sync)
     94dnl 1:  __(lrarx(r5,0,r3))
     95dnl         __(or r6,r4,r5)
     96dnl     __(strcx(r6,0,r3))
     97dnl     __(bne- 1b)
     98dnl     __(isync)
     99dnl     __(and r3,r4,r5)
     100dnl     __(blr)
    99101_endfn
    100102
     
    104106
    105107_exportfn(C(atomic_and))
    106         __(sync)
    107 1:      __(lrarx(r5,0,r3))
    108         __(and r6,r4,r5)
    109         __(strcx(r6,0,r3))
    110         __(bne- 1b)
    111         __(isync)
    112         __(mr r3,r6)
    113         __(blr)
     108dnl         __(sync)
     109dnl 1:  __(lrarx(r5,0,r3))
     110dnl         __(and r6,r4,r5)
     111dnl     __(strcx(r6,0,r3))
     112dnl     __(bne- 1b)
     113dnl     __(isync)
     114dnl     __(mr r3,r6)
     115dnl     __(blr)
    114116_endfn
    115117               
     
    133135       
    134136       
    135 _endfn
    136137
    137138
Note: See TracChangeset for help on using the changeset viewer.