Add block expressions

1 files changed, 5 insertions, 0 deletions

diff --git a/switch.c b/switch.c
index 46c9afc..b6d0740 100644
--- a/switch.c
+++ b/switch.c
@@ -67,6 +67,11 @@ constant_expression (ast_expression_t *expr,
 	/* FIXME: It might actually be useful to allow this */
 	return FALSE;
 	break;
+
+    case AST_BLOCK_EXPRESSION:
+	if (!constant_expression (expr->block.body, value))
+	    return FALSE;
+	break;
 	
     case AST_UNARY_EXPRESSION:
 	if (!constant_expression (expr->unary.expr, &result))