From 5d5a3ca52dc246c94c772d0de9ceefcce5243279 Mon Sep 17 00:00:00 2001
From: Michael Sullivan <sully@msully.net>
Date: Wed, 3 Aug 2011 18:10:54 -0700
Subject: [PATCH] Fix trans_put to properly return (). Closes #773.

---
 src/comp/middle/trans.rs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/comp/middle/trans.rs b/src/comp/middle/trans.rs
index 2bbd9a77270a..ac1f1d2dc535 100644
--- a/src/comp/middle/trans.rs
+++ b/src/comp/middle/trans.rs
@@ -5493,7 +5493,8 @@ fn trans_put(cx: &@block_ctxt, e: &option::t[@ast::expr]) -> result {
         llargs += ~[r.val];
       }
     }
-    ret rslt(bcx, bcx.build.FastCall(llcallee, llargs));
+    bcx.build.FastCall(llcallee, llargs);
+    ret rslt(bcx, C_nil());
 }
 
 fn trans_break_cont(sp: &span, cx: &@block_ctxt, to_end: bool) -> result {