commit 3276f03

(uxn.c) Use small registers for SWP/DUP

 1@@ -36,7 +36,7 @@ WITH REGARD TO THIS SOFTWARE.
 2 int
 3 uxn_eval(Uint16 pc)
 4 {
 5-	Uint16 t, n, l, r;
 6+	Uint16 t, n, l, x, r;
 7 	Uint8 *rr;
 8 	if(!pc || uxn.dev[0x0f]) return 0;
 9 	for(;;) {
10@@ -51,11 +51,11 @@ uxn_eval(Uint16 pc)
11 			case 0x03: /* NIP  */ t=T;            SET(2,-1) T = t; break;
12 			case 0x23: /* NIP2 */ t=T,n=N;        SET(4,-2) T = t, N = n; break;
13 			case 0x04: /* SWP  */ t=T;n=N;        SET(2, 0) T = n, N = t; break;
14-			case 0x24: /* SWP2 */ t=T2,n=N2;      SET(4, 0) T2_(n) N2_(t) break;
15+			case 0x24: /* SWP2 */ t=T,n=N,l=L,x=X;SET(4, 0) T = l, N = x, L = t, X = n; break;
16 			case 0x05: /* ROT  */ t=T,n=N,l=L;    SET(3, 0) T = l, N = t, L = n; break;
17 			case 0x25: /* ROT2 */ t=T2,n=N2,l=L2; SET(6, 0) T2_(l) N2_(t) L2_(n) break;
18 			case 0x06: /* DUP  */ t=T;            SET(1, 1) T = t, N = t; break;
19-			case 0x26: /* DUP2 */ t=T2;           SET(2, 2) T2_(t) N2_(t) break;
20+			case 0x26: /* DUP2 */ t=T,n=N;        SET(2, 2) T = t, N = n, L = t, X = n; break;
21 			case 0x07: /* OVR  */ t=T,n=N;        SET(2, 1) T = n, N = t, L = n; break;
22 			case 0x27: /* OVR2 */ t=T2,n=N2;      SET(4, 2) T2_(n) N2_(t) L2_(n) break;
23 			case 0x08: /* EQU  */ t=T,n=N;        SET(2,-1) T = n == t; break;

1@@ -271,7 +271,7 @@ main(int argc, char **argv)
2 	int i = 1;
3 	char *rom;
4 	if(i != argc && argv[i][0] == '-' && argv[i][1] == 'v') {
5-		fprintf(stdout, "Uxn11 - Varvara Emulator, 30 Jun 2024.\n");
6+		fprintf(stdout, "Uxn11 - Varvara Emulator, 1 Jul 2024.\n");
7 		i++;
8 	}
9 	rom = i == argc ? "boot.rom" : argv[i++];

1@@ -51,7 +51,7 @@ main(int argc, char **argv)
2 		return system_error("usage", "uxncli [-v] file.rom [args..]");
3 	/* Read flags */
4 	if(argv[i][0] == '-' && argv[i][1] == 'v')
5-		return !printf("Uxncli - Console Varvara Emulator, 30 Jun 2024\n");
6+		return !printf("Uxncli - Console Varvara Emulator, 1 Jul 2024\n");
7 	if(!system_boot((Uint8 *)calloc(0x10000 * RAM_PAGES, sizeof(Uint8)), argv[i++]))
8 		return system_error("Init", "Failed to initialize uxn.");
9 	/* Game Loop */