[9front] [PATCH] Correct acid's rune size to 4 bytes

[Grimmware <oholiab@grimmwa.re>]

Correctly display runes that utilize the higher bits and correctly render rune strings with the \R format

---
diff c6af55fef7800d6a151f05a25ab19feb29abb9aa ea9dfc8d6c6d3ecfb6cfa16ac37db9cccd12adf7
--- a/sys/doc/acid.ms
+++ b/sys/doc/acid.ms
@@ -285,9 +285,9 @@
 Interpret the addressed bytes as UTF characters
 and print successive characters until a zero byte is reached.
 .IP \f(CWr\fP
-Print a two-byte integer as a rune.
+Print a four-byte integer as a rune.
 .IP \f(CWR\fP
-Print successive two-byte integers as runes
+Print successive four-byte integers as runes
 until a zero rune is reached.
 .IP \f(CWi\fP
 Print as machine instructions.
--- a/sys/src/cmd/acid/exec.c
+++ b/sys/src/cmd/acid/exec.c
@@ -264,7 +264,6 @@
 	case 'u':
 	case 'o':
 	case 'q':
-	case 'r':
 		r->type = TINT;
 		ret = get2(m, addr, &sval);
 		if (ret < 0)
@@ -286,6 +285,7 @@
 	case 'U':
 	case 'O':
 	case 'Q':
+	case 'r':
 		r->type = TINT;
 		ret = get4(m, addr, &lval);
 		if (ret < 0)
@@ -318,11 +318,11 @@
 		break;
 	case 'R':
 		r->type = TSTRING;
-		for(i = 0; i < sizeof(buf)-2; i += 2) {
-			ret = get1(m, addr, (uchar*)&buf[i], 2);
+		for(i = 0; i < sizeof(buf)-sizeof(Rune); i += sizeof(Rune)) {
+			ret = get1(m, addr, (uchar*)&buf[i], sizeof(Rune));
 			if (ret < 0)
 				error("indir: %r");
-			addr += 2;
+			addr += sizeof(Rune);
 			if(buf[i] == 0 && buf[i+1] == 0)
 				break;
 		}