umouse

umouse.git
git clone git://git.lenczewski.org/umouse.git
Log | Files | Refs | Submodules | README

Macros.fth (450B)


      1 \ ARM Cortex assembler macros
      2 
      3 ((
      4 Copyright (c) 1988-2001, 2009
      5 MicroProcessor Engineering
      6 133 Hill Lane
      7 Southampton SO15 5AF
      8 England
      9 
     10 tel: +44 23 8063 1441
     11 fax: +44 23 8033 9691
     12 net: mpe@mpeforth.com
     13      tech-support@mpeforth.com
     14 web: www.mpeforth.com
     15 ))
     16 
     17 only forth  also c-c  also assembler
     18 also asm-access definitions
     19 
     20 : NEXT,		\ --
     21   Thumb? if
     22     bx  r14
     23   else
     24     mov pc, link
     25   endif
     26 ;
     27 
     28 only forth definitions
     29