Allow any type to be cast to its base type.

1 files changed, 6 insertions, 2 deletions

diff --git a/6/simp.c b/6/simp.c
index 7d6d9b9..6f5a132 100644
--- a/6/simp.c
+++ b/6/simp.c
@@ -543,6 +543,12 @@ static Node *simpcast(Simp *s, Node *val, Type *to)
 	Type *t;
 
 	r = NULL;
+	t = tybase(exprtype(val));
+	if (tyeq(tybase(to), tybase(t))) {
+		r = rval(s, val, NULL);
+		r->expr.type = to;
+		return r;
+	}
 	/* do the type conversion */
 	switch (tybase(to)->type) {
 	case Tybool:
@@ -550,7 +556,6 @@ static Node *simpcast(Simp *s, Node *val, Type *to)
 	case Tyuint8: case Tyuint16: case Tyuint32: case Tyuint64:
 	case Tyint: case Tyuint: case Tychar: case Tybyte:
 	case Typtr:
-		t = tybase(exprtype(val));
 		switch (t->type) {
 			/* ptr -> slice conversion is disallowed */
 		case Tyslice:
@@ -590,7 +595,6 @@ static Node *simpcast(Simp *s, Node *val, Type *to)
 		}
 		break;
 	case Tyflt32: case Tyflt64:
-		t = tybase(exprtype(val));
 		switch (t->type) {
 		case Tyint8: case Tyint16: case Tyint32: case Tyint64:
 		case Tyuint8: case Tyuint16: case Tyuint32: case Tyuint64: