Author: quozl Date: Sat Nov 14 02:11:02 2015 New Revision: 3787 URL: http://tracker.coreboot.org/trac/openfirmware/changeset/3787
Log: ppc: "${BP}/forth/lib/debug.fth:45: cntx ?" [patch]
This fixes warning about undefined cntx issued during PPC cross-compilation:
--- Cmd: ${HOSTDIR}/ppcforth ${BP}/cpu/ppc/build/kernel.dic ../tools.bth ${BP}/forth/lib/debug.fth:45: cntx ? ${BP}/forth/lib/debug.fth:297: cntx ? ${BP}/forth/lib/debug.fth:298: cntx ?
Contributed by Marcin Cieslak saper@saper.info
Modified: cpu/ppc/debugm.fth
Modified: cpu/ppc/debugm.fth ============================================================================== --- cpu/ppc/debugm.fth Thu Oct 22 03:13:19 2015 (r3786) +++ cpu/ppc/debugm.fth Sat Nov 14 02:11:02 2015 (r3787) @@ -14,7 +14,7 @@ nuser 'debug \ code field for high level trace nuser <ip \ lower limit of ip nuser ip> \ upper limit of ip -nuser cnt \ how many times thru debug next +nuser cntx \ how many times thru debug next
\ Since we use a shared "next" routine, slow-next and fast-next are no-op's alias slow-next 2drop ( high low -- ) @@ -38,14 +38,14 @@ 'user ip> lwz t0,* cmpl 0,0,t2,t0 < if - 'user cnt lwz t0,* + 'user cntx lwz t0,* set t1,2 addi t0,t0,1 - 'user cnt stw t0,* + 'user cntx stw t0,* cmp 0,0,t0,t1 = if set t0,0 - 'user cnt stw t0,* + 'user cntx stw t0,*
set t0,h#873d0004 \ lwzu w,4(ip) stw t0,0(up)