lib,wcc,w6a,w6l: char-literals for remaining source magic decimals (Wave-1)

lib/encoding/base32/base32.ww

@@ -78,7 +78,7 @@ fn encgroup(dst: []u8, j: i32, src: []u8, i: i32, n: i32, hex: bool) void = {
 		if (n == 3) { keep = 5; };
 		if (n == 4) { keep = 7; };
 		let k: i32 = keep;
-		for (k < 8) { dst[j + k] = 61u8; k += 1; };	// '='
+		for (k < 8) { dst[j + k] = '='; k += 1; };
 	};
 };
 
@@ -136,7 +136,7 @@ fn decodeinto(dst: []u8, src: []u8, hex: bool) (i32 | invalid) = {
 		let k: i32 = 0;
 		for (k < 8) {
 			let c: u8 = src[i + k];
-			if (c == 61u8) {	// '='
+			if (c == '=') {
 				if (i + 8 != end) { return (i + k): invalid; };
 				last = true;
 				v[k] = 0u8;

lib/os/os.ww

@@ -324,7 +324,7 @@ export fn mkdirs(path: str, mode: i32) (void | oserror) = {
 	// trigger an empty mkdir.
 	let i: i32 = 1;
 	for (i < n) {
-		if (pathbuf[i] == 47u8) {	// '/'
+		if (pathbuf[i] == '/') {
 			pathbuf[i] = 0u8;
 			let r: i32 = syscall2(nr.MKDIR,
 			    (&pathbuf[0]): i64, mode: i64): i32;
@@ -443,7 +443,7 @@ export fn getenv(name: str) (str | void) = {
 			j += 1;
 		};
 		if (matched) {
-			if (entry[name.len] == 61u8) {	// '='
+			if (entry[name.len] == '=') {
 				let val: *u8 = entry + ((name.len + 1): u64);
 				let n: i32 = 0;
 				for (val[n] != 0u8) { n += 1; };

lib/path/path.ww

@@ -7,7 +7,7 @@ package path;
 
 import strings;
 
-def SEP: u8 = 47u8;	// '/'
+def SEP: u8 = '/';
 
 // abs — `p` is an absolute path (starts with '/').
 export fn abs(p: str) bool = {
@@ -75,7 +75,7 @@ export fn extension(p: str) str = {
 	let b: str = basename(p);
 	let i: i32 = b.len - 1;
 	for (i > 0) {
-		if (b[i] == 46u8) {	// '.'
+		if (b[i] == '.') {
 			let r: str;
 			r.ptr = b.ptr + (i: u64);
 			r.len = b.len - i;

lib/strconv/strconv.ww

@@ -129,7 +129,7 @@ let i64tos_buf: [65]u8 = [0...];	// 64 binary digits plus '-'
 export fn i64tos(i: i64, b: base) str = {
 	if (i >= 0) { return u64tos(i: u64, b); };
 
-	i64tos_buf[0] = 45u8;	// '-'
+	i64tos_buf[0] = '-';
 	// `(-i): u64`: for I64_MIN, -i wraps (two's complement) back to the
 	// I64_MIN bit pattern; reinterpreting to u64 yields the true
 	// magnitude 9223372036854775808. ref/hare/strconv/itos.ha:25. Probed

lib/temp/temp.ww

@@ -144,7 +144,7 @@ fn puthex(off: i32, v: u64) i32 = {
 fn makenamed(dir: str) i32 = {
 	let off: i32 = 0;
 	off = puts(off, dir);
-	pathbuf[off] = 47u8; off += 1;	// '/'
+	pathbuf[off] = '/'; off += 1;
 	off = puts(off, "temp.");
 	off = puthex(off, nextrand());
 	pathbuf[off] = 0u8;

lib/ww/ast.ww

@@ -237,17 +237,17 @@ fn putc1(fd: i32, b: u8) void = {
 };
 
 fn putq(fd: i32, s: str) void = {
-	putc1(fd, 34u8);	// '"'
+	putc1(fd, '"');
 	let i: i32 = 0;
 	for (i < s.len) {
 		let c: u8 = s[i];
-		if (c == 34u8) {		// '"'
+		if (c == '"') {
 			os.write(fd, "\\\"".ptr, 2u64);
-		} else { if (c == 92u8) {	// '\\'
+		} else { if (c == '\\') {
 			os.write(fd, "\\\\".ptr, 2u64);
-		} else { if (c == 10u8) {	// '\n'
+		} else { if (c == '\n') {
 			os.write(fd, "\\n".ptr, 2u64);
-		} else { if (c == 9u8) {	// '\t'
+		} else { if (c == '\t') {
 			os.write(fd, "\\t".ptr, 2u64);
 		} else { if (c < 32u8) {
 			let hi: u8 = c >> 4u8;
@@ -285,7 +285,7 @@ fn pr(fd: i32, n: *node, d: i32) void = {
 		return;
 	};
 	ind(fd, d);
-	putc1(fd, 40u8);	// '('
+	putc1(fd, '(');
 	let nm: str = nkname(n.kind);
 	os.write(fd, nm.ptr, nm.len: u64);
 
@@ -340,7 +340,7 @@ fn pr(fd: i32, n: *node, d: i32) void = {
 	if (n.kind == nkind.N_TYPEDECL) {
 		if (n.exported != 0) { os.write(fd, " export".ptr, 7u64); };
 	};
-	putc1(fd, 10u8);	// '\n'
+	putc1(fd, '\n');
 
 	if (n.attr != nil) {
 		ind(fd, d + 1);

lib/ww/parse/parse.ww

@@ -126,7 +126,7 @@ fn joindotted(head: str, tail: str) str = {
 	let i: u64 = 0u64;
 	let j: i32 = 0;
 	for (j < head.len) { buf[i] = head[j]; i += 1u64; j += 1; };
-	buf[i] = 46u8;	// '.'
+	buf[i] = '.';
 	i += 1u64;
 	j = 0;
 	for (j < tail.len) { buf[i] = tail[j]; i += 1u64; j += 1; };