paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-26 20:50:30 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ xch instruction for avr

Browse Source 
git-svn-id: trunk@34919 -
This commit is contained in:
florian 2016-11-19 19:21:09 +00:00
parent edf943a4f6
commit c86bac021b
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/avr/cpubase.pas
View File

@ -53,7 +53,7 @@ unit cpubase;
A_LSL,A_LSR,A_ROL,A_ROR,A_ASR,A_SWAP,A_BSET,A_BCLR,A_SBI,A_CBI,
A_SEC,A_SEH,A_SEI,A_SEN,A_SER,A_SES,A_SET,A_SEV,A_SEZ,
A_CLC,A_CLH,A_CLI,A_CLN,A_CLR,A_CLS,A_CLT,A_CLV,A_CLZ,
A_BST,A_BLD,A_BREAK,A_NOP,A_SLEEP,A_WDR);
A_BST,A_BLD,A_BREAK,A_NOP,A_SLEEP,A_WDR,A_XCH);
{ This should define the array of instructions as string }

2
compiler/avr/itcpugas.pas
View File

@ -44,7 +44,7 @@ interface
'lsl','lsr','rol','ror','asr','swap','bset','bclr','sbi','cbi',
'sec','seh','sei','sen','ser','ses','set','sev','sez',
'clc','clh','cli','cln','clr','cls','clt','clv','clz',
'bst','bld','break','nop','sleep','wdr');
'bst','bld','break','nop','sleep','wdr','xch');
function gas_regnum_search(const s:string):Tregister;
function gas_regname(r:Tregister):string;