Mercurial > public > hwos_code

comparison src/isr.inc @ 604:ca4556fb60b9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
bump to 2.99beta, work on 3.00 stable
author heinrichsweikamp
date Thu, 22 Nov 2018 19:47:26 +0100
parents 11d4fc797f74
children c40025d8e750
comparison
equal deleted inserted replaced
603:00b24fb4324d 604:ca4556fb60b9
6 ; Copyright (c) 2011, JD Gascuel, HeinrichsWeikamp, all right reserved. 6 ; Copyright (c) 2011, JD Gascuel, HeinrichsWeikamp, all right reserved.
7 ;============================================================================= 7 ;=============================================================================
8 ; HISTORY 8 ; HISTORY
9 ; 2011-08-06 : [mH] moving from OSTC code 9 ; 2011-08-06 : [mH] moving from OSTC code
10 10
11 SAFE_2BYTE_COPY MACRO from, to 11 SAFE_2BYTE_COPY MACRO from,to
12 local retry 12 local retry
13 retry: 13 retry:
14 movff from+1,WREG ; High byte in W. 14 movff from+1,WREG ; high byte in WREG, ...
15 movff WREG,to+1 ; and destination. 15 movff WREG,to+1 ; ... and destination
16 movff from+0,to+0 ; Copy low byte. 16 movff from+0,to+0 ; copy low byte
17 movff from+1,TABLAT ; another bank-safe read. 17 movff from+1,TABLAT ; another bank-safe read
18 xorwf TABLAT,W ; High byte changed ? 18 xorwf TABLAT,W ; did the high byte changed?
19 bnz retry 19 bnz retry ; YES - retry
20 ENDM 20 ENDM