Mercurial > public > hwos_code

view src/isr.inc @ 388:d8e2cf055fc3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
BUGFIX: German texts in ppo2 menu were too long for screen resulting in resulting in text display issues
author heinrichsweikamp
date Mon, 19 Oct 2015 15:06:59 +0200
parents 11d4fc797f74
children ca4556fb60b9
line wrap: on
line source

;=============================================================================
;
;   File isr.inc
;
;
;   Copyright (c) 2011, JD Gascuel, HeinrichsWeikamp, all right reserved.
;=============================================================================
; HISTORY
;  2011-08-06 : [mH] moving from OSTC code

SAFE_2BYTE_COPY MACRO  from, to
        local   retry
retry:
        movff   from+1,WREG             ; High byte in W.
        movff   WREG,to+1               ; and destination.
        movff   from+0,to+0             ; Copy low byte.
        movff   from+1,TABLAT           ; another bank-safe read.
        xorwf   TABLAT,W                ; High byte changed ?
        bnz     retry
        ENDM