From 6b7cab3602eae7893a4efcee760600ab69d75173 Mon Sep 17 00:00:00 2001
From: Brian Anderson <andersrb@gmail.com>
Date: Fri, 28 Jan 2011 00:09:26 -0500
Subject: Teach rustc to fail

---
 src/comp/middle/fold.rs | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'src/comp/middle/fold.rs')

diff --git a/src/comp/middle/fold.rs b/src/comp/middle/fold.rs
index 711db111..67c26014 100644
--- a/src/comp/middle/fold.rs
+++ b/src/comp/middle/fold.rs
@@ -615,6 +615,10 @@ fn fold_stmt[ENV](&ENV env, ast_fold[ENV] fld, &@stmt s) -> @stmt {
             ret fld.fold_stmt_check_expr(env_, s.span, ee);
         }
 
+        case (ast.stmt_fail) {
+            ret s;
+        }
+
         case (ast.stmt_expr(?e)) {
             auto ee = fold_expr(env_, fld, e);
             ret fld.fold_stmt_expr(env_, s.span, ee);
-- 
cgit v1.2.3