etc/uxn
0
0
Fork 0
mirror of https://git.sr.ht/~rabbits/uxn synced 2024-11-22 05:45:10 +00:00
Code Issues Projects Releases Wiki Activity

uxn core: enum -> const int; kencc does not like the same idents

Browse source
This commit is contained in:
Sigrid Solveig Haflínudóttir 2024-08-29 17:18:13 +02:00
parent 5dcf31beec
commit f3bc19a3e7
1 changed files with 8 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

16
src/uxn.c
View file

@ -12,14 +12,14 @@ WITH REGARD TO THIS SOFTWARE.
*/
#define OPC(opc, init, body) {\
case 0x00|opc: {enum{_2=0,_r=0};init body;} break;\
case 0x20|opc: {enum{_2=1,_r=0};init body;} break;\
case 0x40|opc: {enum{_2=0,_r=1};init body;} break;\
case 0x60|opc: {enum{_2=1,_r=1};init body;} break;\
case 0x80|opc: {enum{_2=0,_r=0};int k=uxn.wst.ptr;init uxn.wst.ptr= k;body;} break;\
case 0xa0|opc: {enum{_2=1,_r=0};int k=uxn.wst.ptr;init uxn.wst.ptr= k;body;} break;\
case 0xc0|opc: {enum{_2=0,_r=1};int k=uxn.rst.ptr;init uxn.rst.ptr= k;body;} break;\
case 0xe0|opc: {enum{_2=1,_r=1};int k=uxn.rst.ptr;init uxn.rst.ptr= k;body;} break;\
case 0x00|opc: {const int _2=0,_r=0;init body;} break;\
case 0x20|opc: {const int _2=1,_r=0;init body;} break;\
case 0x40|opc: {const int _2=0,_r=1;init body;} break;\
case 0x60|opc: {const int _2=1,_r=1;init body;} break;\
case 0x80|opc: {const int _2=0,_r=0;int k=uxn.wst.ptr;init uxn.wst.ptr= k;body;} break;\
case 0xa0|opc: {const int _2=1,_r=0;int k=uxn.wst.ptr;init uxn.wst.ptr= k;body;} break;\
case 0xc0|opc: {const int _2=0,_r=1;int k=uxn.rst.ptr;init uxn.rst.ptr= k;body;} break;\
case 0xe0|opc: {const int _2=1,_r=1;int k=uxn.rst.ptr;init uxn.rst.ptr= k;body;} break;\
}
/* Microcode */