a few peephole optimizations
diff --git a/Objects/stringobject.c b/Objects/stringobject.c
index cb76d77..b09fc25 100644
--- a/Objects/stringobject.c
+++ b/Objects/stringobject.c
@@ -419,7 +419,7 @@
 	p = (unsigned char *) a->ob_sval;
 	x = *p << 7;
 	while (--len >= 0)
-		x = (x + x + x) ^ *p++;
+		x = (3*x) ^ *p++;
 	x ^= a->ob_size;
 	if (x == -1)
 		x = -2;