Created R macro to replace 'return'. Saves 7 bytes.

Daniel White · Daniel White · commit eb639a962e94 · 2015-02-17T19:59:09.000Z
diff --git a/iota.c b/iota.c
@@ -2,6 +2,7 @@
 #define H 99999
 #define I ;if(
 #define K )break;
+#define R return
 #define Z ;if(!strncmp(c,
 
 char c[H], *C,
@@ -29,7 +30,7 @@ D(x, y, p, e) {
 
 				// Other side left in check?
 				I x==8 && v&16)
-					return 0;
+					R 0;
 
 				// Make move.
 				B[t]=m%128;
@@ -44,7 +45,7 @@ D(x, y, p, e) {
 				I (t==y & f==x) | (x==H && D(8,0,0,H))) {
 					X=f,Y=t;
 					E= m%8==2&t!=f+d ? f+t>>1 : 9; // Set ep-target square if double pawn move.
-					return B[t]==m%128; // Indicate if promotion has NOT occured.
+					R B[t]==m%128; // Indicate if promotion has NOT occured.
 				}
 
 				// Undo move.
@@ -59,7 +60,7 @@ D(x, y, p, e) {
 			}
 		}
 	}
-	return 1;
+	R 1;
 }
 
 main(i) {

Original file line number	Diff line number	Diff line change
`@@ -2,6 +2,7 @@`
`2`	`2`	`#define H 99999`
`3`	`3`	`#define I ;if(`
`4`	`4`	`#define K )break;`
	`5`	`+#define R return`
`5`	`6`	`#define Z ;if(!strncmp(c,`
`6`	`7`
`7`	`8`	`char c[H], *C,`
`@@ -29,7 +30,7 @@ D(x, y, p, e) {`
`29`	`30`
`30`	`31`	`// Other side left in check?`
`31`	`32`	`I x==8 && v&16)`
`32`		`- return 0;`
	`33`	`+ R 0;`
`33`	`34`
`34`	`35`	`// Make move.`
`35`	`36`	`B[t]=m%128;`
`@@ -44,7 +45,7 @@ D(x, y, p, e) {`
`44`	`45`	`I (t==y & f==x) \| (x==H && D(8,0,0,H))) {`
`45`	`46`	`X=f,Y=t;`
`46`	`47`	`E= m%8==2&t!=f+d ? f+t>>1 : 9; // Set ep-target square if double pawn move.`
`47`		`- return B[t]==m%128; // Indicate if promotion has NOT occured.`
	`48`	`+ R B[t]==m%128; // Indicate if promotion has NOT occured.`
`48`	`49`	`}`
`49`	`50`
`50`	`51`	`// Undo move.`
`@@ -59,7 +60,7 @@ D(x, y, p, e) {`
`59`	`60`	`}`
`60`	`61`	`}`
`61`	`62`	`}`
`62`		`- return 1;`
	`63`	`+ R 1;`
`63`	`64`	`}`
`64`	`65`
`65`	`66`	`main(i) {`