From 0040a31076f750992ad903b2ae2b7a724808f028 Mon Sep 17 00:00:00 2001 From: Graydon Hoare Date: Mon, 3 Jan 2011 18:22:27 -0800 Subject: Fix fold bug on expr_bind. --- src/comp/middle/fold.rs | 3 +++ 1 file changed, 3 insertions(+) (limited to 'src/comp') diff --git a/src/comp/middle/fold.rs b/src/comp/middle/fold.rs index 31ccd821..464735b4 100644 --- a/src/comp/middle/fold.rs +++ b/src/comp/middle/fold.rs @@ -444,6 +444,9 @@ fn fold_expr[ENV](&ENV env, ast_fold[ENV] fld, &@expr e) -> @expr { let vec[option.t[@ast.expr]] aargs_opt = vec(); for (option.t[@ast.expr] t_opt in args_opt) { alt (t_opt) { + case (none[@ast.expr]) { + aargs_opt += none[@ast.expr]; + } case (some[@ast.expr](?e)) { aargs_opt += vec(some(fold_expr(env_, fld, e))); } -- cgit v1.2.3